<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>
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)" : '';
emt('Unvoid this payment from the database') . $unvoidmsg,
emt('unvoid')
)
- if ( $cust_pay_void->closed !~ /^Y/i && $curuser->access_right('Unvoid') );
+ if $cust_pay_void->closed !~ /^Y/i && $opt{'Unvoid payments'};
</%init>