removed companion1 and companion2 from tc_visit
[eq/.git] / bin / import_ward_data
index ae20ab741372e1fe42dcf13024ed49d6e96dfe63..2234b8a2e63ae3901bda8c6421c51fd2fa53228b 100755 (executable)
@@ -615,7 +615,7 @@ sub update_tc_visit_table
                                if ($importing_status ne '')
                                {
                                        # add visit if it doesn't exist in tc_visit
-                                       $sth = $dbh->prepare("insert into tc_visit values (NULL, '$family_id', '$comp_id', '', '', '$visit_date', '', '$importing_status', 'H')");
+                                       $sth = $dbh->prepare("insert into tc_visit values (NULL, '$family_id', '$comp_id', '$visit_date', '', '$importing_status', 'H')");
                                        $sth->execute or die "-E- DB error: $DBI::errstr\n";
                                }
                        }