small manual dial bug fix, issue 271

git-svn-id: svn://192.168.202.10@1308 3d104415-ff17-0410-8863-d5cf3c621b8a
This commit is contained in:
mattf
2010-01-16 21:47:32 +00:00
parent bcac242cda
commit bc5a85314a
2 changed files with 34 additions and 0 deletions
@@ -574,6 +574,23 @@ sub process_request
if ($carrier_logging_active > 0)
{
if ($callerid =~ /^M/)
{
$beginUNIQUEID = $unique_id;
$beginUNIQUEID =~ s/\..*//gi;
$stmtA = "SELECT uniqueid FROM call_log where uniqueid LIKE \"$beginUNIQUEID%\" and caller_code LIKE \"%$CIDlead_id\";";
$sthA = $dbhA->prepare($stmtA) or die "preparing: ",$dbhA->errstr;
$sthA->execute or die "executing: $stmtA ", $dbhA->errstr;
$sthArows=$sthA->rows;
$rec_count=0;
if ($sthArows > 0)
{
@aryA = $sthA->fetchrow_array;
$unique_id = $aryA[0];
$uniqueid = $aryA[0];
}
$sthA->finish();
}
$stmtA = "INSERT IGNORE INTO vicidial_carrier_log set uniqueid='$uniqueid',call_date='$now_date',server_ip='$VARserver_ip',lead_id='$CIDlead_id',hangup_cause='$hangup_cause',dialstatus='$dialstatus',channel='$channel',dial_time='$dial_time',answered_time='$answered_time';";
if ($AGILOG) {$agi_string = "|$stmtA|"; &agi_output;}
$VCARaffected_rows = $dbhA->do($stmtA);
+17
View File
@@ -574,6 +574,23 @@ sub process_request
if ($carrier_logging_active > 0)
{
if ($callerid =~ /^M/)
{
$beginUNIQUEID = $unique_id;
$beginUNIQUEID =~ s/\..*//gi;
$stmtA = "SELECT uniqueid FROM call_log where uniqueid LIKE \"$beginUNIQUEID%\" and caller_code LIKE \"%$CIDlead_id\";";
$sthA = $dbhA->prepare($stmtA) or die "preparing: ",$dbhA->errstr;
$sthA->execute or die "executing: $stmtA ", $dbhA->errstr;
$sthArows=$sthA->rows;
$rec_count=0;
if ($sthArows > 0)
{
@aryA = $sthA->fetchrow_array;
$unique_id = $aryA[0];
$uniqueid = $aryA[0];
}
$sthA->finish();
}
$stmtA = "INSERT IGNORE INTO vicidial_carrier_log set uniqueid='$uniqueid',call_date='$now_date',server_ip='$VARserver_ip',lead_id='$CIDlead_id',hangup_cause='$hangup_cause',dialstatus='$dialstatus',channel='$channel',dial_time='$dial_time',answered_time='$answered_time';";
if ($AGILOG) {$agi_string = "|$stmtA|"; &agi_output;}
$VCARaffected_rows = $dbhA->do($stmtA);