<perl>
$append = "&Ort~=$_sel{Ort}" if $_sel{Ort} ne "";
$append = $append."&Bereich~=$_sel{Bereich}" if $_sel{Bereich} ne "";

$Rubrik||="Acts";
# das get ist etwas "konfus, das muss bereinigt werden (Ort=$Ort und 
# Ort=$fort ist irgendwie unlogisch, entweder kommt als Parameter der Ort 
# oder der gefilterte Wert aus dem Formularfeld fort, da fort als letzter 
# Filterparameter eingegeben wurde, wird eh der erste Filterwert 
# überschrieben.
# get "Rubrik==Acts sort=Ort Ort==$Ort Ort==$fort range=$range", "Datei";
# so wäre es besser und IMHO sinnvoller, ein paar Sachen müssen vorher noch 
# hin, u.a. die Maskierung der Leerzeichen, damits auch geholt wird und ein 
# definiertes Vorbelegen von $fort, damit keine Fehler kommen, wenn kein 
# Filterwert übergeben wird:
$fort ||= "*"; # Parameter $fort mit dem Stern für alle Datensätze 
               # vorbelegen, wenn er nicht vorhanden ist
$fort =~ s/ /\\ /g; # Leerzeichen in $fort maskieren
get "Ort==$fort Rubrik==Acts sort=Ort range=$range", "Datei";
# Erklärung:
# Hole alle Datensätze, deren Wert gleich dem im Parameter fort übergebenem 
# Wert ist (wenn kein Parameterwert übergeben wurde, werden alle Datensätze
# mit allen beliebigen Werten für Ort angezeigt) und deren Rubrik gleich dem
# Wert "Acts" entspricht, sortiere diese nach Ort
# 
#------------------------------------------------
# hier muss IMHO noch etwas am HTML gefeilt werden, aber das soll nicht mein 
# Thema sein ;.)
out "<tr align=center>";
while(get_next(Datei))
{
$counter++;
<left>;
if($counter%4==0){$trenner = "</tr><tr>";
}
else{$trenner = "";
}
$rubrik_html = convert_html($Rubrik);
out "<td>
<a href='http:...'>

}
out "</tr></table>";