Fujitsu BS2000/OSD COBOL2000 V1.5 Benutzerhandbuch Seite 297

Programmverknüpfungen
Die einzelnen Programme sind als Objektmodule unter den Elementnamen MAINPROG,
UPROG1, UPROG2 und UPROG3 in der Bibliothek BENUTZER-PROGRAMME abgelegt.
1. Verwendung des DBL (dynamisches Binden)
/ADD-FILE-LINK BLSLIB00,$.SYSLNK.CRTE
/ADD-FILE-LINK COBOBJCT,BENUTZER-PROGRAMME
/START-PROGRAM *MODULE(LIB=BENUTZER-PROGRAMME,ELEM=MAINPROG,-
/RUN-MODE=ADVANCED(ALT-LIB=YES,UNRES-EXT=DELAY,-
/LOAD-INF=REFERENCES))
(1)
(2)
(3)
2. Verwendung des TSOSLNK (Großmodulbinden)
/START-PROGRAM $TSOSLNK
MODULE GROSSMOD,LET=Y,UNSAT=N, LIB=MODUL.LIB —————————————————————————— (1)
INCLUDE MAINPROG,BENUTZER-PROGRAMME ——————————————————————————————————— (2)
RESOLVE,BENUTZER-PROGRAMME
LINK-SYMBOLS *KEEP ———————————————————————————————————————————————————— (4)
END
/ADD-FILE-LINK BLSLIB00,$.SYSLNK.CRTE ————————————————————————————————— (5)
/ADD-FILE-LINK COBOBJCT,BENUTZER-PROGRAMME
/START-PROGRAM *MODULE(LIB=MODUL.LIB,ELEM=GROSSMOD,-
/RUN-MODE=ADVANCED(ALT-LIB=YES,UNRES-EXT=DELAY,-
/LOAD-INFO=REFERENCES))
(1)
(2)
(3)
(4)
(5)
U41113-J-Z125-6
Zuweisung der Laufzeitbibliothek
Zuweisung der Bibliothek, aus der das Unterprogramm UPROG2 dynamisch nach-
geladen wird
Aufruf des Objektmoduls mit dem Hauptprogramm MAINPROG. Aus der hier ange-
gebenen Bibliothek BENUTZER-PROGRAMME befriedigt der Bindelader die Ex-
ternverweise auf die Unterprogramme UPROG1 und UPROG3.
Das zu erstellende Großmodul GROSSMOD wird in der Bibliothek MODUL.LIB ab-
gelegt.
Einbinden des Moduls MAINPROG aus der Bibliothek BENUTZER-PROGRAMME
Einbinden der Bibliothek BENUTZER-PROGRAMME zur Befriedigung der Extern-
verweise auf UPROG1 und UPROG3
Mit dieser Anweisung werden die Symbole für die Einsprungstellen und die Pro-
grammabschnitte für den späteren Ablauf mit dem Bindelader sichtbar gehalten.
Zuweisung der Laufzeitbibliothek
Binden und Laden von Unterprogrammen
———————————————————————————————— (1)
——————————————————————————— (2)
——————————————————————————————————————————— (3)
——————————————————————————— (6)
——————— (3)
———————————————— (7)
297