diff options
Diffstat (limited to 'httemplate/edit/cust_credit.cgi')
-rwxr-xr-x | httemplate/edit/cust_credit.cgi | 88 |
1 files changed, 45 insertions, 43 deletions
diff --git a/httemplate/edit/cust_credit.cgi b/httemplate/edit/cust_credit.cgi index 8de627d20..c54fb8147 100755 --- a/httemplate/edit/cust_credit.cgi +++ b/httemplate/edit/cust_credit.cgi @@ -1,67 +1,69 @@ -<% - -my $conf = new FS::Conf; -my($custnum, $amount, $reason); -if ( $cgi->param('error') ) { - #$cust_credit = new FS::cust_credit ( { - # map { $_, scalar($cgi->param($_)) } fields('cust_credit') - #} ); - $custnum = $cgi->param('custnum'); - $amount = $cgi->param('amount'); - #$refund = $cgi->param('refund'); - $reason = $cgi->param('reason'); -} else { - my($query) = $cgi->keywords; - $query =~ /^(\d+)$/; - $custnum = $1; - $amount = ''; - #$refund = 'yes'; - $reason = ''; -} -my $_date = time; - -my $otaker = getotaker; - -my $p1 = popurl(1); - -%><%= include('/elements/header-popup.html', 'Enter Credit') %> - -<% if ( $cgi->param('error') ) { %> - <FONT SIZE="+1" COLOR="#ff0000">Error: <%= $cgi->param('error') %></FONT> +% +% +%my $conf = new FS::Conf; +%my($custnum, $amount, $reason); +%if ( $cgi->param('error') ) { +% #$cust_credit = new FS::cust_credit ( { +% # map { $_, scalar($cgi->param($_)) } fields('cust_credit') +% #} ); +% $custnum = $cgi->param('custnum'); +% $amount = $cgi->param('amount'); +% #$refund = $cgi->param('refund'); +% $reason = $cgi->param('reason'); +%} else { +% my($query) = $cgi->keywords; +% $query =~ /^(\d+)$/; +% $custnum = $1; +% $amount = ''; +% #$refund = 'yes'; +% $reason = ''; +%} +%my $_date = time; +% +%my $otaker = getotaker; +% +%my $p1 = popurl(1); +% +% +<% include('/elements/header-popup.html', 'Enter Credit') %> +% if ( $cgi->param('error') ) { + + <FONT SIZE="+1" COLOR="#ff0000">Error: <% $cgi->param('error') %></FONT> <BR><BR> -<% } %> +% } + -<!-- <%= small_custview($custnum, $conf->config('countrydefault')) %> --> +<!-- <% small_custview($custnum, $conf->config('countrydefault')) %> --> -<FORM ACTION="<%= $p1 %>process/cust_credit.cgi" METHOD=POST> +<FORM ACTION="<% $p1 %>process/cust_credit.cgi" METHOD=POST> <INPUT TYPE="hidden" NAME="crednum" VALUE=""> -<INPUT TYPE="hidden" NAME="custnum" VALUE="<%= $custnum %>"> +<INPUT TYPE="hidden" NAME="custnum" VALUE="<% $custnum %>"> <INPUT TYPE="hidden" NAME="paybatch" VALUE=""> -<INPUT TYPE="hidden" NAME="_date" VALUE="<%= $_date %>"> +<INPUT TYPE="hidden" NAME="_date" VALUE="<% $_date %>"> <INPUT TYPE="hidden" NAME="credited" VALUE=""> -<INPUT TYPE="hidden" NAME="otaker" VALUE="<%= $otaker %>"> +<INPUT TYPE="hidden" NAME="otaker" VALUE="<% $otaker %>"> Credit -<%= ntable("#cccccc", 2) %> +<% ntable("#cccccc", 2) %> <TR> <TD ALIGN="right">Date</TD> - <TD BGCOLOR="#ffffff"><%= time2str("%D",$_date) %></TD> + <TD BGCOLOR="#ffffff"><% time2str("%D",$_date) %></TD> </TR> <TR> <TD ALIGN="right">Amount</TD> - <TD BGCOLOR="#ffffff">$<INPUT TYPE="text" NAME="amount" VALUE="<%= $amount %>" SIZE=8 MAXLENGTH=8></TD> + <TD BGCOLOR="#ffffff">$<INPUT TYPE="text" NAME="amount" VALUE="<% $amount %>" SIZE=8 MAXLENGTH=8></TD> </TR> +% +%#print qq! <INPUT TYPE="checkbox" NAME="refund" VALUE="$refund">Also post refund!; +% -<% -#print qq! <INPUT TYPE="checkbox" NAME="refund" VALUE="$refund">Also post refund!; -%> <TR> <TD ALIGN="right">Reason</TD> - <TD BGCOLOR="#ffffff"><INPUT TYPE="text" NAME="reason" VALUE="<%= $reason %>" SIZE=32></TD> + <TD BGCOLOR="#ffffff"><INPUT TYPE="text" NAME="reason" VALUE="<% $reason %>" SIZE=32></TD> </TR> <TR> |