TQuery function umstellen auf FibPlus

[Eppos]

Meine Funktion GetOpenQuery muss immer alle Daten liefern. Da ich davon ausgehe,
dass diese Funktion mit einem SQL aufgerufen wird, der genau die Daten liefert
die gebraucht werden.