Figure 2. Example JCL for a Remote DL/I TP Profile
The numbers to the right of the JCL statements refer to the notes that follow the JCL.
//RMTDLI JOB (1) //******************************************************************** //* Example Remote DL/I Server JCL //******************************************************************** //RMTDLI EXEC PGM=IWZRDM01,REGION=8M, (2) // PARM='DLI,PGMNAME,PSBNAME,,0000,,,,,,,,,N,N' (3) //STEPLIB DD DISP=SHR,DSN=REMOTE.DLI.LOADLIB (4) // DD DISP=SHR,DSN=CEEV1R50.SCEERUN // DD DISP=SHR,DSN=IMSVS.IMS5.RESLIB //DFSRESLB DD DISP=SHR,DSN=IMSVS.IMS5.RESLIB //IMS DD DISP=SHR,DSN=IMS.PSBLIB (5) // DD DISP=SHR,DSN=IMS.DBDLIB //IEFRDER DD DUMMY (6) //IEFRDER2 DD DUMMY //SYSUDUMP DD SYSOUT=H //DFSVSAMP DD DISP=SHR,DSN=IMS.DFSVSAMP //* IMS databases //RDLIDSN DD DISP=SHR,DSN=IMS.RDLI.RDLIDSN (7) //RDLIDSNO DD DISP=SHR,DSN=IMS.RDLI.RDLIDSNO //* DD Statements required by Remote DL/I //IWZRDOUT DD SYSOUT=H (8) |
Notes to Figure 2