X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcdr%2Fbroadsoft.pm;h=b5d75f13fce26771bb85dd7568a3c3c534c7a86b;hb=4716b68d53f303a7a1b4c9702f02a097fee2b1c0;hp=21b373ca9c5bf5d2ebe5f05657d31d2c2c1d06c4;hpb=b3e1b5efd657b952a441728f0ee6f88c03263fef;p=freeside.git diff --git a/FS/FS/cdr/broadsoft.pm b/FS/FS/cdr/broadsoft.pm index 21b373ca9..b5d75f13f 100644 --- a/FS/FS/cdr/broadsoft.pm +++ b/FS/FS/cdr/broadsoft.pm @@ -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), - 'accountcode', # 32: group + sub { my($cdr, $accountcode) = @_; + if ($cdr->is_tollfree){ + $cdr->set('accountcode', $cdr->dst); + } else { + $cdr->set('accountcode', $accountcode); + }}, ], );