IBM Mainframe Forum

Ed Goodman Wrote: You guys just blew my mind. Every IMS program I've ever used/written has the ENTRY format. I didn't even know that it was optional.

I just add ENTRY DLITCBL in the LINK control card and compiled and link edited the program by using the statement as
PROCEDURE DIVISION.
ENTRY 'DLITCBL' USING IO-PCB,
IO-PCB2,
MED-PCB.

Then rerun the job. Now it ran successfully. Thanks..

Be sure to use the proclib member! PROCLIB(CBLTDLI).
Something like:
//SYSLIN DD DSN=&&LOADSET,DISP=(OLD,DELETE)
// DD DSN=IMSVS.PROCLIB(CBLTDLI),DISP=SHR <=== FOR IMS

That means you have to add the SDSFRSLB DD statement to the link edit step. That DD should point to the IMS reslib datasets.

Something like //SDFSRESL DD DSN=IMSVS.PROD.RESLIB,DISP=SHR

You may have accidentally just applied a band aid to this problem.