Fujitsu BS2000/OSD COBOL2000 V1.5 Benutzerhandbuch Seite 25

... zum ablauffähigen Programm
Beispiel 2-1
Übernahme einer Übersetzungseinheit aus einer katalogisierten Datei in eine PLAM-
Bibliothek
/START-LMS ————————————————————————————————————————————————————————————— (1)
% LMS0310 LMS VERSION '03.3A30' STARTED
//OPEN-LIBRARY LIB=PLAM.LIB,MODE=UPDATE(STATE=NEW) ————————————————————— (2)
//ADD-ELEM FROM-FILE=SOURCE.EINXEINS,TO-E=LIB-ELEM(ELEM=EINXEINS,TYPE=S) (3)
//END —————————————————————————————————————————————————————————————————— (4)
% LMS0311 LMS V03.3A30
(1)
(2)
(3)
(4)
U41113-J-Z125-6
Das Dienstprogramm LMS wird aufgerufen.
PLAM.LIB wird als neu einzurichtende (STATE=NEW) Ausgabebibliothek
(USAGE=OUT) vereinbart. Sie wird von LMS standardmäßig als PLAM-Bibliothek
eingerichtet.
Die Übersetzungseinheit wird aus der katalogisierten Datei SOURCE.EINXEINS
als Element vom Typ S unter dem Namen EINXEINS in die PLAM-Bibliothek auf-
genommen.
Der LMS-Lauf wird beendet, alle geöffneten Dateien werden geschlossen.
Bereitstellen der Übersetzungseinheit
TERMINATED NORMALLY
25