<% $refund %> (<% "$payby$payinfo" %>) <% "$view$email$delete" %> <%init> my( $cust_refund, %opt ) = @_; my $payby = $cust_refund->payby; my $payinfo = $payby eq 'CARD' ? $cust_refund->paymask : $cust_refund->payinfo; $payby = translate_payby_refund($payby,$payinfo); my $refund = emt("Refund by [_1]",$cust_refund->otaker); $refund = '' . emt("Unapplied Refund by [_1]",$cust_refund->otaker) . '' if $cust_refund->unapplied > 0; my $view = ' ('. include('/elements/popup_link.html', 'label' => emt('view receipt'), 'action' => "${p}view/cust_refund.html?link=popup;". 'refundnum='. $cust_refund->refundnum, 'actionlabel' => emt('Payment Receipt'), ). ')'; my $email = $opt{'has_email_address'} ? q! (refundnum. q!','Email Refund Receipt')" TITLE="Send email receipt">email receipt)! : ''; my $delete = ''; $delete = areyousure_link("${p}misc/delete-cust_refund.cgi?".$cust_refund->refundnum, emt('Are you sure you want to delete this refund?'), emt('Delete this refund from the database completely - not recommended'), emt('delete') ) if $cust_refund->closed !~ /^Y/i && $opt{'deleterefunds'} && $opt{'Delete refund'};