X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2Fbin%2Ffreeside-cdr-asterisk_sql;h=4d4d6487e9126cb4e21e346ff473545e939946e0;hb=1259a17db297fa2352619b29f2c5bd34e313cd64;hp=160780bde990c62b8d8d8d7a96bd8c110f3d9750;hpb=f263d9c5f3fa07442faadd9000aaad7275892f8e;p=freeside.git diff --git a/FS/bin/freeside-cdr-asterisk_sql b/FS/bin/freeside-cdr-asterisk_sql index 160780bde..4d4d6487e 100755 --- a/FS/bin/freeside-cdr-asterisk_sql +++ b/FS/bin/freeside-cdr-asterisk_sql @@ -26,23 +26,25 @@ adminsuidsetup $user; my $fsdbh = FS::UID::dbh; -# check for existence of freesidestatus my $table = $opt{T} || 'cdr'; -my $status = $dbi->selectall_arrayref("SHOW COLUMNS FROM $table WHERE Field = 'freesidestatus'"); -if( ! @$status ) { - print "Adding freesidestatus column...\n"; - $dbi->do("ALTER TABLE $table ADD COLUMN freesidestatus varchar(32)") - or die $dbi->errstr; -} -else { - print "freesidestatus column present\n"; + +# check for existence of freesidestatus +if ( $engine =~ /^mysql/ ) { + my $status = $dbi->selectall_arrayref("SHOW COLUMNS FROM $table WHERE Field = 'freesidestatus'"); + if( ! @$status ) { + print "Adding freesidestatus column...\n"; + $dbi->do("ALTER TABLE $table ADD COLUMN freesidestatus varchar(32)") + or die $dbi->errstr; + } else { + print "freesidestatus column present\n"; + } } my @cols = ( qw( calldate clid src dst dcontext channel lastapp lastdata duration billsec disposition amaflags accountcode uniqueid userfield) ); my $sql = 'SELECT '.join(',', @cols). " FROM $table WHERE freesidestatus IS NULL"; -my $sth = $sql->prepare($sql); +my $sth = $dbi->prepare($sql); $sth->execute; print "Importing ".$sth->rows." records...\n";