X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fedit%2Fsvc_broadband.cgi;h=5a3692e1449febd0480a066edfb1fc9ae7bb1ea0;hp=b07c725aec5ccad9526a0efffb99cf0c66d65b75;hb=c49cfd25a8f92c7a2f44b51d72506a21f6b8d09f;hpb=e5fcc68aab310814b0ba5444bc97ef504e6e16da diff --git a/httemplate/edit/svc_broadband.cgi b/httemplate/edit/svc_broadband.cgi index b07c725ae..5a3692e14 100644 --- a/httemplate/edit/svc_broadband.cgi +++ b/httemplate/edit/svc_broadband.cgi @@ -3,7 +3,7 @@ 'name' => 'broadband service', 'table' => 'svc_broadband', 'fields' => \@fields, - 'field_callback' => $field_callback, + 'svc_field_callback' => $svc_field_callback, 'svc_new_callback' => $svc_edit_callback, 'svc_edit_callback' => $svc_edit_callback, 'svc_error_callback' => $svc_edit_callback, @@ -100,11 +100,40 @@ END ; my @fields = ( - qw( description speed_down speed_up ), - { field=>'sectornum', type=>'select-tower_sector', }, - { field=>'routernum', type=>'select-router_block_ip' }, - qw( mac_addr latitude longitude altitude vlan_profile - performance_profile authkey plan_id ) + qw( description speed_down speed_up speed_test_down speed_test_up speed_test_latency), + { field=>'sectornum', type=>'select-tower_sector', + include_opt_callback => sub { + my $svc_broadband = shift; + my $part_svc = $svc_broadband->part_svc; + my $sectors_only; + foreach ($part_svc->part_export()) { + $sectors_only = '1' if $_->can('require_tower_and_sector'); + } + ## incase export requires a sector and service only has tower attached it will not show on edit. + my $non_option_label; + my $sector = qsearchs({'table' => 'tower_sector', 'hashref' => { 'sectornum' => $svc_broadband->sectornum }, }); + $non_option_label = $sector->description if $sector; + return ('sectorsonly' => $sectors_only, 'non_option_label' => $non_option_label); + }, + }, + { field=>'routernum', type=>'select-router_block_ip', + include_opt_callback => sub { + my $svc_broadband = shift; + my $part_svc = $svc_broadband->part_svc; + return () unless $part_svc; #sanity check + my $col = $part_svc->part_svc_column('ip_addr'); + return () unless $col; #sanity check + $col->set('required', 'Y') unless $conf->exists('svc_broadband-allow_null_ip_addr'); + return ('ip_addr_required' => $col->required); + }, + }, + { field=>'mac_addr' , type=>'input-mac_addr' }, + qw( + latitude longitude altitude + radio_serialnum radio_location poe_location rssi suid + ), + { field=>'shared_svcnum', type=>'search-svc_broadband', }, + qw( vlan_profile performance_profile authkey plan_id ), ); if ( $conf->exists('svc_broadband-radius') ) { @@ -160,20 +189,13 @@ my $svc_edit_callback = sub { } }; -my $field_callback = sub { +my $svc_field_callback = sub { my ($cgi, $object, $fieldref) = @_; my $columndef = $part_svc->part_svc_column($fieldref->{'field'}); - if ($columndef->columnflag eq 'F') { - $fieldref->{'type'} = length($columndef->columnvalue) - ? 'fixed' - : 'hidden'; - $fieldref->{'value'} = $columndef->columnvalue; - - if ( $fieldref->{field} eq 'usergroup' ) { - $fieldref->{'formatted_value'} = - [ $object->radius_groups('long_description') ]; - } + if ($fieldref->{field} eq 'usergroup' && $columndef->columnflag eq 'F') { + $fieldref->{'formatted_value'} = + [ $object->radius_groups('long_description') ]; } };