import torrus 1.0.9
[freeside.git] / FS / FS / phone_avail.pm
index f05f05b..967d717 100644 (file)
@@ -2,9 +2,10 @@ package FS::phone_avail;
 
 use strict;
 use vars qw( @ISA $DEBUG $me );
-use FS::Record qw( qsearch qsearchs );
+use FS::Record qw( qsearch qsearchs dbh );
+use FS::cust_svc;
 
-@ISA = qw(FS::Record);
+@ISA = qw(FS::cust_main_Mixin FS::Record);
 
 $me = '[FS::phone_avail]';
 $DEBUG = 0;
@@ -151,6 +152,16 @@ sub check {
   $self->SUPER::check;
 }
 
+=item cust_svc
+
+=cut
+
+sub cust_svc {
+  my $self = shift;
+  return '' unless $self->svcnum;
+  qsearchs('cust_svc', { 'svcnum' => $self->svcnum });
+}
+
 sub process_batch_import {
   my $job = shift;