projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Ticket #31495 Earthlink CDR
[freeside.git]
/
FS
/
FS
/
cdr
/
broadsoft.pm
diff --git
a/FS/FS/cdr/broadsoft.pm
b/FS/FS/cdr/broadsoft.pm
index
559aa28
..
b5d75f1
100644
(file)
--- a/
FS/FS/cdr/broadsoft.pm
+++ b/
FS/FS/cdr/broadsoft.pm
@@
-23,7
+23,7
@@
use FS::cdr qw( _cdr_date_parser_maker _cdr_min_parser_maker );
'' }, # 3: type
skip(2),
'' }, # 3: type
skip(2),
-
dcontext,
# 6: direction
+
'dcontext',
# 6: direction
trim('src'), # 7: callingNumber
skip(1),
trim('dst'), # 9: calledNumber
trim('src'), # 7: callingNumber
skip(1),
trim('dst'), # 9: calledNumber
@@
-37,7
+37,12
@@
use FS::cdr qw( _cdr_date_parser_maker _cdr_min_parser_maker );
_cdr_date_parser_maker('answerdate'), # 13: answerTime
_cdr_date_parser_maker('enddate'), # 14: releaseTime
skip(17),
_cdr_date_parser_maker('answerdate'), # 13: answerTime
_cdr_date_parser_maker('enddate'), # 14: releaseTime
skip(17),
- accountcode, # 32: group
+ sub { my($cdr, $accountcode) = @_;
+ if ($cdr->is_tollfree){
+ $cdr->set('accountcode', $cdr->dst);
+ } else {
+ $cdr->set('accountcode', $accountcode);
+ }},
],
);
],
);