Cobol-Sprachmittel Für Die Verarbeitung Indizierter Dateien - Fujitsu BS2000/OSD COBOL2000 V1.5 Benutzerhandbuch

Indizierte Dateien
9.4.2 COBOL-Sprachmittel für die Verarbeitung indizierter Dateien
Das folgende Programmskelett gibt einen Überblick über die wichtigsten Klauseln und An-
weisungen, die COBOL2000 für die Verarbeitung indizierter Dateien zur Verfügung stellt.
Die wesentlichen Angaben werden im Anschluss daran kurz erläutert:
IDENTIFICATION DIVISION.
...
ENVIRONMENT DIVISION.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
SELECT interner-dateiname
ASSIGN TO externer-name
ORGANIZATION IS INDEXED
ACCESS MODE IS zugriffsart
RECORD KEY IS primärschlüssel
ALTERNATE RECORD KEY IS sekundärschlüssel
FILE STATUS IS statusfelder.
...
DATA DIVISION.
FILE SECTION.
FD interner-dateiname.
BLOCK CONTAINS blocklängenangabe
RECORD satzlängenangabe
...
01 datensatz.
nn feld-1
...
nn primärschlüssel-feld
nn sekundärschlüssel-feld
...
PROCEDURE DIVISION.
...
OPEN open-modus interner-dateiname
...
START interner-dateiname
...
READ interner-dateiname
...
REWRITE datensatz
...
WRITE datensatz
...
DELETE interner-dateiname
...
CLOSE interner-dateiname
...
STOP RUN.
242
typ&länge
typ&länge
typ&länge
Dateiverarbeitung
U41113-J-Z125-6