X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=bin%2Fartera.import;h=716dddad07e0a2c106324532d2e1907b091b2876;hp=f7def1bbed0eeb83240d34fe01790e7d26d4a00c;hb=5f4099e52bd894d644c676ea75e1b0cb588393c8;hpb=787275a5f36e80bf26e2cf592592acc3e3f179db diff --git a/bin/artera.import b/bin/artera.import index f7def1bbe..716dddad0 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,7 +58,12 @@ while (<>) { }; #my $error = $svc_external->check; my $error = $svc_external->insert; - die $error if $error; + if ( $cust_svc && $error =~ /^Already/ ) { + warn $error; + $svc_external->pkgnum(''); + $error = $svc_external->insert; + } + warn $error if $error; $num++; $linked++ if $cust_svc;