Multiple COBOL-DB2 pragrams calling by different plan

deepak_shrivastava · New User Joined: 05 Jan 2016 Posts: 8 Location: India

Hi All,

I have one scenario, it will be great if some one advice and answer.

I have below 4 programs
PROG1(COBOL Program).
PROG2(COBOL-DB2 Program) uses DB2 Plan ABC123.
PROG3(COBOL Program).
PROG4(COBOL-DB2 Program) uses DB2 Plan XYX456.

If PROG1 call PROG2 and PROG2 call PROG3 and PROG3 call PROG4.
(PROG01->PROG02->PROG03->PROG04)

While calling from JCL we usually write as below
//BLASTP00 EXEC PGM=IKJEFT01,REGION=6M,TIME=60,
// PARM=('%DB2EXECE SY(DB2C) PL(ABC123) PR(PORG1)')

But How to pass Plan name for PROG4 ?
How PROG02 will get plan name from base program PORG1 ?

Rohit Umarjikar · Posted: Wed Apr 20, 2016 8:26 pm

I hope by now you got it working and understand how it works but to answer the post, each program (or subprogram) that contains SQL needs to be pre-processed to create a DBRM. The DBRM is then bound into a PLAN that is accessed by a LOAD module at run time to obtain the correct DB/2 access paths for the SQL statements it contains.

The basic process remains the same - you need a PLAN to run the program and check PLANs + COLLECTIONs + VERSIONs + PACKAGEs + DBRMs = Confusion to avoid anymore confusion.