X-Git-Url: http://git.pippins.net/embedvideo/.git/?a=blobdiff_plain;ds=sidebyside;f=bin%2Fimport_ward_data;h=a9e70c6f3136a709f74afd4ae9fd72b8c4697bb7;hb=7536f56a8181f8024ae8da99bc31d7b1c43934a8;hp=68ee95d2d60ced3d2bd1a40a0a8227b5f7482be8;hpb=9a75791763c8726d0291b1486e3180b04e2f0620;p=eq%2F.git

diff --git a/bin/import_ward_data b/bin/import_ward_data
index 68ee95d..a9e70c6 100755
--- a/bin/import_ward_data
+++ b/bin/import_ward_data
@@ -402,6 +402,8 @@ sub update_tc_visit_table
 	($second, $minute, $hour, $dayOfMonth, $month, $yearOffset, $dayOfWeek, $dayOfYear, $daylightSavings) = localtime();
 	my %visit_status = ('X', 'y', '-', 'n', '', '');
 	
+	$sth = $dbh->prepare("TRUNCATE TABLE tc_visit");
+	$sth->execute or die "-E- DB error: $DBI::errstr\n";
 	foreach $index (keys %hometeaching_stats_data)
 	{
 		$hashref = $hometeaching_stats_data{$index};
@@ -448,7 +450,7 @@ sub update_tc_visit_table
 		#print "$month_header\n";
 		#print $hometeaching_stats_data{$index}{$month_header};
 		#print "\n";
-		foreach $i (reverse(0..$#history)) {
+		foreach $i (reverse(0..$#history-1)) {
 			# went back a calendar year, decrement $data_year
 			if ($months{$data_months[$i]} > $data_month)
 			{