blob: d3847dc407f4c7606a3333bde3e4e41985abae4c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
  | 
<% include('elements/ApplicationCommon.html',
     'error_redirect' => 'cust_credit_bill.cgi',
     'src_table'      => 'cust_credit',
     'src_thing'      => 'credit',
     'link_table'     => 'cust_credit_bill',
   )
%>
<%init>
die "access denied"
  unless $FS::CurrentUser::CurrentUser->access_right('Apply credit');
if ( $cgi->param('src_amount') ) {
  die "access denied"
    unless ( $FS::CurrentUser::CurrentUser->access_right('Post credit') &&
           $FS::CurrentUser::CurrentUser->access_right('Delete credit') );
}
</%init>
  |