X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fcust_credit_bill.cgi;h=249ba31d0f4c2187a5421b33c7814c11bbf8ca43;hb=0dd05e9ff98263d2d42b419b1e278a5a3bc594b2;hp=13bad185208dbfaad5e05971612f09107c8caa04;hpb=fbcb45dfe5a1bce7981fe4527176b9fdf2ec54b7;p=freeside.git
diff --git a/httemplate/edit/cust_credit_bill.cgi b/httemplate/edit/cust_credit_bill.cgi
index 13bad1852..249ba31d0 100755
--- a/httemplate/edit/cust_credit_bill.cgi
+++ b/httemplate/edit/cust_credit_bill.cgi
@@ -1,22 +1,62 @@
-<%
-#
+<% header("Apply Credit", '') %>
-use strict;
-use vars qw( $cgi $query $custnum $invnum $otaker $p1 $crednum $amount $reason $cust_credit );
-use Date::Format;
-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_credit;
-use FS::cust_bill;
+% if ( $cgi->param('error') ) {
+ Error: <% $cgi->param('error') %>
+
+% }
+