--- /dev/null
+<% include( 'elements/process.html',
+ 'table' => 'dsl_device',
+ 'redirect' => sub {
+ my( $cgi, $dsl_device ) = @_;
+ popurl(3).'view/svc_dsl.cgi?'.
+ 'svcnum='. $dsl_device->svcnum.
+ ';devicenum=';
+ },
+ )
+%>
+<%init>
+
+if($cgi->param('sel_mac_addr') && !$cgi->param('mac_addr')) {
+ $cgi->param('mac_addr',$cgi->param('sel_mac_addr'));
+}
+
+# :/ needs agent-virt so you can't futz with arbitrary devices
+
+die "access denied"
+ unless $FS::CurrentUser::CurrentUser->access_right('Provision customer service'); #something else more specific?
+
+</%init>