fix up virtual field reprucussions
authorivan <ivan>
Tue, 11 Nov 2003 14:39:08 +0000 (14:39 +0000)
committerivan <ivan>
Tue, 11 Nov 2003 14:39:08 +0000 (14:39 +0000)
FS/FS/svc_Common.pm

index 73e08f2..fa7996d 100644 (file)
@@ -49,7 +49,9 @@ sub virtual_fields {
 
   if ($self->svcpart) { # Case 1
     $svcpart = $self->svcpart;
-  } elsif ( $self->svcnum ) { #Case 2
+  } elsif ( $self->svcnum
+            && qsearchs('cust_svc',{'svcnum'=>$self->svcnum} )
+          ) { #Case 2
     $svcpart = $self->cust_svc->svcpart;
   } else { # Case 3
     $svcpart = '';