httemplate/edit/process/phone_device.html

   1 <% include( 'elements/process.html',
   2                'table'    => 'phone_device',
   3                'redirect' => sub {
   4                  my( $cgi, $phone_device ) = @_;
   5                  popurl(3).'view/svc_phone.cgi?'.
   6                    'svcnum='. $phone_device->svcnum.
   7                    ';devicenum=';
   8                },
   9            )
  10 %>
  11 <%init>
  12
  13 if($cgi->param('sel_mac_addr') && !$cgi->param('mac_addr')) {
  14     $cgi->param('mac_addr',$cgi->param('sel_mac_addr'));
  15 }
  16
  17 # :/  needs agent-virt so you can't futz with arbitrary devices
  18
  19 die "access denied"
  20   unless $FS::CurrentUser::CurrentUser->access_right('Provision customer service'); #something else more specific?
  21
  22 </%init>