diff options
| author | ivan <ivan> | 2008-12-03 17:25:44 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2008-12-03 17:25:44 +0000 |
| commit | e3c53b20ac5a7e120562bbd259a19707e9c11cb5 (patch) | |
| tree | 81ee2b7a63cb1bf92cfb088bfdf9b56a75f6804c | |
| parent | fd2f5af1240d64dc710b25bd9e4b7ffa5878c568 (diff) | |
fix internal_diddb to default to countrycode 1
| -rw-r--r-- | FS/FS/part_export/internal_diddb.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/FS/FS/part_export/internal_diddb.pm b/FS/FS/part_export/internal_diddb.pm index aa04b773a..c30d858ac 100644 --- a/FS/FS/part_export/internal_diddb.pm +++ b/FS/FS/part_export/internal_diddb.pm @@ -25,7 +25,7 @@ sub get_dids { my $self = shift; my %opt = ref($_[0]) ? %{$_[0]} : @_; - my %hash = ( 'countrycode' => $self->option('countrycode'), + my %hash = ( 'countrycode' => ( $self->option('countrycode') || '1' ), 'exportnum' => $self->exportnum, 'svcnum' => '', ); @@ -80,7 +80,7 @@ sub _export_insert { #link phone_avail to svcnum my( $npa, $nxx, $station ) = ($1, $2, $3); my $phone_avail = qsearchs('phone_avail', { - 'countrycode' => $self->option('countrycode'), + 'countrycode' => ( $self->option('countrycode') || '1' ), 'exportnum' => $self->exportnum, 'svcnum' => '', 'npa' => $npa, @@ -105,7 +105,7 @@ sub _export_delete { #unlink phone_avail from svcnum my( $npa, $nxx, $station ) = ($1, $2, $3); my $phone_avail = qsearchs('phone_avail', { - 'countrycode' => $self->option('countrycode'), + 'countrycode' => ( $self->option('countrycode') || '1'), 'exportnum' => $self->exportnum, 'svcnum' => $svc_phone->svcnum, #these too? |