summaryrefslogtreecommitdiff
path: root/httemplate/edit/process
diff options
context:
space:
mode:
authorIvan Kohler <ivan@freeside.biz>2013-05-14 00:28:55 -0700
committerIvan Kohler <ivan@freeside.biz>2013-09-26 17:23:44 -0700
commita97e5cbca3e7b9e7d59ecbe34057426b2ff7b34d (patch)
tree9c93e64636997e1e8ba0083fe71f1eb70faa6019 /httemplate/edit/process
parent486a5bc9dce792b34889411617ef7ebf535b93c7 (diff)
svc_cable (2.3 backport), RT#22009
Conflicts: FS/FS/access_right.pm FS/MANIFEST httemplate/docs/part_svc-table.html httemplate/view/svc_phone.cgi
Diffstat (limited to 'httemplate/edit/process')
-rw-r--r--httemplate/edit/process/cable_device.html23
1 files changed, 23 insertions, 0 deletions
diff --git a/httemplate/edit/process/cable_device.html b/httemplate/edit/process/cable_device.html
new file mode 100644
index 000000000..97b4f81d9
--- /dev/null
+++ b/httemplate/edit/process/cable_device.html
@@ -0,0 +1,23 @@
+<% include( 'elements/process.html',
+ 'table' => 'cable_device',
+ 'redirect' => sub {
+ my( $cgi, $cable_device ) = @_;
+ #popurl(3).'view/svc_cable.html?'.
+ popurl(3).'view/svc_Common.html?svcdb=svc_cable;'.
+ 'svcnum='. $cable_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>