<< Inhaltsverzeichnis Suchen >>

READS

Anweisung

Syntax:

READS(<SEKKEY>)<INDEXDATEI>
ON ERROR ... ANWEISUNGEN ... END

Bedeutung:

Es wird versucht, denjenigen Satz aus der angegebenen Indexdatei zu lesen, der durch die augenblicklichen Werte der Dateifelder des angegebenen Neben-Schlüssel spezifiziert ist. Im Fehlerfall wird der Block ON ERROR ... END ausgeführt. Existieren in der Datei mehrere Sätze mit demselben Neben-Schlüssel, so wird derjenige Satz gelesen, der zuerst gefunden wird. Die restlichen können dann mit Hilfe der Anweisung READS-NEXT(<SEKKEY>) gelesen werden.

Beispiel:

KUNDEN.NAME$=HILF_NAME$
READS(1) KUNDEN
               ON ERROR ERRORMES="KUNDE NICHT VORHANDEN"
                                   REPEAT
               END

siehe auch:

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