1 <& /elements/header.html, 'Deployment zones' &>
2 <& /elements/menubar.html,
3 'Add a new fixed broadband zone' => $p.'edit/deploy_zone-fixed.html',
4 'Add a new mobile zone' => $p.'edit/deploy_zone-mobile.html',
6 <P><FONT SIZE="+1"><B>Fixed Broadband Zones</B></FONT></P>
7 <& elements/browse.html,
8 name_singular => 'zone',
9 query => { table => 'deploy_zone',
10 hashref => { zonetype => 'B' },
12 count_query => "SELECT COUNT(*) FROM deploy_zone WHERE zonetype = 'B'",
23 fields => [ 'zonenum',
25 sub { my $self = shift;
26 $tech_label->{$self->technology} },
27 sub { my $self = shift;
29 $self->is_consumer ? 'consumer' : (),
30 $self->is_business ? 'business' : ()
33 sub { my $self = shift;
35 $self->adv_speed_down,
39 sub { my $self = shift;
41 $self->cir_speed_down,
45 sub { my $self = shift;
46 FS::deploy_zone_vertex->count('zonenum = '.$self->zonenum)
48 sub { my $self = shift;
49 FS::deploy_zone_block->count('zonenum = '.$self->zonenum)
52 sort_fields => [ 'zonenum',
55 '(is_consumer is not null, is_business is not null)',
56 '(adv_speed_down, adv_speed_up)',
57 '(cir_speed_down, cir_speed_up)',
59 links => [ $link_fixed, $link_fixed, ],
62 disable_maxselect => 1,
65 disabled_statuspos => 2,
67 <P><FONT SIZE="+1"><B>Mobile Zones</B></FONT></P>
68 <& elements/browse.html,
69 name_singular => 'zone',
70 query => { table => 'deploy_zone',
71 hashref => { zonetype => 'P' },
73 count_query => "SELECT COUNT(*) FROM deploy_zone WHERE zonetype = 'P'",
81 'Vertices', # number of vertices? not so useful
83 fields => [ 'zonenum',
85 sub { my $self = shift;
86 $tech_label->{$self->technology} },
87 sub { my $self = shift;
88 $spec_label->{$self->spectrum} },
89 sub { my $self = shift;
91 $self->is_voice ? 'voice' : (),
92 $self->is_broadband ? 'broadband' : (),
95 sub { my $self = shift;
97 $self->adv_speed_down,
101 sub { my $self = shift;
102 FS::deploy_zone_vertex->count('zonenum = '.$self->zonenum)
105 sort_fields => [ 'zonenum',
109 '(is_voice is not null, is_broadband is not null)',
110 '(adv_speed_down, adv_speed_up)',
112 links => [ '', $link_mobile, ],
115 disable_maxselect => 1,
118 disabled_statuspos => 2,
121 <& /elements/footer.html &>
123 my $curuser = $FS::CurrentUser::CurrentUser;
124 my $acl_edit = $curuser->access_right('Edit FCC report configuration');
125 my $acl_edit_global = $curuser->access_right('Edit FCC report configuration for all agents');
127 unless $acl_edit or $acl_edit_global;
129 my $link_fixed = [ $p.'edit/deploy_zone-fixed.html?', 'zonenum' ];
130 my $link_mobile= [ $p.'edit/deploy_zone-mobile.html?', 'zonenum' ];
132 my $tech_label = FS::part_pkg_fcc_option->technology_labels;
133 my $spec_label = FS::part_pkg_fcc_option->spectrum_labels;