X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fprocess%2Fcust_refund.cgi;h=a579a02d897efb6d14c44ef52b25ecaf69dda046;hb=77002640e60f0b47cf05ed8e173a0f0bcf66e655;hp=fadfffb622ad837b2665899b6b559ffdc6d0a1ea;hpb=3ce7691203a7737406bf2d4442f7fd84b81f847e;p=freeside.git diff --git a/httemplate/edit/process/cust_refund.cgi b/httemplate/edit/process/cust_refund.cgi index fadfffb62..a579a02d8 100755 --- a/httemplate/edit/process/cust_refund.cgi +++ b/httemplate/edit/process/cust_refund.cgi @@ -1,5 +1,3 @@ -% -% %$cgi->param('custnum') =~ /^(\d*)$/ or die "Illegal custnum!"; %my $custnum = $1; %my $cust_main = qsearchs('cust_main', { 'custnum' => $custnum } ) @@ -7,11 +5,7 @@ % %my $error = ''; %if ( $cgi->param('payby') =~ /^(CARD|CHEK)$/ ) { -% my %payby2bop = ( -% 'CARD' => 'CC', -% 'CHEK' => 'ECHECK', -% ); -% my $bop = $payby2bop{$1}; +% my $bop = $FS::payby::payby2bop{$1}; % $cgi->param('refund') =~ /^(\d*)(\.\d{2})?$/ % or die "illegal refund amount ". $cgi->param('refund'); % my $refund = "$1$2"; @@ -38,6 +32,3 @@ %} else { % print $cgi->redirect(popurl(3). "view/cust_main.cgi?$custnum"); %} -% -% -