From 1fa379f596dd95694ed4e37a19afd44d8e47e82a Mon Sep 17 00:00:00 2001
From: Jeremy Davis <jeremyd@freeside.biz>
Date: Mon, 29 Jun 2015 07:04:53 -0400
Subject: [PATCH] Ticket #36843 Fix incorrect call error

---
 FS/FS/cdr/broadsoft.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/FS/FS/cdr/broadsoft.pm b/FS/FS/cdr/broadsoft.pm
index b5d75f13f..a6f4d01c0 100644
--- a/FS/FS/cdr/broadsoft.pm
+++ b/FS/FS/cdr/broadsoft.pm
@@ -39,7 +39,8 @@ use FS::cdr qw( _cdr_date_parser_maker _cdr_min_parser_maker );
     skip(17),
     sub { my($cdr, $accountcode) = @_;
     if ($cdr->is_tollfree){
-        $cdr->set('accountcode', $cdr->dst);
+	my $dst = substr($cdr->dst,0,32);
+        $cdr->set('accountcode', $dst);
     } else {
         $cdr->set('accountcode', $accountcode);
     }},
-- 
2.11.0