X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fview%2Fcust_main%2Fpayment_history%2Fvoided_payment.html;h=e295f9b3b93ec85dc697f396ac9487289eef543a;hb=55c7e3cc18a45620f48ae62d3bc044a830bd8c95;hp=08469dbe915b6341fd42d88c49873225beb08eed;hpb=4396080ed2829ae0595f1fd777f39d090c9bcd7c;p=freeside.git diff --git a/httemplate/view/cust_main/payment_history/voided_payment.html b/httemplate/view/cust_main/payment_history/voided_payment.html index 08469dbe9..e295f9b3b 100644 --- a/httemplate/view/cust_main/payment_history/voided_payment.html +++ b/httemplate/view/cust_main/payment_history/voided_payment.html @@ -1,22 +1,25 @@ -Payment <% $info %> -voided <% time2str("%D", $cust_pay_void->void_date) %> -by <% $cust_pay_void->otaker %><% $unvoid %> +<% mt("Payment [_1] by [_2]", $info, $cust_pay_void->otaker ) |h %> +voided +% my $void_user = $cust_pay_void->void_access_user; +% if ($void_user) { + by <% $void_user->username %> +% } +% my $reason = $cust_pay_void->reason; +% if ($reason) { + (<% $reason |h %>) +% } +<% mt("on [_1]", time2str($date_format, $cust_pay_void->void_date) ) |h %> + +<% $unvoid %> <%init> my( $cust_pay_void, %opt ) = @_; -my $curuser = $FS::CurrentUser::CurrentUser; +my $date_format = $opt{'date_format'} || '%m/%d/%Y'; -my $payby = $cust_pay_void->payby; -my $payinfo = $payby eq 'CARD' - ? $cust_pay_void->paymask - : $cust_pay_void->payinfo; - -$payby =~ s/^BILL$/Check #/ if $payinfo; -$payby =~ s/^CHEK$/Electronic check /; -$payby =~ s/^BILL$//; -$payby =~ s/^(CARD|COMP)$/$1 /; -my $info = $payby ? " ($payby$payinfo)" : ''; +my ($payby,$payinfo) = translate_payinfo($cust_pay_void); +$payby = translate_payby($payby,$payinfo); +my $info = $payby ? "($payby$payinfo)" : ''; if ( $opt{'pkg-balances'} && $cust_pay_void->pkgnum ) { my $cust_pkg = qsearchs('cust_pkg', { 'pkgnum' => $cust_pay_void->pkgnum } ); @@ -24,19 +27,14 @@ if ( $opt{'pkg-balances'} && $cust_pay_void->pkgnum ) { } my $unvoid = ''; -if ( $cust_pay_void->closed !~ /^Y/i - && $curuser->access_right('Unvoid') - ) -{ - $unvoid = qq! (unvoid)!; -} +my $unvoidmsg = $cust_pay_void->payby =~ /^(CARD|CHEK)$/ + ? ' ('.emt('do not send anything to the payment gateway') .')' + : ''; +$unvoid = areyousure_link("${p}misc/unvoid-cust_pay_void.cgi?".$cust_pay_void->paynum, + emt('Are you sure you want to unvoid this payment?'), + emt('Unvoid this payment from the database') . $unvoidmsg, + emt('unvoid') + ) + if $cust_pay_void->closed !~ /^Y/i && $opt{'Unvoid payments'};