summaryrefslogtreecommitdiff
path: root/httemplate/edit
diff options
context:
space:
mode:
authorChristopher Burger <burgerc@freeside.biz>2018-03-27 09:20:05 -0400
committerChristopher Burger <burgerc@freeside.biz>2018-03-27 09:20:05 -0400
commitec34b8903d969fe8ac4ff6947a92e16e07f71fa0 (patch)
tree39879af88d853b93b5af5ba6d6d40868b4335b91 /httemplate/edit
parentc38b6699d83ba0d7e3fd582373b9c8e78c9217d2 (diff)
RT# 78356 - added ability to create and modify rateplans and access point when changed on freeside. cleanded up documentation.
Diffstat (limited to 'httemplate/edit')
-rw-r--r--httemplate/edit/part_export.cgi14
-rw-r--r--httemplate/edit/process/elements/process.html8
-rw-r--r--httemplate/edit/process/tower.html2
-rw-r--r--httemplate/edit/tower.html10
4 files changed, 28 insertions, 6 deletions
diff --git a/httemplate/edit/part_export.cgi b/httemplate/edit/part_export.cgi
index 5411feb5f..381fbcaf8 100644
--- a/httemplate/edit/part_export.cgi
+++ b/httemplate/edit/part_export.cgi
@@ -290,6 +290,20 @@ my $widget = new HTML::Widgets::SelectLayers(
$html .= ' CHECKED' if $part_export->no_suspend eq 'Y';
$html .= '></TD></TR>';
+ foreach my $script ( keys %{$exports->{$layer}{scripts}} ) {
+ $html .= '<TR><TD ALIGN="left" COLSPAN=2>' .
+ include('/elements/progress-init.html',
+ $part_export->exportname,
+ [ $script.'_exportnum', $script.'_script' ],
+ rooturl().'view/svc_export/run_script.cgi',
+ rooturl().'edit/part_export.cgi?'.$part_export->{Hash}->{exportnum},
+ $script,
+ ) .
+ '<INPUT TYPE="hidden" NAME="'.$script.'_exportnum" VALUE="'.$part_export->{Hash}->{exportnum}.'">
+ <INPUT TYPE="hidden" NAME="'.$script.'_script" VALUE="'.$script.'">
+ <A HREF="#" onClick="'.$script.'process();">'.$exports->{$layer}{scripts}{$script}->{html_label}.'</A></TD></TR>';
+ }
+
$html .= '</TABLE>';
# false laziness with config_element above
diff --git a/httemplate/edit/process/elements/process.html b/httemplate/edit/process/elements/process.html
index 76722c960..8c307f0b6 100644
--- a/httemplate/edit/process/elements/process.html
+++ b/httemplate/edit/process/elements/process.html
@@ -459,6 +459,14 @@ foreach my $value ( @values ) {
}
+if ($class eq "FS::tower") {
+ foreach my $part_svc_broadband_export ( FS::tower_sector->part_export_svc_broadband ) {
+ if ($part_svc_broadband_export and $part_svc_broadband_export->can('export_tower_sector')) {
+ $error = $part_svc_broadband_export->export_tower_sector($new);
+ }
+ }
+}
+
# set up redirect URLs
my $redirect;
diff --git a/httemplate/edit/process/tower.html b/httemplate/edit/process/tower.html
index f870d1237..8f62c4bec 100644
--- a/httemplate/edit/process/tower.html
+++ b/httemplate/edit/process/tower.html
@@ -6,7 +6,7 @@
sectorname ip_addr height freq_mhz direction width
downtilt v_width db_high db_low power line_loss
antenna_gain hardware_typenum
- sector_range up_rate down_rate
+ sector_range up_rate_limit down_rate_limit
)],
},
&>
diff --git a/httemplate/edit/tower.html b/httemplate/edit/tower.html
index 14f2dfa18..dfebc0031 100644
--- a/httemplate/edit/tower.html
+++ b/httemplate/edit/tower.html
@@ -13,8 +13,8 @@
'altitude',
'height',
'veg_height',
- 'up_rate',
- 'down_rate',
+ 'up_rate_limit',
+ 'down_rate_limit',
# { field => 'sectornum',
# type => 'tower_sector',
# o2m_table => 'tower_sector',
@@ -37,8 +37,8 @@
'height' => 'Tower height (feet)',
'veg_height' => 'Vegetation height (feet)',
'color' => 'Color',
- 'up_rate' => 'Up Rate (Kbps)',
- 'down_rate' => 'Down Rate (Kbps)',
+ 'up_rate_limit' => 'Up Rate Limit(Kbps)',
+ 'down_rate_limit' => 'Down Rate Limit(Kbps)',
},
&>
<%init>
@@ -47,7 +47,7 @@ my $m2_error_callback = sub { # reconstruct the list
my ($cgi, $object) = @_;
my @fields = qw(
- sectorname ip_addr height freq_mhz direction width tilt v_width db_high db_low sector_range up_rate down_rate
+ sectorname ip_addr height freq_mhz direction width tilt v_width db_high db_low sector_range up_rate_limit down_rate_limit
);
map {