1 <DEL><% emt("Credit by [_1]", $cust_credit_void->otaker, $reason ) %>\
4 <% emt("voided [_1]", time2str($date_format, $cust_credit_void->void_date) )%>
5 % my $void_user = $cust_credit_void->void_access_user;
7 <% emt('by [_1]', $void_user->username) %>
14 my( $cust_credit_void, %opt ) = @_;
16 my $date_format = $opt{'date_format'} || '%m/%d/%Y';
19 $unvoid = areyousure_link("${p}misc/unvoid-cust_credit_void.cgi?".$cust_credit_void->crednum,
20 emt('Are you sure you want to unvoid this credit?'),
24 if $cust_credit_void->closed !~ /^Y/i
25 && $opt{'Unvoid credit'};
27 my $reason = $cust_credit_void->reason;
28 $reason = " ($reason)" if $reason;
30 my $void_reason = $cust_credit_void->void_reason;
31 $void_reason = " ($void_reason)" if $void_reason;