diff --git a/agc_2-X/trunk/bin/ADMIN_backup.pl b/agc_2-X/trunk/bin/ADMIN_backup.pl index 6bfbf7f2..5aad2612 100644 --- a/agc_2-X/trunk/bin/ADMIN_backup.pl +++ b/agc_2-X/trunk/bin/ADMIN_backup.pl @@ -320,7 +320,7 @@ if ( ($without_db < 1) && ($conf_only < 1) ) while ($sthArows > $rec_count) { @aryA = $sthA->fetchrow_array; - if ($aryA[0] =~ /_log|server_performance|vicidial_ivr|vicidial_hopper|vicidial_manager|web_client_sessions|imm_outcomes|server|^phones|stats|vicidial_list$/) + if ($aryA[0] =~ /_log|server_performance|vicidial_ivr|vicidial_hopper|vicidial_manager|web_client_sessions|imm_outcomes|server|^phones|conferences|stats|vicidial_list$/) { $log_tables .= " $aryA[0]"; } diff --git a/agc_2-X/trunk/bin/AST_VDadapt.pl b/agc_2-X/trunk/bin/AST_VDadapt.pl index c66788f5..f6e7c5d1 100644 --- a/agc_2-X/trunk/bin/AST_VDadapt.pl +++ b/agc_2-X/trunk/bin/AST_VDadapt.pl @@ -1,12 +1,12 @@ #!/usr/bin/perl # -# AST_VDadapt.pl version 2.8 +# AST_VDadapt.pl version 2.10 # # DESCRIPTION: # adjusts the auto_dial_level for vicidial adaptive-predictive campaigns. # gather call stats for campaigns and in-groups # -# Copyright (C) 2013 Matt Florell LICENSE: AGPLv2 +# Copyright (C) 2014 Matt Florell LICENSE: AGPLv2 # # CHANGELOG # 60823-1302 - First build from AST_VDhopper.pl @@ -39,6 +39,7 @@ # 111219-1420 - Added daily stats updates to new table for total, in-group and campaign # 111223-0924 - Added check for logged-in agents # 131122-1314 - Added several missing sthA->finish +# 141109-1957 - Fixed issue #793 # # constants @@ -888,6 +889,8 @@ sub calculate_drops $sthA->finish(); chop($camp_ANS_STAT_SQL); + if (length($camp_ANS_STAT_SQL)<2) + {$camp_ANS_STAT_SQL="'-NONE-'";} $debug_camp_output .= " CAMPAIGN ANSWERED STATUSES: $campaign_id[$i]|$camp_ANS_STAT_SQL|\n"; if ($DBX) {print " CAMPAIGN ANSWERED STATUSES: $campaign_id[$i]|$camp_ANS_STAT_SQL|\n";} @@ -1681,6 +1684,8 @@ sub calculate_drops_inbound } $sthA->finish(); chop($camp_ANS_STAT_SQL); + if (length($camp_ANS_STAT_SQL)<2) + {$camp_ANS_STAT_SQL="'-NONE-'";} if ($DBX) {print " ANSWERED STATUSES: $group_id[$p]|$camp_ANS_STAT_SQL|\n";} $debug_ingroup_output .= " ANSWERED STATUSES: $group_id[$p]|$camp_ANS_STAT_SQL|\n"; diff --git a/agc_2-X/trunk/bin/AST_VDauto_dial.pl b/agc_2-X/trunk/bin/AST_VDauto_dial.pl index dd811158..0b62f4f9 100644 --- a/agc_2-X/trunk/bin/AST_VDauto_dial.pl +++ b/agc_2-X/trunk/bin/AST_VDauto_dial.pl @@ -2047,7 +2047,7 @@ while($one_day_interval > 0) if ($toPAUSEcount > 0) { - $stmtA = "SELECT agent_log_id,user,server_ip,campaign_id from vicidial_live_agents where server_ip='$server_ip' and last_update_time < '$PDtsSQLdate' and status NOT IN('PAUSED');"; + $stmtA = "SELECT agent_log_id,user,server_ip,campaign_id,last_update_time from vicidial_live_agents where server_ip='$server_ip' and last_update_time < '$PDtsSQLdate' and status NOT IN('PAUSED');"; $sthA = $dbhA->prepare($stmtA) or die "preparing: ",$dbhA->errstr; $sthA->execute or die "executing: $stmtA ", $dbhA->errstr; $sthArowsL=$sthA->rows; @@ -2059,6 +2059,8 @@ while($one_day_interval > 0) $LAGuser[$lagged_ids] = $aryA[1]; $LAGserver_ip[$lagged_ids] = $aryA[2]; $LAGcampaign_id[$lagged_ids] = $aryA[3]; + $LAGlast_update_time[$lagged_ids] = $aryA[4]; + if ($DB > 0) {print "LAGGED DEBUG: $lagged_ids|$PDtsSQLdate|$aryA[4]|$aryA[3]|$aryA[2]|$aryA[1]|$aryA[0]|$stmtA|\n";} $lagged_ids++; } $sthA->finish();