Changes to add classified reasons for payment void
[freeside.git] / httemplate / view / cust_main / payment_history / voided_payment.html
index 88b5e0a..e295f9b 100644 (file)
@@ -1,9 +1,15 @@
 <DEL><% mt("Payment [_1] by [_2]", $info, $cust_pay_void->otaker ) |h %></DEL>
-<I><% mt("voided [_1]", time2str($date_format, $cust_pay_void->void_date) ) |h %> 
+<I>voided 
 % my $void_user = $cust_pay_void->void_access_user;
 % if ($void_user) {
-    by <% $void_user->username %></I>
+    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 %> 
+</I>
 <% $unvoid %>
 <%init>
 
@@ -11,8 +17,6 @@ my( $cust_pay_void, %opt ) = @_;
 
 my $date_format = $opt{'date_format'} || '%m/%d/%Y';
 
-my $curuser = $FS::CurrentUser::CurrentUser;
-
 my ($payby,$payinfo) = translate_payinfo($cust_pay_void);
 $payby = translate_payby($payby,$payinfo);
 my $info = $payby ? "($payby$payinfo)" : '';
@@ -31,6 +35,6 @@ $unvoid = areyousure_link("${p}misc/unvoid-cust_pay_void.cgi?".$cust_pay_void->p
                             emt('Unvoid this payment from the database') . $unvoidmsg,
                             emt('unvoid')
                          )
-    if ( $cust_pay_void->closed !~ /^Y/i && $curuser->access_right('Unvoid payments') );
+  if $cust_pay_void->closed !~ /^Y/i && $opt{'Unvoid payments'};
 
 </%init>