X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fcust_refund.cgi;h=9f7ac8deeca6f599c8963b322cd53c349072b2f5;hb=daa3524d4f512f2bf671c6b07c606ba3eec1fefc;hp=612e337f78f17bf88ac23f6406579bdaa7a8614b;hpb=f099e0dfa8f438a84d8f1bce36f5e5bda60481e5;p=freeside.git diff --git a/httemplate/edit/cust_refund.cgi b/httemplate/edit/cust_refund.cgi index 612e337f7..9f7ac8dee 100755 --- a/httemplate/edit/cust_refund.cgi +++ b/httemplate/edit/cust_refund.cgi @@ -59,33 +59,29 @@ % } - -% -% #false laziness w/FS/FS/cust_main::realtime_refund_bop -% if ( $cust_pay->paybatch =~ /^(\w+):(\w+)(:(\w+))?$/ ) { -% my ( $processor, $auth, $order_number ) = ( $1, $2, $4 ); -% - - +% if ( $cust_pay->processor ) { - Processor<% $processor %> + Processor + <% $cust_pay->processor %> -% if ( length($auth) ) { +% if ( length($cust_pay->auth) ) { - Authorization<% $auth %> + Authorization + <% $cust_pay->auth %> % } -% if ( length($order_number) ) { +% if ( length($cust_pay->order_number) ) { - Order number<% $order_number %> + Order number + <% $cust_pay->order_number %> % } -% } +% } # if ($cust_pay->processor) -% } +% } #if $cust_pay
Refund @@ -98,7 +94,7 @@ Amount - $ by <% FS::payby->payname($payby) %> + $ by <% FS::payby->payname($payby) %> % if ( $payby eq 'BILL' ) { @@ -110,14 +106,17 @@ % } - - Reason - - +<& /elements/tr-select-reason.html, + 'field' => 'reasonnum', + 'reason_class' => 'F', + 'control_button' => "document.getElementById('confirm_refund_button')", + 'cgi' => $cgi, +&> +
- + @@ -141,10 +140,10 @@ my $reason = $cgi->param('reason'); my $link = $cgi->param('popup') ? 'popup' : ''; my @rights = (); -push @rights, 'Post refund' if $payby /^(BILL|CASH)$/; +push @rights, 'Post refund' if $payby =~ /^(BILL|CASH|MCRD)$/; push @rights, 'Post check refund' if $payby eq 'BILL'; push @rights, 'Post cash refund ' if $payby eq 'CASH'; -push @rights, 'Refund payment' if $payby /^(CARD|CHEK)$/; +push @rights, 'Refund payment' if $payby =~ /^(CARD|CHEK)$/; push @rights, 'Refund credit card payment' if $payby eq 'CARD'; push @rights, 'Refund Echeck payment' if $payby eq 'CHEK';