projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
RT# 82988 - fixed resolve credit batches from RBC
[freeside.git]
/
FS
/
bin
/
freeside-cdr-asterisk_sql
diff --git
a/FS/bin/freeside-cdr-asterisk_sql
b/FS/bin/freeside-cdr-asterisk_sql
index
e32ccfe
..
7e3c447
100755
(executable)
--- a/
FS/bin/freeside-cdr-asterisk_sql
+++ b/
FS/bin/freeside-cdr-asterisk_sql
@@
-7,7
+7,7
@@
use Date::Format 'time2str';
use FS::UID qw(adminsuidsetup dbh);
use FS::Log;
use FS::cdr;
use FS::UID qw(adminsuidsetup dbh);
use FS::Log;
use FS::cdr;
-use DBI;
+use
FS::
DBI;
use Getopt::Std;
$DEBUG = 0;
use Getopt::Std;
$DEBUG = 0;
@@
-26,7
+26,7
@@
adminsuidsetup $user;
my $log = FS::Log->new( 'freeside-cdr-asterisk_sql' );
my $log = FS::Log->new( 'freeside-cdr-asterisk_sql' );
-my $dbi = DBI->connect($dsn, $opt{U}, $opt{P}) ;
+my $dbi =
FS::
DBI->connect($dsn, $opt{U}, $opt{P}) ;
if ( $dbi ) {
log_msg( info => "Established connection to CDR database at dsn($dsn)" );
if ( $dbi ) {
log_msg( info => "Established connection to CDR database at dsn($dsn)" );
@@
-34,7
+34,7
@@
if ( $dbi ) {
log_and_die( error =>
sprintf 'Fatal error connecting to CDR database at dsn(%s): %s',
$dsn,
log_and_die( error =>
sprintf 'Fatal error connecting to CDR database at dsn(%s): %s',
$dsn,
- $DBI::errstr
+ $
FS::
DBI::errstr
);
}
);
}