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:41 -0700 |
commit | 3ac361c2b6b52209436b828be21ef8c416ba8ffc (patch) | |
tree | 94c9400041c755b21ee2bb1fe95dcedc20957a00 /FS/FS/cdr | |
parent | e71dd08fc2e0aa3ee8cdbeb4e1f39f04898f773b (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 ], ); |