X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcdr%2Ftransnexus.pm;h=0ed7ad4ef7ce84e988c0d361798607f0e09ed853;hb=dafdfc24616b04a5ff594da31e2cdd03f58634b6;hp=573a8b16dcab0dccafe026e01a1514b2f7adb960;hpb=a0b2c1a1ac9da3b33bc088dab0af77f6555428f7;p=freeside.git

diff --git a/FS/FS/cdr/transnexus.pm b/FS/FS/cdr/transnexus.pm
index 573a8b16d..0ed7ad4ef 100644
--- a/FS/FS/cdr/transnexus.pm
+++ b/FS/FS/cdr/transnexus.pm
@@ -3,6 +3,7 @@ package FS::cdr::transnexus;
 use strict;
 use base qw( FS::cdr );
 use vars qw( %info );
+use MIME::Base64;
 use FS::cdr qw( _cdr_date_parser_maker _cdr_min_parser_maker );
 
 %info = (
@@ -14,12 +15,12 @@ use FS::cdr qw( _cdr_date_parser_maker _cdr_min_parser_maker );
   #listref of what to do with each field from the CDR, in order
   'import_fields' => [
 
-    _cdr_date_parser_maker('startddate'), #O_CallStartTime
+    _cdr_date_parser_maker('startddate'),        #O_CallStartTime
     'src',            #CallingNumberReported
     'dst',            #CalledNumberReported
     'channel',        #SourceDeviceName      / O_ReportingDeviceName
     'dstchannel',     #O_ReportingDeviceName / DestinationDeviceName
-    'clid',           #CallId
+    sub { $_[0]->clid( decode_base64($_[1]) ); }, #CallId
     'uniqueid',       #TransactionId
     'duration',       #RatedDuration
     'billsec',        #O_BillingDuration