my $names = $sth->{NAME};
push @spaltennamen, @$names;
my $filter = 'where ' . join (' or ', map { $dbh->quote ("%$_%") } grep $_, @$names);