sub form_table_data {
	my ($statement, $max_number_of_rows, @parameters) = @_;
	
	$statement->execute(@parameters);
	my $rows = $statement->fetchall_arrayref(undef, $max_number_of_rows);
	my $table_data = [];
	push @$table_data, $cgi->td($rows->[$_]) for (0 .. $#$rows);
	return $table_data;	
}