X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fcust_refund.cgi;h=3333f5d8c25c424b0a1a5c0590c64bbe4a57c6e2;hb=5e05724a635a22776f1b973f5d7e77989da4e048;hp=8955c7cee3c785d2c0770100d74191ac7519a506;hpb=2041a9143fac20b79ead4a1ae01224dedf5b27c2;p=freeside.git diff --git a/httemplate/edit/cust_refund.cgi b/httemplate/edit/cust_refund.cgi index 8955c7cee..3333f5d8c 100755 --- a/httemplate/edit/cust_refund.cgi +++ b/httemplate/edit/cust_refund.cgi @@ -1,5 +1,117 @@ - -<% +<% include('/elements/header.html', 'Refund '. ucfirst(lc($payby)). ' payment', '') %> + +<% include('/elements/error.html') %> + +<% small_custview($custnum, $conf->config('countrydefault')) %> + +
+ +<% include('/elements/footer.html') %> + +<%init> + +die "access denied" + unless $FS::CurrentUser::CurrentUser->access_right('Refund payment'); my $conf = new FS::Conf; my $custnum = $cgi->param('custnum'); @@ -26,69 +138,4 @@ my $_date = time; my $p1 = popurl(1); -print header('Refund '. ucfirst(lc($payby)). ' payment', ''); -print qq!Error: !, $cgi->param('error'), - "" - if $cgi->param('error'); -print <