X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fcust_refund.cgi;h=1ef69fdae5e525b6a12eea69982e92c929100616;hb=51c3d90d07c9d5b3e33a1f002cf5a252ef65bb7b;hp=34e3812f361f37b97769e7acce60051554463ff0;hpb=005237d2424b22ff9e73798868194d68e18b3f6d;p=freeside.git
diff --git a/httemplate/edit/cust_refund.cgi b/httemplate/edit/cust_refund.cgi
index 34e3812f3..1ef69fdae 100755
--- a/httemplate/edit/cust_refund.cgi
+++ b/httemplate/edit/cust_refund.cgi
@@ -41,7 +41,7 @@
- Date | <% time2str("%D",$cust_pay->_date) %> |
+ Date | <% time2str($date_format, $cust_pay->_date) %> |
@@ -93,12 +93,12 @@
Date |
- <% time2str("%D",$_date) %> |
+ <% time2str($date_format, $_date) %> |
Amount |
- $ by <% FS::payby->payname($payby) %> |
+ $ by <% FS::payby->payname($payby) %> |
% if ( $payby eq 'BILL' ) {
@@ -130,10 +130,9 @@
<%init>
-die "access denied"
- unless $FS::CurrentUser::CurrentUser->access_right('Refund payment');
-
my $conf = new FS::Conf;
+my $date_format = $conf->config('date_format') || '%m/%d/%Y';
+
my $custnum = $cgi->param('custnum');
my $refund = $cgi->param('refund');
my $payby = $cgi->param('payby');
@@ -141,6 +140,17 @@ my $payinfo = $cgi->param('payinfo');
my $reason = $cgi->param('reason');
my $link = $cgi->param('popup') ? 'popup' : '';
+my @rights = ();
+push @rights, 'Post refund' if $payby =~ /^(BILL|CASH|MCRD)$/;
+push @rights, 'Post check refund' if $payby eq 'BILL';
+push @rights, 'Post cash refund ' if $payby eq 'CASH';
+push @rights, 'Refund payment' if $payby =~ /^(CARD|CHEK)$/;
+push @rights, 'Refund credit card payment' if $payby eq 'CARD';
+push @rights, 'Refund Echeck payment' if $payby eq 'CHEK';
+
+die "access denied"
+ unless $FS::CurrentUser::CurrentUser->access_right(\@rights);
+
my( $paynum, $cust_pay ) = ( '', '' );
if ( $cgi->param('paynum') =~ /^(\d+)$/ ) {
$paynum = $1;