diff options
| author | Jeremy Davis <jeremyd@freeside.biz> | 2014-05-22 16:20:44 -0400 |
|---|---|---|
| committer | Jeremy Davis <jeremyd@freeside.biz> | 2014-05-22 16:20:44 -0400 |
| commit | dcd86d74f29aeb419890e5e989877305d2aaf59f (patch) | |
| tree | 6027f07d6ba58316866f1d27e6bbfea0240fda0b | |
| parent | 6793561f9463f93c211917cc6f5bd57ab8d1ca5e (diff) | |
29049 Fix date formatting in Zintel format
| -rw-r--r-- | FS/FS/cdr/zintel.pm | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/FS/FS/cdr/zintel.pm b/FS/FS/cdr/zintel.pm index 0e44844dd..7d78d1153 100644 --- a/FS/FS/cdr/zintel.pm +++ b/FS/FS/cdr/zintel.pm @@ -16,14 +16,7 @@ use FS::cdr qw(_cdr_date_parser_maker); 'accountcode', #customer 'src', #anumber 'dst', #bnumber - sub { # OriginatingDate and OriginatingTime, two fields in the spec - my ($cdr, $date) = @_; - $date =~ /^(\d{2})\/(\d{2})\/(\d{4})\s*(\d{2}):(\d{2}):(\d{2})$/ - or die "unparseable date: $date"; - my $tmp_date = "$2/$1/$3 $4:$5:$6"; - $cdr->calldate($tmp_date); - },#datetime - + 'calldate', #datetime 'billsec', #duration skip(3), #calltype #status |