RT#27710: Credit voiding
[freeside.git] / httemplate / view / cust_main / payment_history / voided_credit.html
1 <DEL><% emt("Credit by [_1]", $cust_credit_void->otaker, $reason ) %>\
2 <% $reason |h %></DEL>
3 <I>
4 <% emt("voided [_1]", time2str($date_format, $cust_credit_void->void_date) )%>
5 % my $void_user = $cust_credit_void->void_access_user;
6 % if ($void_user) {
7 <% emt('by [_1]', $void_user->username) %>
8 % }
9 <% $void_reason |h %>
10 </I>
11 <% $unvoid %>
12 <%init>
13
14 my( $cust_credit_void, %opt ) = @_;
15
16 my $date_format = $opt{'date_format'} || '%m/%d/%Y';
17
18 my $unvoid = '';
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?'),
21                             '',
22                             emt('unvoid')
23                           )
24   if $cust_credit_void->closed !~ /^Y/i
25   && $opt{'Unvoid credit'};
26
27 my $reason = $cust_credit_void->reason;
28 $reason = " ($reason)" if $reason;
29
30 my $void_reason = $cust_credit_void->void_reason;
31 $void_reason = " ($void_reason)" if $void_reason;
32 </%init>
33