summaryrefslogtreecommitdiff
path: root/httemplate/edit
diff options
context:
space:
mode:
authorIvan Kohler <ivan@freeside.biz>2013-09-10 01:33:45 -0700
committerIvan Kohler <ivan@freeside.biz>2013-09-10 01:33:45 -0700
commita5dce53ac50026bc6caef192100162f1d86a863f (patch)
tree9462710dd9281662b9e68f3373ffb8fbb066b2e1 /httemplate/edit
parentec9b0f903dfa57efc0c82791b9efa74f0c746bc0 (diff)
svc_cable service have a single serial / MAC / model, not one-to-many devices like svc_phone and svc_dsl, RT#22009
Diffstat (limited to 'httemplate/edit')
-rw-r--r--httemplate/edit/cable_device.html117
-rw-r--r--httemplate/edit/process/cable_device.html23
2 files changed, 0 insertions, 140 deletions
diff --git a/httemplate/edit/cable_device.html b/httemplate/edit/cable_device.html
deleted file mode 100644
index 963bbf7a8..000000000
--- a/httemplate/edit/cable_device.html
+++ /dev/null
@@ -1,117 +0,0 @@
-<% include( 'elements/edit.html',
- 'name' => 'Cable device',
- 'table' => 'cable_device',
- 'labels' => {
- 'devicenum' => 'Device',
- 'devicepart' => 'Device type',
- 'mac_addr' => 'MAC address',
- 'serial' => 'Serial number',
- },
- 'fields' => [ { 'field' => 'devicepart',
- 'type' => 'select-table',
- 'table' => 'part_device',
- 'name_col' => 'devicename',
- 'onchange' => 'devicepart_changed',
- 'empty_label' =>'Select device type',
- #'hashref' =>{ disabled => '' },
- },
- { field => 'mac_addr',
- type => 'select-mac',
- },
- { field => 'serial',
- type => 'text', #select-serial
- },
- { 'field' => 'svcnum',
- 'type' => 'hidden',
- },
- ],
- 'menubar' => [], #disable viewall
- #'viewall_dir' => 'browse',
- 'new_callback' => sub {
- my( $cgi, $object ) = @_;
- $object->svcnum( $cgi->param('svcnum') );
- },
- 'html_foot' => $html_foot,
- )
-%>
-<%init>
-
-#bad: pretty much entirely false laziness w/phone_device, except for labels and
-# the serial field
-
-my @deviceparts_with_inventory =
- map $_->devicepart,
- qsearch({ 'table' => 'part_device',
- 'extra_sql' => 'WHERE inventory_classnum IS NOT NULL',
- });
-
-my $html_foot = sub {
- my $js = "
-<SCRIPT TYPE=\"text/javascript\">
-
- function opt(what,value,text) {
- var optionName = new Option(text, value, false, false);
- var length = what.length;
- what.options[length] = optionName;
- }
-
- function devicepart_changed(what){
-
- var macsel = document.getElementById('sel_mac_addr');
- var mac = document.getElementById('mac_addr');
-
- function update_macs(macs) {
- for ( var i = macsel.length; i >= 0; i-- )
- macsel.options[i] = null;
-
- var macArray = eval('(' + macs + ')' );
- if(macArray.length == 0)
- opt(macsel,'','No MAC addresses found in inventory for this device type');
- else
- opt(macsel,'','Select MAC address');
-
- for ( var i = 0; i < macArray.length; i++ ) {
- opt(macsel,macArray[i],macArray[i]);
- }
-
- }
-
- var devicepart = what.options[what.selectedIndex].value;
-
- var deviceparts_with_inventory = new Array(";
-$js .= join(',', map qq("$_"), @deviceparts_with_inventory);
-$js .= ");
-
- var hasInventory = false;
- for ( i = 0; i < deviceparts_with_inventory.length; i++ ) {
- if ( deviceparts_with_inventory[i] == devicepart )
- hasInventory = true;
- }
-
-
- if(hasInventory) { // do the AJAX thing, disable text field
- macsel.style.display = 'inline';
- mac.style.display = 'none';
- mac.value = '';
- get_macs( devicepart, update_macs );
- } else { // clear & display text field only, clear/hide select
- mac.style.display = 'inline';
- macsel.style.display = 'none';
- macsel.selectedIndex = 0;
- }
-
- }
-
- devicepart_changed(document.getElementById('devicepart'));
-</SCRIPT>";
-
- $js;
-};
-
-# :/ 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>
diff --git a/httemplate/edit/process/cable_device.html b/httemplate/edit/process/cable_device.html
deleted file mode 100644
index 97b4f81d9..000000000
--- a/httemplate/edit/process/cable_device.html
+++ /dev/null
@@ -1,23 +0,0 @@
-<% 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>