X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fcust_refund.cgi;h=3333f5d8c25c424b0a1a5c0590c64bbe4a57c6e2;hb=0930d22ffc440f80c1b222b2e750cadbabd9e8f6;hp=425c1773849aed35af51c01e30de16a544be307b;hpb=4ae85517a9c3a8a2f61e87bc27a74eb616e396a4;p=freeside.git diff --git a/httemplate/edit/cust_refund.cgi b/httemplate/edit/cust_refund.cgi index 425c17738..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,68 +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 <