X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fcust_bill_pay.cgi;h=498d477cde581f07b0a249efb1a9f15e2f2f246b;hb=14cb76d01568f0a1dbcc9d286f9adec790c961dd;hp=61c8a1785c20fea2363405b175f6898e307dacd9;hpb=2d53ea6d86d638d65f0d14ef5921daf46981269e;p=freeside.git
diff --git a/httemplate/edit/cust_bill_pay.cgi b/httemplate/edit/cust_bill_pay.cgi
index 61c8a1785..498d477cd 100755
--- a/httemplate/edit/cust_bill_pay.cgi
+++ b/httemplate/edit/cust_bill_pay.cgi
@@ -1,109 +1,85 @@
-<%
-#
+<% header("Apply Payment", '') %>
-use strict;
-use vars qw( $cgi $query $custnum $paynum $amount $invnum $p1 $otaker $cust_pay );
-use CGI;
-use CGI::Carp qw(fatalsToBrowser);
-use Date::Format;
-use FS::UID qw(cgisuidsetup getotaker);
-use FS::CGI qw(header popurl);
-use FS::Record qw(qsearch fields);
-use FS::cust_pay;
-use FS::cust_bill;
+% if ( $cgi->param('error') ) {
+ Error: <% $cgi->param('error') %>
+
+% }
+