add test page for maestro status, RT#9381

2 files changed, 35 insertions, 0 deletions

diff --git a/httemplate/misc/maestro-customer_status-test.html b/httemplate/misc/maestro-customer_status-test.html
new file mode 100644
index 0000000..16d4b57
--- /dev/null
+++ b/httemplate/misc/maestro-customer_status-test.html
@@ -0,0 +1,32 @@
+<% include('/elements/header.html', {
+             'title' => "Customer $query status",
+          }) %>
+
+<% include('/elements/small_custview.html', $query, '', 1) %>
+<BR>
+
+<table style="border:1px solid #000000">
+% foreach my $key (keys %$return) {
+  <TR>
+    <TD ALIGN="right"><% $key %>:</TD>
+    <TD><B><% $return->{$key} %></B></TD>
+  </TR>
+% }
+</table>
+
+<% include('/elements/footer.html') %>
+<%init>
+
+my $return;
+
+my($query) = $cgi->keywords;
+if ( $query =~ /^(\d+)$/ ) {
+
+  use FS::Maestro;
+  $return = FS::Maestro::customer_status($1);
+
+} else {
+  $return = { 'error' => 'No custnum' };
+}
+
+</%init>
diff --git a/httemplate/view/cust_main.cgi b/httemplate/view/cust_main.cgi
index a196c75..f6bef43 100755
--- a/httemplate/view/cust_main.cgi
+++ b/httemplate/view/cust_main.cgi
@@ -90,6 +90,9 @@ function areyousure(href, message) {
   This customer's signup URL: <A HREF="<% $signupurl %>?ref=<% $custnum %>"><% $signupurl %>?ref=<% $custnum %></A><BR><BR>
 % } 
 
+%if ( $conf->exists('maestro-status_test') ) {
+  <A HREF="<% $p %>misc/maestro-customer_status-test.html?<% $custnum %>">Test maestro status</A><BR><BR>
+% } 
 
 <A NAME="cust_main"></A>
 <TABLE BORDER=0>