X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2Fbin%2Ffreeside-cdr-evariste-import;h=a875d1365e0c4a9b1fc79bdd07f8297e0bccbb23;hb=dc83512c36dc6bea2585abada4f88d714c600e55;hp=0487ae53933eaa2480a0edfbf3bdac30e9b811fb;hpb=52e2e7880c1cb061cac6896613abf17eea5df13f;p=freeside.git diff --git a/FS/bin/freeside-cdr-evariste-import b/FS/bin/freeside-cdr-evariste-import index 0487ae539..a875d1365 100755 --- a/FS/bin/freeside-cdr-evariste-import +++ b/FS/bin/freeside-cdr-evariste-import @@ -2,7 +2,7 @@ use strict; -use DBI; +use FS::DBI; use Date::Format 'time2str'; use Date::Parse 'str2time'; use Getopt::Long; @@ -65,8 +65,8 @@ if ($enddate) { } $enddate ||= time2str("%Y-%m-%d %H:%M:%S",$now); -my $cdbh = DBI->connect("dbi:Pg:database=$db;host=$host", $username, $password) - or die $DBI::errstr; +my $cdbh = FS::DBI->connect("dbi:Pg:database=$db;host=$host", $username, $password) + or die $FS::DBI::errstr; # selecting by end_time rather than start_time # so we don't lose records between batches @@ -100,7 +100,7 @@ while (my $row = $csth->fetchrow_hashref) { 'cdrbatchnum' => $cdr_batch->cdrbatchnum, 'uniqueid' => $row->{'id'}, 'src' => $row->{'src'}, - 'dst' => $row->{'dest'}, + 'dst' => $row->{'routing_target'} || $row->{'dest'}, # dest_orig? dest_trans? 'startdate' => int(str2time($row->{'start_time'})), 'answerdate' => int(str2time($row->{'answer_time'})), 'enddate' => int(str2time($row->{'end_time'})),