X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fcust_credit.cgi;h=13d062c741f5fb5b3fbf80f464c1e0c07ddf4c2a;hb=4142ac8edaafd2791cd89116e2a6883f0be99366;hp=e61463e07c6ccba2aa2022a670fdb86398c9f0fd;hpb=371e7a9c14b0feb83a802f624a8dceda5fecbcbf;p=freeside.git
diff --git a/httemplate/edit/cust_credit.cgi b/httemplate/edit/cust_credit.cgi
index e61463e07..13d062c74 100755
--- a/httemplate/edit/cust_credit.cgi
+++ b/httemplate/edit/cust_credit.cgi
@@ -1,21 +1,61 @@
-<%
-#
-
-use strict;
-use vars qw( $cgi $query $custnum $otaker $p1 $_date $amount $reason );
-use Date::Format;
-use CGI;
-use CGI::Carp qw(fatalsToBrowser);
-use FS::UID qw(cgisuidsetup getotaker);
-use FS::CGI qw(header popurl small_custview);
-use FS::Record qw(fields);
-#use FS::cust_credit;
+<% include('/elements/header-popup.html', 'Enter Credit') %>
-my $conf = new FS::Conf;
+% if ( $cgi->param('error') ) {
+ Error: <% $cgi->param('error') %>
+
+% }
+
+