X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fcust_refund.cgi;h=3c189afe66632227ac599cdb36843f473afdcf59;hb=f3738a9fcd588d32eea9b0af6a3e884293c0c6e5;hp=34e3812f361f37b97769e7acce60051554463ff0;hpb=005237d2424b22ff9e73798868194d68e18b3f6d;p=freeside.git diff --git a/httemplate/edit/cust_refund.cgi b/httemplate/edit/cust_refund.cgi index 34e3812f3..3c189afe6 100755 --- a/httemplate/edit/cust_refund.cgi +++ b/httemplate/edit/cust_refund.cgi @@ -41,7 +41,7 @@ - Date<% time2str("%D",$cust_pay->_date) %> + Date<% time2str($date_format, $cust_pay->_date) %> @@ -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 @@ -93,12 +89,12 @@ Date - <% time2str("%D",$_date) %> + <% time2str($date_format, $_date) %> Amount - $ by <% FS::payby->payname($payby) %> + $ by <% FS::payby->payname($payby) %> % if ( $payby eq 'BILL' ) { @@ -130,10 +126,9 @@ <%init> -die "access denied" - unless $FS::CurrentUser::CurrentUser->access_right('Refund payment'); - my $conf = new FS::Conf; +my $date_format = $conf->config('date_format') || '%m/%d/%Y'; + my $custnum = $cgi->param('custnum'); my $refund = $cgi->param('refund'); my $payby = $cgi->param('payby'); @@ -141,6 +136,9 @@ my $payinfo = $cgi->param('payinfo'); my $reason = $cgi->param('reason'); my $link = $cgi->param('popup') ? 'popup' : ''; +die "access denied" + unless $FS::CurrentUser::CurrentUser->refund_access_right($payby); + my( $paynum, $cust_pay ) = ( '', '' ); if ( $cgi->param('paynum') =~ /^(\d+)$/ ) { $paynum = $1;