if ( $custnum =~ /^(\d+)$/ ) {
use FS::Maestro;
- $return = FS::Maestro::customer_status($1, $svcnum);
+ $uri->query_form( FS::Maestro::customer_status($1) );
} else {
- $return = { 'error' => 'No custnum' };
+ $uri->query_form( { 'error' => 'No custnum' } );
}
</%init>
my $return;
-my($query) = $cgi->keywords;
-if ( $query =~ /^(\d+)$/ ) {
+my($custnum, $svcnum) = $cgi->keywords;
+if ( $custnum =~ /^(\d+)$/ ) {
use FS::Maestro;
- $return = FS::Maestro::customer_status($1);
+ $return = FS::Maestro::customer_status($1, $svcnum);
} else {
$return = { 'error' => 'No custnum' };
#for services.html
'svc_external-skip_manual' => $conf->exists('svc_external-skip_manual'),
'legacy_link' => $conf->exists('legacy_link'),
- 'svc_broadband-manage_link' => $conf->config('svc_broadband-manage_link'),
+ 'svc_broadband-manage_link' => scalar($conf->config('svc_broadband-manage_link')),
+ 'maestro-status_test' => $conf->exists('maestro-status_test'),
);
#subroutines
% if ( $curuser->access_right('Unprovision customer service') ) {
<FONT SIZE="-2">( <%svc_unprovision_link($cust_svc)%> )</FONT>
% }
+
+% if ( $part_svc->svcdb eq 'svc_pbx' && $opt{'maestro-status_test'} ){
+ <FONT SIZE="-2">( <A HREF="<% $p %>misc/maestro-customer_status-test.html?<% $cust_pkg->custnum.'+'.$cust_svc->svcnum %>">Test maestro status</A> )</FONT>
+% }
+
</TD>
</TR>
% }