Fujitsu BS2000/OSD COBOL2000 V1.5 Benutzerhandbuch Seite 46

Parametrisierte Klassen und Interfaces
Beispiel 2-10
Nutzung einer parametrisierten Klasse
Quelltext:
PROGRAM-ID. n.
...
REPOSITORY.
CLASS pkl
CLASS exp EXPANDS pkl USING ap—————————————————————————————————————— (1)
CLASS ap.
...
01 obj-exp USAGE OBJECT REFERENCE exp.
...
Zuweisung und Compileraufruf:
/ADD-FILE-LINK REPLIB,REPOSITORY———————————————————————————————————————— (2)
/START-COBOL2000-COMPILER ...——————————————————————————————————————————— (3)
(1)
(2)
(3)
i
46
Der Name der Expansion der parametrisierten Klasse ist exp, der Name des aktu-
ellen Parameters ist ap.
Die Repository-Daten der vorübersetzten parametrisierten Klasse pkl sowie der
(nicht-parametrisierten) Klasse ap werden in der Bibliothek REPOSITORY erwar-
tet.
Im Anschluss an die Übersetzung von n erfolgt automatisch die Übersetzung der
konkreten Expansion exp der parametrisierten Klasse pkl.
Im Falle von Abhängigkeiten zwischen verschiedenen Expansionen (Beispiel: die
Expansion einer parametrisierten Klasse wird als aktueller Parameter für eine an-
dere Expansion verwendet) muss bei der Übersetzung des Nutzers das Eingabe-
Repository auch als Ausgabebibliothek zugewiesen und die Option
UPDATE-REPOSIORY=*YES gesetzt werden.
Von der Übersetzungseinheit ...
U41113-J-Z125-6