Fujitsu BS2000/OSD COBOL2000 V1.5 Benutzerhandbuch Seite 229

Dateiverarbeitung
In diesem Modus können relative Dateien gelesen werden. Abhängig von der vereinbarten
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) und absteigender (PREVIOUS) relati-
ver Satznummern zur Verfügung.
Das RELATIVE KEY-Schlüsselfeld - wenn angegeben - wird von READ nicht ausge-
wertet; es enthält jeweils die relative Satznummer des zuletzt gelesenen Satzes. Falls
ein RELATIVE KEY-Schlüsselfeld vereinbart wird, kann jedoch vor der Ausführung ei-
ner READ-Anweisung mit Hilfe von START auf einen beliebigen Satz der Datei positi-
oniert werden: Über eine Vergleichsbedingung legt START die relative Satznummer
des zuerst zu lesenden Satzes und damit den Ausgangspunkt für nachfolgende se-
quenzielle Leseoperationen fest.
Kann die Vergleichsbedingung von keiner relativen Satznummer der Datei erfüllt wer-
den, tritt eine INVALID KEY-Bedingung auf und START verzweigt zur INVALID KEY-An-
weisung bzw. zur vereinbarten USE-Prozedur.
– ACCESS MODE IS RANDOM
ermöglicht es, die Sätze der Datei wahlfrei zu lesen. READ stellt dabei die Datensätze
in beliebiger Reihenfolge zur Verfügung; der Zugriff auf jeden Satz erfolgt über seine
relative Satznummer.
Das RELATIVE KEY-Schlüsselfeld muss dazu vor jeder READ-Anweisung mit der re-
lativen Nummer des Satzes versorgt werden, der gelesen werden soll. Wird dabei die
Nummer eines nicht existierenden Satzes (z.B. eines Leersatzes) angegeben, tritt eine
INVALID KEY-Bedingung auf und READ verzweigt zur INVALID KEY-Anweisung bzw.
zur vereinbarten USE-Prozedur.
– ACCESS MODE IS DYNAMIC
gestattet es, die Datei sowohl sequenziell als auch wahlfrei zu lesen.
Die jeweilige Zugriffsart wird dabei über das Format der READ-Anweisung gewählt
(siehe Tabelle 27).
Eine START-Anweisung ist nur für sequenzielles Lesen sinnvoll.
U41113-J-Z125-6
Relative Dateien
229