From 024ff792bac5bff12b02f08dbdba8134f82fe1dc Mon Sep 17 00:00:00 2001 From: ivan Date: Tue, 11 Nov 2003 14:21:02 +0000 Subject: [PATCH] simple change to cust_svc creation to help imports with svcnums --- 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 7bc155d9d..73e08f239 100644 --- a/FS/FS/svc_Common.pm +++ b/FS/FS/svc_Common.pm @@ -119,9 +119,11 @@ sub insert { my $svcnum = $self->svcnum; my $cust_svc; - unless ( $svcnum ) { + #unless ( $svcnum ) { + if ( ! $svcnum || ! qsearchs('cust_svc',{'svcnum'=>$self->svcnum} ) ) { $cust_svc = new FS::cust_svc ( { #hua?# 'svcnum' => $svcnum, + 'svcnum' => $self->svcnum, 'pkgnum' => $self->pkgnum, 'svcpart' => $self->svcpart, } ); -- 2.11.0