KFK2666.pdf

-394- 10-48
PLR-Programm:
'fSUBSYSTEIvi 8SS
'fMOlJUIJE HMM
MMM : PEOC;
INITIA'rE BANK (BANK1) FREEIJIST (256) SPACE (128) ;
END MMH;
Subsystem-Cornnon
EN'l'ER PLS;
SUBSYSTEM 'SSS';
DCL 1;
2 ••••
2 BANK1 BANK;
..........
END DA'rA;
CLAUSE INI'I';
LINK MHl'1;
END CLAUSE;
END PLS;
Job-Control-Language
/ /I3l\.NKl DD DSN = DA'l'EI. PRIVAT, DISP = SHR
Bei Eintritt in das Subsystem SSS mittels ENTER SSS; wird auf
dem Dataset DATEI.PRIVAT eine REGENT-Datenbank initialisiert.