summaryrefslogtreecommitdiff
path: root/httemplate/misc/maestro-customer_status.cgi
blob: 8e82a02de79444cbcb9da81de322506c09ff22ef (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
<% $uri->query %>
<%init>

my $uri = new URI;

my($custnum, $svcnum) = $cgi->keywords;
if ( $custnum =~ /^(\d+)$/ ) {

  use FS::Maestro;
  $return = FS::Maestro::customer_status($1, $svcnum);

} else {
  $return = { 'error' => 'No custnum' };
}

</%init>