httemplate/edit/process/addr_block/add.cgi

   1 <% include( '../elements/process.html',
   2             'table'            => 'addr_block',
   3             'redirect'         => popurl(4). 'browse/addr_block.cgi?dummy=',
   4             'error_redirect'   => popurl(4). 'browse/addr_block.cgi?',
   5             'agent_virt'       => 1,
   6             'agent_null_right' => 'Broadband global configuration',
   7
   8           )
   9 %>
  10 <%init>
  11
  12 my $curuser = $FS::CurrentUser::CurrentUser;
  13 die "access denied"
  14   unless $curuser->access_right('Broadband configuration')
  15       || $curuser->access_right('Broadband global configuration');
  16
  17 $cgi->param('routernum', 0)           # in FS::addr_block::check instead?
  18   unless $cgi->param('routernum');
  19
  20 </%init>