Ticket 29048 Fix date formatting
[freeside.git] / FS / FS / cdr / cx3.pm
index a1e2e93..7f1222e 100644 (file)
@@ -30,8 +30,10 @@ use Date::Parse;
        skip(1),                
        sub { my ($cdr, $calldate, $param) = @_;
 
-               $cdr->set('calldate', $calldate);
-       },              #date
+                my $date = str2time($calldate);
+                $cdr->set('startdate', $date);
+
+        },              #date
        skip(4),          
        'accountcode',  # AccountCode
        skip(6),