diff options
Diffstat (limited to 'httemplate/search/cust_pay.cgi')
-rwxr-xr-x | httemplate/search/cust_pay.cgi | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/httemplate/search/cust_pay.cgi b/httemplate/search/cust_pay.cgi index 8ebd65413..b5bdf8296 100755 --- a/httemplate/search/cust_pay.cgi +++ b/httemplate/search/cust_pay.cgi @@ -13,11 +13,17 @@ if (0) { # my $invnum = $cust_bill[0]->invnum; # print $cgi->redirect(popurl(2). "view/cust_bill.cgi?$invnum"); #redirect } elsif ( scalar(@cust_pay) == 0 ) { +%> +<!-- mason kludge --> +<% idiot("Check # not found."); #exit; } else { my $total = scalar(@cust_pay); my $s = $total > 1 ? 's' : ''; +%> +<!-- mason kludge --> +<% print header("Check # Search Results", menubar( 'Main Menu', popurl(2) )), "$total matching check$s found<BR>", &table(), <<END; |