diff options
author | Jeremy Davis <jeremyd@freeside.biz> | 2014-10-16 16:26:05 -0400 |
---|---|---|
committer | Jeremy Davis <jeremyd@freeside.biz> | 2014-10-16 16:26:05 -0400 |
commit | 83f29f7300305134cb0c2e680ca7346927d4e9fe (patch) | |
tree | 07de698a581612a800df3823c1def1f3d482fea9 /FS/FS/cdr/zintel.pm | |
parent | c5c8e792b4f4940029bb7a3385e35166a3787220 (diff) |
Ticket #31413 Properly import consolidated local calls
Diffstat (limited to 'FS/FS/cdr/zintel.pm')
-rw-r--r-- | FS/FS/cdr/zintel.pm | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/FS/FS/cdr/zintel.pm b/FS/FS/cdr/zintel.pm index 1d2236c..eb08038 100644 --- a/FS/FS/cdr/zintel.pm +++ b/FS/FS/cdr/zintel.pm @@ -16,7 +16,17 @@ use Date::Parse; 'accountcode', #customer 'src', #anumber - 'dst', #bnumber + sub { my ($cdr, $dst) = @_; # Handling cosolidated local calls in the CDR formats + + my $src = $cdr->src; + + if ($dst =~ /^64\/U$/) { + $cdr->set('dst', $src); + } else { + $cdr->set('dst', $dst); + } + }, #bnumber + sub { my ($cdr, $calldate) = @_; $cdr->set('calldate', $calldate); |