Figure 2. Example JCL for a Remote DL/I TP Profile

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

  1. The JOB statement.
  2. The EXEC statement. It must specify PGM=IWZRDM01.
  3. The PARM value passed to Remote DL/I. The first three parameters are replaced with values from Remote DL/I and the rest are passed to IMS as is when starting the IMS batch environment.
  4. The STEPLIB DD statement specifies the three required datasets in order to run Remote DL/I:
    1. Remote DL/I dataset.
    2. Language Environment SCEERUN dataset.
    3. IMS RESLIB dataset.
  5. IMS DD statement points to datasets that contain the PSBs and DBDs.
  6. No IMS logging in this example is available since the IEFRDER DD card is DUMMY.
  7. DD statements for the IMS databases.
  8. The IWZRDOUT DD statement is used to specify where Remote DL/I will write its messages.