X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=httemplate%2Fedit%2Fcust_bill_pay.cgi;h=2035e4b642f631b7685390b30cea01a71bef43ed;hb=3ce7691203a7737406bf2d4442f7fd84b81f847e;hp=bfa2b3baf6e38af53f146a532d55161f96e89a7c;hpb=22a35047ecdffff80110e06cc08fc84f9ddba9b0;p=freeside.git
diff --git a/httemplate/edit/cust_bill_pay.cgi b/httemplate/edit/cust_bill_pay.cgi
index bfa2b3baf..2035e4b64 100755
--- a/httemplate/edit/cust_bill_pay.cgi
+++ b/httemplate/edit/cust_bill_pay.cgi
@@ -1,95 +1,95 @@
-<%
-
-my($paynum, $amount, $invnum);
-if ( $cgi->param('error') ) {
- $paynum = $cgi->param('paynum');
- $amount = $cgi->param('amount');
- $invnum = $cgi->param('invnum');
-} else {
- my($query) = $cgi->keywords;
- $query =~ /^(\d+)$/;
- $paynum = $1;
- $amount = '';
- $invnum = '';
-}
-
-my $otaker = getotaker;
-
-my $p1 = popurl(1);
-
-print header("Apply Payment", '');
-print qq!Error: !, $cgi->param('error'),
- "
"
- if $cgi->param('error');
-print <
-END
-
-my $cust_pay = qsearchs('cust_pay', { 'paynum' => $paynum } );
-die "payment $paynum not found!" unless $cust_pay;
+%
+%
+%my($paynum, $amount, $invnum);
+%if ( $cgi->param('error') ) {
+% $paynum = $cgi->param('paynum');
+% $amount = $cgi->param('amount');
+% $invnum = $cgi->param('invnum');
+%} else {
+% my($query) = $cgi->keywords;
+% $query =~ /^(\d+)$/;
+% $paynum = $1;
+% $amount = '';
+% $invnum = '';
+%}
+%
+%my $otaker = getotaker;
+%
+%my $p1 = popurl(1);
+%
+%
+<% header("Apply Payment", '') %>
+% if ( $cgi->param('error') ) {
+
+ Error: <% $cgi->param('error') %>
+
+% }
+
+
+
-