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

Relative Dateien
9.3.2 COBOL-Sprachmittel für die Verarbeitung relativer Dateien
Das folgende Programmskelett gibt einen Überblick über die wichtigsten Klauseln und An-
weisungen, die COBOL2000 für die Verarbeitung relativer Dateien zur Verfügung stellt. Die
wesentlichsten 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 RELATIVE
ACCESS MODE IS zugriffsart RELATIVE KEY IS schlüssel
FILE STATUS IS statusfelder.
...
DATA DIVISION.
FILE SECTION.
FD interner-dateiname
BLOCK CONTAINS blocklängenangabe
RECORD CONTAINS satzlängenangabe
...
01 datensatz.
nn feld-1
nn feld-2
...
WORKING-STORAGE SECTION.
...
nn schlüssel
...
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.
220
typ&länge.
typ&länge.
typ&länge
Dateiverarbeitung
U41113-J-Z125-6