Gemeinsam Benutzbare Cobol-Programme - Fujitsu BS2000/OSD COBOL2000 V1.5 Benutzerhandbuch

Binden, Laden, Starten

6.7 Gemeinsam benutzbare COBOL-Programme

Bei großen Programmen kann es von Vorteil sein, einzelne Programmteile, auf die mehrere
Benutzer (Tasks) zugreifen, gemeinsam benutzbar (shareable) zu machen.
Hierfür ist bei der Übersetzung eine der folgenden Steueranweisungen anzugeben:
COMOPT GENERATE-SHARED-CODE=YES
oder
SHAREABLE-CODE=YES
im MODULE-GENERATION-Parameter der COMPILER-ACTION-Option.
Der Compiler erzeugt dann zwei Objektmodule, wovon das eine den nicht mehrfachbenutz-
baren Teil und das andere den gemeinsam benutzbaren Teil des Objekts enthält. Sie wer-
den im Folgenden als „nicht gemeinsam benutzbares" bzw. „mehrfachbenutzbares Modul"
bezeichnet. Die gemeinsam benutzbaren bzw. nicht mehrfachbenutzbaren Module können
jeweils zu Großmodulen vorgebunden werden.
Die gemeinsam benutzbaren Module müssen entweder unmittelbar vom Compiler (über
COMOPT-Anweisung MODULE bzw. SDF-Option MODULE-LIBRARY) oder mit dem
Dienstprogramm LMS (siehe Handbuch [11]) in einer PLAM-Bibliothek abgelegt werden.
Alle nicht gemeinsam benutzbaren Teile eines Programms werden pro Task und Anwender
in den Klasse-6-Speicher geladen.
Programmsysteme mit gemeinsam benutzbaren Modulen können nur mit dem Dynami-
schen Bindelader aufgerufen werden. Aufgerufen wird stets der Name des nicht gemein-
sam benutzbaren (Daten)-Moduls. Dieses enthält Externverweise auf sein gemeinsam be-
nutzbares Codemodul sowie ggf. auf andere nicht gemeinsam benutzbare Module.
Aufrufbeispiel:
/SET-TASKLIB $.SYSLNK.CRTE ———————————————————————————————————————————— (1)
/START-PROGRAM *MOD(bibliothek,element) ——————————————————————————————— (2)
(1)
(2)
U41113-J-Z125-6
Mit dem SET-TASKLIB-Kommando wird die Bibliothek zugewiesen, die die
COBOL2000-Laufzeitmodule enthält.
element ist der Name des Datenmoduls oder Großmoduls, das mindestens den
nicht gemeinsam benutzbaren Teil des Hauptprogramms enthalten muss. biblio-
thek ist die Bibliothek, in der die vom Benutzer geschriebenen Module stehen.
Gemeinsam benutzbare COBOL-Programme
139