Fujitsu BS2000/OSD COBOL2000 V1.5 Benutzerhandbuch Seite 296

Binden und Laden von Unterprogrammen
Beispiel 13-1
Binde- und Ladetechniken für Programmsysteme mit dynamisch nachzuladenden
Unterprogrammen
Programmkonstellation und Art der Aufrufe
MAINPROG:
...
CALL "UPROG1" USING ...
MOVE "UPROG2" TO bezeichner-1
MOVE "UPROG3" TO bezeichner-2
CALL bezeichner-1 USING bezeichner-2
...
...
CALL "UPROG3"
...
UPROG1 wird ausschließlich in der Form „CALL literal" aufgerufen.
UPROG2 wird ausschließlich in der Form „CALL bezeichner" aufgerufen.
UPROG3 wird auf beide Arten aufgerufen.
Das bedeutet: Für UPROG1 und UPROG3 werden Externverweise abgesetzt, UPROG2
wird dynamisch nachgeladen.
Für diese Programmkonstellation werden im Folgenden die Möglichkeiten gezeigt, das
Programm zum Ablauf zu bringen.
296
MAINPROG
UPROG2
UPROG1
UPROG3
UPROG2:
...
PROCEDURE DIVISION USING bezeichner-2
CALL bezeichner-2
Programmverknüpfungen
U41113-J-Z125-6