Fujitsu BS2000/OSD COBOL2000 V1.5 Benutzerhandbuch Seite 250

Indizierte Dateien
OPEN INPUT
Welche Ein-/Ausgabeanweisungen bzw. Anweisungsformate erlaubt sind, hängt von der
Angabe in der ACCESS MODE-Klausel ab. Die folgende Tabelle stellt die Möglichkeiten für
OPEN INPUT zusammen:
Anweisung
START
READ
Tabelle 32: Erlaubte Ein-/Ausgabeanweisungen für OPEN INPUT
In diesem Modus können indizierte Dateien gelesen werden. Abhängig von der vereinbar-
ten Zugriffsart hat die READ-Anweisung dabei folgende Wirkung:
– ACCESS MODE IS SEQUENTIAL
erlaubt es ausschließlich, die Datei sequenziell zu lesen. READ stellt dabei die Daten-
sätze in der Reihenfolge aufsteigender (NEXT) oder absteigender (PREVIOUS) Satz-
schlüssel zur Verfügung.
Das (ALTERNATE) KEY-Schlüsselfeld wird von READ nicht ausgewertet. Vor der Aus-
führung einer READ-Anweisung kann jedoch mit Hilfe von START auf einen beliebigen
Satz der Datei positioniert werden: Über eine Vergleichsbedingung legt START den
Schlüssel des zuerst zu lesenden Satzes und damit den Ausgangspunkt für nachfol-
gende sequenzielle Leseoperationen fest (siehe auch
START" auf Seite
Datei erfüllt werden, tritt eine INVALID KEY-Bedingung auf und START verzweigt zur
INVALID KEY-Anweisung bzw. zur vereinbarten USE-Prozedur.
250
Eintrag in der ACCESS MODE-Klausel
SEQUENTIAL
START...
[KEY IS...]
[INVALID KEY...]
[NOT INVALID KEY...]
[END-START]
READ...[NEXT | PREVIOUS]
[INTO...]
[AT END...]
[NOT AT END...]
[END-READ...]
254). Kann die Vergleichsbedingung von keinem Satzschlüssel der
RANDOM
Anweisung nicht zulässig
READ...
[INTO...]
[KEY IS...]
[INVALID KEY...]
[NOT INVALID KEY...]
[END-READ]
Abschnitt „Positionieren mit
Dateiverarbeitung
DYNAMIC
START...
[KEY IS...]
[INVALID KEY...]
[NOT INVALID KEY]
[END-START]
Für sequenziellen Zugriff:
READ...{NEXT | PREVIOUS}
[INTO...]
[AT END...]
[NOT AT END...]
[END-READ]
Für wahlfreien Zugriff:
READ...
[INTO...]
[KEY IS...]
[INVALID KEY...]
[NOT INVALID KEY...]
[END-READ]
U41113-J-Z125-6