From ea1bf74be79312c82241e366063f31ec845a1a85 Mon Sep 17 00:00:00 2001 From: mattf Date: Wed, 6 Sep 2006 20:22:27 +0000 Subject: [PATCH] small change to AST_manager_listen.pl for local conferences git-svn-id: svn://192.168.202.10@252 3d104415-ff17-0410-8863-d5cf3c621b8a --- agc_2-X/trunk/bin/AST_manager_listen.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/agc_2-X/trunk/bin/AST_manager_listen.pl b/agc_2-X/trunk/bin/AST_manager_listen.pl index 5cc02cfd..73380a0b 100644 --- a/agc_2-X/trunk/bin/AST_manager_listen.pl +++ b/agc_2-X/trunk/bin/AST_manager_listen.pl @@ -335,7 +335,7 @@ while($one_day_interval > 0) $channel =~ s/Channel: |\s*$//gi; $uniqueid = $command_line[3]; $uniqueid =~ s/Uniqueid: |\s*$//gi; - $stmtA = "UPDATE vicidial_manager set status='DEAD', channel='$channel' where server_ip = '$server_ip' and uniqueid = '$uniqueid'"; + $stmtA = "UPDATE vicidial_manager set status='DEAD', channel='$channel' where server_ip = '$server_ip' and uniqueid = '$uniqueid' and callerid NOT LIKE \"DCagcW%\";"; print STDERR "|$stmtA|\n"; my $affected_rows = $dbhA->do($stmtA); @@ -350,7 +350,7 @@ while($one_day_interval > 0) $channel =~ s/Channel: |\s*$//gi; $uniqueid = $command_line[4]; $uniqueid =~ s/Uniqueid: |\s*$//gi; - $stmtA = "UPDATE vicidial_manager set status='DEAD', channel='$channel' where server_ip = '$server_ip' and uniqueid = '$uniqueid'"; + $stmtA = "UPDATE vicidial_manager set status='DEAD', channel='$channel' where server_ip = '$server_ip' and uniqueid = '$uniqueid' and callerid NOT LIKE \"DCagcW%"; print STDERR "|$stmtA|\n"; my $affected_rows = $dbhA->do($stmtA); @@ -362,7 +362,7 @@ while($one_day_interval > 0) $channel =~ s/Channel: |\s*$//gi; $uniqueid = $command_line[2]; $uniqueid =~ s/Uniqueid: |\s*$//gi; - $stmtA = "UPDATE vicidial_manager set status='DEAD', channel='$channel' where server_ip = '$server_ip' and uniqueid = '$uniqueid'"; + $stmtA = "UPDATE vicidial_manager set status='DEAD', channel='$channel' where server_ip = '$server_ip' and uniqueid = '$uniqueid' and callerid NOT LIKE \"DCagcW%"; print STDERR "|$stmtA|\n"; my $affected_rows = $dbhA->do($stmtA);