Fujitsu BS2000/OSD COBOL2000 V1.5 Benutzerhandbuch Seite 32

Quelldaten-Eingabe
Beispiel 2-6
Eingabe eines COPY-Elements aus dem POSIX-Dateisystem
IDENTIFICATION DIVISION.
PROGRAM-ID. PROG1.
...
COPY ATEXT. ———————————————————————————————————————————————————————————— (1)
...
Zuweisung des POSIX-Dateisystems durch Einrichten und Setzen einer S-Variablen:
/DECL-VAR SYSIOL-COBLIB,INIT='*POSIX(/usr/dir1),*POSIX(/usr/dir2)', -
/
/START-COBOL2000-COMPILER? ————————————————————————————————————————————— (3)
(1)
(2)
(3)
(4)
32
Das COPY-Element ATEXT befindet sich als Datei im POSIX-Dateisystem.
Mit dem SDF-P-Kommando DECL-VARIABLE wird die Variable auf die Pfade im
POSIX gesetzt, in deren Verzeichnissen dir1 und dir2 nach der Datei ATEXT
gesucht werden soll.
Der Zugriff auf das POSIX-Dateisystem ist nur möglich, wenn der Compiler mit
SDF-Steuerung aufgerufen wird. Mit dem an das Aufrufkommando angehängten
„?" gelangt der Benutzer in den SDF-Menümodus (siehe
dus" auf Seite 51), in dem weitere Angaben zur Steuerung des Übersetzungslaufs
erfolgen können.
Der Compiler akzeptiert COPY-Elemente aus dem POSIX-Dateisystem nur, wenn
ihre Dateinamen ausschließlich aus Großbuchstaben bestehen.
SCOPE=*TASK ————————————————————————————— (2)
Von der Übersetzungseinheit ...
Abschnitt „SDF-Menü-Mo-
U41113-J-Z125-6