<< Inhaltsverzeichnis Suchen >>

READ-PREVIOUS

Anweisung

Syntax:

READ-PREVIOUS <INDEXDATEI>
ON ERROR ... Anweisungen ... END

Bedeutung:

Liest den vorhergehenden Satz aus der angegebenen Indexdatei in der Reihenfolge des Haupt-Schlüssels. Diese Anweisung ist nur zulässig, falls zuvor eine gültige READ-, START-, READ-PREVIOUS- oder READ-NEXT-Anweisung ausgeführt wurde, andernfalls tritt der Fehler Nr. 1021 auf. In jeglichem Fehlerfall wird der Block ON ERROR ... END ausgeführt.

Beispiel:

READ-PREVIOUS KUNDEN
               ON ERROR IF OK = 1051
                                   THEN GOTO ENDE
                                   ELSE GOTO FEHLER
                                   ENDIF
               END
...
ENDE: ...
...
FEHLER: ...

siehe auch:

READ, READS, READ-NEXT, READS-NEXT, READS-PREVIOUS,
START
, STARTS, WRITE, DELETE, ON <EREIGNIS> MACRO,
OK
, OK2, ENABLE/DISABLE READLOCK