How to call a Cobol DB2 batch program from a CICS program?

vijay kumar · New User Joined: 03 Mar 2007 Posts: 1 Location: Mumbai

I compiled a non DB2 Cobol batch program (IB075PAB) and Cobol-DB2 batch program(IBAB0405) specifying load library as the one used for the CICS region(TEST.DBT1X.USERLIB).
I compiled CICS program MP33MP33 in the same load library(TEST.DBT1X.USERLIB).

I called IB075PAB from MP33MP33 which in turn calls IBAB0405.
When doing this, it is failing with error "CEE3501S The module IBAB0405 was not found."

Calling a non DB2 batch program compiled in the same load library is working fine but the problem is being faced only whle calling a Cobol-DB2 batch program.

Could you please suggest a solution for this problem.

Thanks,
Dharmendra

kgumraj · Posted: Fri Jul 20, 2007 2:44 pm

Hi,

I dont know much online, But did you bind Cobol-DB2 program ? if yes, new copy the entry and then run the same..

Thanks

William Thompson · Posted: Fri Jul 20, 2007 2:51 pm

Did a PPT entry get created for the missing program?

socker_dad · Posted: Sat Jul 21, 2007 1:31 am

Also, try executing Expediter in CICS and see what's happening between IB075PAB and IAB0405.

shagnwrx · Posted: Sat Jul 21, 2007 3:31 am

This is a module not found. If the PPT were missing we'd have an APCT abend.

First physically check the LOAD or LINK library where this program is supposed to be. Verify it's there and doesn't have a NX atrribute to the right (Non-Executable).

Another thing to think about: Was the failing program or caller compiled with DYNAM? If so, I do not believe the DYNAM Cobol environment works all that great with CICS. Compile with option NODYNAM and that may get around it as well.

dick scherrer · Posted: Sat Jul 21, 2007 4:15 am

Hello,

You might want to verify that an O (oh) or a 0 (zero) hasn't been mis-typed somewhere.

Earl · Posted: Sat Jul 21, 2007 8:41 am

if you compile with DYNAM, then CICS neeeds to have autoinstall turned on, talk to your TechSupport people.

Make sure your batch DB2 program is in a loadlib concatenated to cics
RPL libs.

RPL List should also be pointing to the LE" libs

DD DISP=SHR,DSN=CEE.SCEECICS
DD DISP=SHR,DSN=CEE.SCEERUN