summaryrefslogtreecommitdiff
path: root/FS/FS/tower_sector.pm
diff options
context:
space:
mode:
Diffstat (limited to 'FS/FS/tower_sector.pm')
-rw-r--r--FS/FS/tower_sector.pm35
1 files changed, 34 insertions, 1 deletions
diff --git a/FS/FS/tower_sector.pm b/FS/FS/tower_sector.pm
index 6ccfe553d..350fce1fd 100644
--- a/FS/FS/tower_sector.pm
+++ b/FS/FS/tower_sector.pm
@@ -2,7 +2,7 @@ package FS::tower_sector;
use strict;
use base qw( FS::Record );
-use FS::Record qw( qsearch qsearchs );
+use FS::Record qw( dbh qsearch qsearchs );
use FS::tower;
use FS::svc_broadband;
use Class::Load qw(load_class);
@@ -93,6 +93,18 @@ The coverage map, as a PNG.
The coordinate boundaries of the coverage map.
+=item title
+
+The sector title.
+
+=item up_rate_limit
+
+Up rate limit for sector.
+
+=item down_rate_limit
+
+down rate limit for sector.
+
=back
=head1 METHODS
@@ -155,6 +167,8 @@ sub check {
|| $self->ut_numbern('downtilt')
|| $self->ut_floatn('sector_range')
|| $self->ut_numbern('margin')
+ || $self->ut_numbern('up_rate_limit')
+ || $self->ut_numbern('down_rate_limit')
|| $self->ut_anything('image')
|| $self->ut_sfloatn('west')
|| $self->ut_sfloatn('east')
@@ -260,6 +274,25 @@ sub queue_generate_coverage {
=over 4
+=item part_export_svc_broadband
+
+Returns all svc_broadband exports.
+
+=cut
+
+sub part_export_svc_broadband {
+ my $info = $FS::part_export::exports{'svc_broadband'} or return;
+ my @exporttypes = map { dbh->quote($_) } keys %$info or return;
+ qsearch({
+ 'table' => 'part_export',
+ 'extra_sql' => 'WHERE exporttype IN(' . join(',', @exporttypes) . ')'
+ });
+}
+
+=back
+
+=over 4
+
=item process_generate_coverage JOB, PARAMS
Queueable routine to fetch the sector coverage map from the tower mapping