End selection

Version 3

End selection {(Tabellenname)} Boolean

Die Funktion End selection gibt TRUE zurück, wenn NEXT RECORD über den letzten Datensatz der aktuellen Auswahl der Tabelle Tabellenname hinaus gelesen hat. Ist die aktuelle Auswahl leer, gibt sie den Wert TRUE zurück.

Mit den Befehlen FIRST RECORD, LAST RECORD oder GOTO SELECTED RECORD können Sie dann wieder einen aktuellen Datensatz bestimmen, ohne die Auswahl verändern zu müssen.

Tabellenname ist optional. Wird der Parameter nicht angegeben, bezieht sich die Funktion auf die Haupttabelle.

Wird der letzte Fußteil eines Berichts gedruckt, gibt End selection ebenfalls TRUE zurück. Mit folgendem Code können Sie den letzten Fußteil prüfen und einen speziellen Fußteil für die letzte Seite drucken:

      ` Formularmethode als Ausgabeformular für einen Summenbericht
   $vpFormTable:=Current form table
   Case of
         ` ...
      : (Form event=On Printing Footer)
            ` Es wird gleich ein Fußteil gedruckt
         If(End selection($vpFormTable->))
            ` Code für den letzten Fußteil
         Else
            ` Code für einen Fußteil
         End if      
   End case

Diese Formularmethode wird während dem Drucken eines Berichts verwendet. Sie setzt die Variable vFooter, um den Fußteil auf der letzten Seite zu drucken:

      ` Formularmethode [Finances];"Übersicht" 
   Case of
         ` ...
      : (Form event=On Printing Footer)
         If(End selection([Finances]))
            vFooter := "©1998 Acme Corp." ` Setze Fußteil für die letzte Seite
         Else
            vFooter := "" ` Lösche Fußteil für alle anderen Seiten
         End if      
   End case

Before selection, Form event, LAST RECORD, NEXT RECORD, PRINT SELECTION.