httemplate/edit/process/svc_Common.html

   1 <% include( 'elements/svc_Common.html',
   2               'table'    => $table,
   3               'redirect' => popurl(3)."view/svc_Common.html?svcdb=$table;svcnum=",
   4               'error_redirect' => popurl(3)."edit/svc_Common.html?svcdb=$table;",
   5           )
   6 %>
   7 <%init>
   8
   9 die "access denied"
  10   unless $FS::CurrentUser::CurrentUser->access_right('Provision customer service'); #something else more specific?
  11
  12 $cgi->param('svcdb') =~ /^(svc_\w+)$/ or die "unparsable svcdb";
  13 my $table = $1;
  14 require "FS/$table.pm";
  15
  16 </%init>