projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug fix: checking ref() instead of defined()
[freeside.git]
/
FS
/
FS
/
tower_sector.pm
diff --git
a/FS/FS/tower_sector.pm
b/FS/FS/tower_sector.pm
index
3605190
..
4fbd89c
100644
(file)
--- a/
FS/FS/tower_sector.pm
+++ b/
FS/FS/tower_sector.pm
@@
-1,10
+1,7
@@
package FS::tower_sector;
package FS::tower_sector;
+use base qw( FS::Record );
use strict;
use strict;
-use base qw( FS::Record );
-use FS::Record qw( qsearch qsearchs );
-use FS::tower;
-use FS::svc_broadband;
=head1 NAME
=head1 NAME
@@
-108,6
+105,11
@@
sub check {
|| $self->ut_number('towernum', 'tower', 'towernum')
|| $self->ut_text('sectorname')
|| $self->ut_textn('ip_addr')
|| $self->ut_number('towernum', 'tower', 'towernum')
|| $self->ut_text('sectorname')
|| $self->ut_textn('ip_addr')
+ || $self->ut_floatn('height')
+ || $self->ut_numbern('freq_mhz')
+ || $self->ut_numbern('direction')
+ || $self->ut_numbern('width')
+ || $self->ut_floatn('sector_range')
;
return $error if $error;
;
return $error if $error;
@@
-118,13
+120,6
@@
sub check {
Returns the tower for this sector, as an FS::tower object (see L<FS::tower>).
Returns the tower for this sector, as an FS::tower object (see L<FS::tower>).
-=cut
-
-sub tower {
- my $self = shift;
- qsearchs('tower', { 'towernum'=>$self->towernum } );
-}
-
=item description
Returns a description for this sector including tower name.
=item description
Returns a description for this sector including tower name.
@@
-145,13
+140,6
@@
sub description {
Returns the services on this tower sector.
Returns the services on this tower sector.
-=cut
-
-sub svc_broadband {
- my $self = shift;
- qsearch('svc_broadband', { 'sectornum' => $self->sectornum });
-}
-
=back
=head1 BUGS
=back
=head1 BUGS