httemplate/view/cust_main/payment_history/refund.html

   1 <% $refund %>
   2 (<% "$payby$payinfo" %>)
   3 <% "$view$delete" %>
   4 <%init>
   5
   6 my( $cust_refund, %opt ) = @_;
   7
   8 my $curuser = $FS::CurrentUser::CurrentUser;
   9
  10 my $payby = $cust_refund->payby;
  11 my $payinfo = $payby eq 'CARD'
  12                 ? $cust_refund->paymask
  13                 : $cust_refund->payinfo;
  14
  15 $payby = translate_payby_refund($payby,$payinfo);
  16
  17 my $refund = mt("Refund by [_1]",$cust_refund->otaker);
  18 $refund = '<B><FONT COLOR="#FF0000">'
  19     . mt("Unapplied Refund by [_1]",$cust_refund->otaker)
  20     . '</FONT></B>'
  21     if $cust_refund->unapplied > 0;
  22
  23 my $view =
  24   ' ('. include('/elements/popup_link.html',
  25                   'label'     => mt('view receipt'),
  26                   'action'    => "${p}view/cust_refund.html?link=popup;".
  27                                  'refundnum='. $cust_refund->refundnum,
  28                   'actionlabel' => mt('Payment Receipt'),
  29                ).
  30    ')';
  31
  32
  33 my $delete = '';
  34 $delete = areyousure_link("${p}misc/delete-cust_refund.cgi?".$cust_refund->refundnum,
  35                            mt('Are you sure you want to delete this refund?'),
  36                            mt('Delete this refund from the database completely - not recommended'),
  37                            mt('delete')
  38                           )
  39     if ( $cust_refund->closed !~ /^Y/i && $opt{'deleterefunds'}
  40                                 && $curuser->access_right('Delete refund') );
  41
  42 </%init>
  43