From f07f36013d80e1a0c82f0ab72ef69bae3d3d342c Mon Sep 17 00:00:00 2001
From: mattf <mattf@3d104415-ff17-0410-8863-d5cf3c621b8a>
Date: Thu, 17 Oct 2013 10:30:12 +0000
Subject: [PATCH] Fixed small issues in nanpa filter scripts with the exclude
 options

git-svn-id: svn://192.168.202.10@2038 3d104415-ff17-0410-8863-d5cf3c621b8a
---
 agc_2-X/trunk/bin/nanpa_type_filter.pl  | 2 +-
 agc_2-X/trunk/bin/nanpa_type_preload.pl | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/agc_2-X/trunk/bin/nanpa_type_filter.pl b/agc_2-X/trunk/bin/nanpa_type_filter.pl
index ae11d324..c758a3ae 100644
--- a/agc_2-X/trunk/bin/nanpa_type_filter.pl
+++ b/agc_2-X/trunk/bin/nanpa_type_filter.pl
@@ -302,7 +302,7 @@ if ($output_to_db)
 @phones=@MT;
 
 $excludeSQL='';
-if ( (length($exclude_field) > 1) && (length($exclude_value) > 1) ) 
+if ( (length($exclude_field) > 1) && (length($exclude_value) > 0) ) 
 	{
 	if (length($list_idSQL) > 5)
 		{
diff --git a/agc_2-X/trunk/bin/nanpa_type_preload.pl b/agc_2-X/trunk/bin/nanpa_type_preload.pl
index 9ae63a7f..2009e3e0 100644
--- a/agc_2-X/trunk/bin/nanpa_type_preload.pl
+++ b/agc_2-X/trunk/bin/nanpa_type_preload.pl
@@ -271,7 +271,7 @@ if (!%six_digit_wireless_hash) {&CompilePrefixHashes;}
 @phones=@MT;
 
 $excludeSQL='';
-if ( (length($exclude_field) > 1) && (length($exclude_value) > 1) ) 
+if ( (length($exclude_field) > 1) && (length($exclude_value) > 0) ) 
 	{
 	if (length($list_idSQL) > 5)
 		{
@@ -283,7 +283,7 @@ if ( (length($exclude_field) > 1) && (length($exclude_value) > 1) )
 		}
 	}
 
-$stmtA = "SELECT lead_id,phone_number from vicidial_list $list_idSQL;";
+$stmtA = "SELECT lead_id,phone_number from vicidial_list $list_idSQL $excludeSQL;";
 $sthA = $dbhA->prepare($stmtA) or die "preparing: ",$dbhA->errstr;
 $sthA->execute or die "executing: $stmtA ", $dbhA->errstr;
 $sthArows=$sthA->rows;