From 98da5911184f1504b3e510c4d14fbcd0842cd0d2 Mon Sep 17 00:00:00 2001 From: mattf Date: Wed, 31 Jan 2018 17:14:02 +0000 Subject: [PATCH] Bug fix for new Inbound No-Agent No-Dial feature git-svn-id: svn://192.168.202.10@2901 3d104415-ff17-0410-8863-d5cf3c621b8a --- agc_2-X/trunk/bin/AST_VDauto_dial.pl | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/agc_2-X/trunk/bin/AST_VDauto_dial.pl b/agc_2-X/trunk/bin/AST_VDauto_dial.pl index 2c2fe6ff..72231526 100644 --- a/agc_2-X/trunk/bin/AST_VDauto_dial.pl +++ b/agc_2-X/trunk/bin/AST_VDauto_dial.pl @@ -861,12 +861,14 @@ while($one_day_interval > 0) $sthA->execute or die "executing: $stmtA ", $dbhA->errstr; $sthArows=$sthA->rows; if ($DBX) {print "$sthArows|$stmtA\n";} - if ($sthArows > 0) + $u=0; + while ($sthArows > $u) { @aryA = $sthA->fetchrow_array; $DBIPinand_users[$user_CIPct] .= "'$aryA[0]',"; - $DBIPinand_users[$user_CIPct] =~ s/,$//gi; + $u++; } + $DBIPinand_users[$user_CIPct] =~ s/,$//gi; $sthA->finish(); if (length($DBIPinand_users[$user_CIPct]) > 2) @@ -885,6 +887,7 @@ while($one_day_interval > 0) { $DBIPinbound_no_agents_no_dial_trigger[$user_CIPct]=0; } + if ($DBX) {print "DEBUG: INBOUND NO-AGENT Agents: $DBIPinand_agent_ready_count[$user_CIPct] Threshold: $DBIPinbound_no_agents_no_dial_threshold[$user_CIPct]\n";} } $sthA->finish(); }