From 267aa3cd085d1563915207b5bb31df8dc3ab2fb8 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Tue, 11 Nov 2003 14:39:08 +0000
Subject: [PATCH] fix up virtual field reprucussions

---
 FS/FS/svc_Common.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/FS/FS/svc_Common.pm b/FS/FS/svc_Common.pm
index 73e08f239..fa7996d70 100644
--- a/FS/FS/svc_Common.pm
+++ b/FS/FS/svc_Common.pm
@@ -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 = '';
-- 
2.20.1