How to make Easytrieve macros and program source managed by Librarian available to Easytrieve compile.
Solution:
For possible approaches to achieve this, see the steps below:
MAC#LIB=2, C MACDDN=MASTER, C MACRO=LIBR, CThen the following assignments in JCL is to be used:
... //MASTER1 DD DISP=SHR,DSN=<eztplus.macros.master> //MASTER2 DD DISP=SHR,DSN=<eztplus.source.master> ... //SYSIN DD DISP=SHR,DSN=<eztplus.source.master>(<member<), // SUBSYS=<lam> ...The preceding coding requires that Librarian FAIRxxxx modules are available from STEPLIB concatenation or linklist.
MAC#LIB 1 MACDDN PANDD MACTYPE D
The JCL assignments then look like:
... //PANDD DD DISP=SHR,DSN=<eztplus.macros.master>, // SUBSYS=<lam> // DD DISP=SHR,DSN=<eztplus.source.master>, // SUBSYS=<lam> ... //SYSIN DD DISP=SHR,DSN=<eztplus.source.master>(<member<), // SUBSYS=<lam> ...
MAC#LIB=1, C MACDDN=PANDD, C MACRO=PDS, C ...
Agenda:
<eztplus.macros.master> identifies the Librarian master file containing macros
<eztplus.source.master> identifies the Librarian master file containing program sources
<member> identifies the program (member) name <lam> identifies the name of the Librarian/AM subsystem
Remarks:
The Librarian subsystem must be active, either initialized during CAS9 processing or by executing LJxxINIT, where xx is the release of Librarian (42 for LIBR 4.2; 43 for LIBR 4.3)
It is recommended to create a language type for Easytrieve sources, using the LUELIGEN JCL to assemble and link ELIPSGEN with following being specified as a sample:
... ATYPnn=(EZTRIEV,EZT,81,6), X ...
where nn is the first unused suffix of the ATYPExx options in the ELIPSGEN macro.