Merge branch 'master' of git.freeside.biz:/home/git/freeside
[freeside.git] / 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>