diff options
author | Mark Wells <mark@freeside.biz> | 2016-10-19 15:49:41 -0700 |
---|---|---|
committer | Mark Wells <mark@freeside.biz> | 2016-10-19 15:49:55 -0700 |
commit | 6bedaa238d2fe631f7550a15ad8101a87eac2ced (patch) | |
tree | 3db652a3ba76bedb5d5a8a7a5bbc04b626b62be2 /FS/FS/cdr | |
parent | 5f7dbb0df2ef71723ae34fd151525994a3b82956 (diff) |
in CallPlus CDR import, mark international calls as international, #72264
Diffstat (limited to 'FS/FS/cdr')
-rw-r--r-- | FS/FS/cdr/callplus.pm | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/FS/FS/cdr/callplus.pm b/FS/FS/cdr/callplus.pm index fa6c799..1fcfa63 100644 --- a/FS/FS/cdr/callplus.pm +++ b/FS/FS/cdr/callplus.pm @@ -51,7 +51,14 @@ use Time::Local 'timelocal'; $value =~ s/^\$//; $cdr->upstream_price($value); }, - skip(4), # Smartcode, Smartcode Description, Type, SubType + skip(2), # Smartcode, Smartcode Description + sub { # Type. "I" = international, which matters. + my ($cdr, $value) = @_; + if ($value eq 'I') { + $cdr->set('dst', '+' . $cdr->dst); + } # else leave it alone + }, + '', # SubType ], ); |