print "\n[lock_table] entry\n\n";

	$lock_res = 'unset';

	$lock_str = "LOCK TABLES " . $table . " WRITE";

	$lock_res = $dbh->do($lock_str);

	$dberr = $dbh->errstr;

	print "[lock_table] locking table <$table> with <$lock_str>\nresult <$lock_res>\nerror message <$dberr>\n";