JCL requirements for a DL/I batch program
To allow a DL/I batch program to use the API, add several DD statements to the batch program’s run-time JCL.
No special PCB or PSB is required. The application program uses the standard DL/I call interface. You do not need to recompile or relink the application program.
The following figure shows sample JCL to read a database by using a DL/I retrieval program with the API.
//STEPLIB DD DISP=SHR,DSN=bmc.xxx.load <=== required
// DD DISP=SHR,DSN=your.program.load
// DD DISP=SHR,DSN=IMSVS.RESLIB
//DFSRESLB DD DISP=SHR,DSN=IMSVS.RESLIB
//IMS DD DISP=SHR,DSN=IMSVS.PSBLIB
// DD DISP=SHR,DSN=IMSVS.DBDLIB
//RECON1 DD DISP=SHR,DSN=your.recon1 <===for HALDB only; required
//RECON2 DD DISP=SHR,DSN=your.recon2 <===for HALDB only; required
//RECON3 DD DISP=SHR,DSN=your.recon3 <===for HALDB only; required
//DFSVSAMP DD DISP=SHR,DSN=IMSVS.PROCLIB(VSAMP01)
//IEFRDER DD DUMMY
//BMCPRINT DD SYSOUT=*
//BMCMSG DD SYSOUT=*
//PLUSIN DD * <=== required
USERREAD PCB(dbdName | pcbNumber)
//*
//database DD DISP=SHR,DSN=your.database.dataSet
An explanation of the JCL follows:
EXEC | Required. Specify PGM=DFSRRC00,PARM=’DLI,readpgm,getpsb', wherereadpgm is the name of the application program andgetpsb is the PSB name. You can use DBB rather than DLI in the PARM operand. |
|---|---|
STEPLIB DD | Required. Must point to BMC load library. If several DD statements appear in the STEPLIB statement, BMC load library must be ahead of the IMS RESLIB. |
DFSRESLB DD | Required. Describes the library that contains the IMS RESLIB. |
IMS DD | Required. Must point to the DBD library and the PSB library that contain the DBDs and PSBs for the PCBs that are being serviced by the Unload function. |
RECONx DD | Required for HALDBs. Defines the DBRC RECON data sets. |
DFSVSAMP DD | Required. Supplies the buffer parameters that are not handled by the API. |
IEFRDER DD | Follows the standard requirements for IEFRDER DD statements in any IMS batch job. |
APITRACE DD | Optional. Contains output from the TRACE command. The APITRACE data set is dynamically allocated if it is needed. |
PLUSIN DD | Required. Contains the commands and keywords for the API to use. Valid keywords are described with each command. The USERREAD command is required for the API to service DL/I calls. The following commands are optional:
|
Related topic