From 54467297cc7f4ec43a62007e9c4ce6f700ad3fc7 Mon Sep 17 00:00:00 2001
From: Owen Leonard <owen@balawis.leonard.fam>
Date: Thu, 21 Oct 2010 12:04:37 -0600
Subject: [PATCH] fixed import script so it creates the visit data properly

---
 bin/import_ward_data | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/bin/import_ward_data b/bin/import_ward_data
index e0fbb2b..57d450f 100755
--- a/bin/import_ward_data
+++ b/bin/import_ward_data
@@ -596,7 +596,7 @@ sub update_tc_visit_table
 			my $importing_status = $visit_status{$history[$i]};
 			#print "importing_status = $importing_status\n";
 			#print "select * from tc_visit where family=$family_id and companionship=$comp_id and date='$visit_date'\n";
-			$sth = $dbh->prepare("select * from tc_visit where family=$family_id and companionship=$comp_id and date='$visit_date'");
+			$sth = $dbh->prepare("select * from tc_visit where family=$family_id and date='$visit_date'");
 			$sth->execute or die "-E- DB error: $DBI::errstr\n";
 			my @visit_data = ();
 			while($sqlhashref = $sth->fetchrow_hashref) { push(@visit_data, $sqlhashref); }
-- 
2.34.1