diff options
| -rw-r--r-- | bin/artera.import | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/bin/artera.import b/bin/artera.import index f7def1bbe..41cbe4b70 100644 --- a/bin/artera.import +++ b/bin/artera.import @@ -47,6 +47,9 @@ while (<>) { # warn "can't find domain $domain\n"; } + my $exist = qsearchs('svc_external', { 'id' => $serial } ); + next if $exist; + my $svc_external = new FS::svc_external { 'svcpart' => $svcpart, 'pkgnum' => ( $cust_svc ? $cust_svc->pkgnum : '' ), @@ -55,6 +58,10 @@ while (<>) { }; #my $error = $svc_external->check; my $error = $svc_external->insert; + if ( $cust_svc && $error =~ /^Already/ ) { + $svc_external->pkgnum(''); + $error = $svc_external->insert; + } die $error if $error; $num++; |