STEPLIB used to denote library for cobol db2 Load module

Ajay Baghel · Posted: Wed Mar 05, 2008 6:03 pm

Hi,

I have a doubt in the below step (production jcl) executing a cobol db2 program PGM1 :

dbzTHEdinosauer · Posted: Wed Mar 05, 2008 6:42 pm

ikjeft.. are part of the system link libs, usually available without a step or job lib. Like sort, iebgener, ect....

the steplib contains the member to be executed by the Terminal Monitoring Program IKJEFT01/1a/1b.

Ajay Baghel · Posted: Wed Mar 05, 2008 6:46 pm

Dick,

I was wondering howcome the STEPLIB is containing load for PGM1 and not IKJEFT01 because of jcl rule:

Anuj Dhawan · Posted: Wed Mar 05, 2008 11:42 pm

Hi,

They say IKJET01 is "TSO" in Batch.

mambopras · New User Joined: 11 Nov 2008 Posts: 52 Location: Hyderabad

I have few doubts in the Compile JCL, i 've searched for similar posts but could not find something which answers my questions and hence i am posting it here..

the question is

What exactly dose the steplib has in the precompiler, compile, link-edit steps I have no idea about what those libraries are...? Are those system libraries or user defined ones or what exxactly are they and their significance? Please explain it to me as if you aer doing to a layman in mainframes....that would be of a great help

mambopras · New User Joined: 11 Nov 2008 Posts: 52 Location: Hyderabad

may be you did not get the whole link....i will copy paste the JCL here

//DB2COMP (XXX,XXX),'COMPILE JCL',
// CLASS=A,MSGCLASS=A,NOTIFY=&SYSUID
//***********************************************************
//* COMPILATION, LINK EDIT AND THE BIND STEP FOR A COBOL DB2 PROGRAM *
//* WILL BE DONE BY SUBMITTING THIS JOB. *
//* THE DB2 REGIONS AND CORRESPONDING PARAMETERS NEEDS TO BE CHANGED *
//* WITH RESPECT TO THE PROGRAM *
//***********************************************************
//* PRECOMPILE DB2 PROGRAM *
//*-------------- LOCATION OF DBRM LIBRARY -------------------------*
//***********************************************************
//PC EXEC PGM=DSNHPC,
// PARM='HOST(COB2),APOST,SOURCE',
// REGION=4096K
//DBRMLIB DD DISP=SHR,
// DSN=DEV.SURESH.DBRM(DB2PROG) <------------------------ (1)
//STEPLIB DD DISP=SHR,
// DSN=SYSX.DB2.XXX.XXXXX
//***********************************************************
//*SYSIN -----------INPUT COBOL DB2 PROGRAM LOCATION-----------------*
//********************************************************************
//SYSIN DD DISP=SHR,
// DSN=DEV.SURESH.SRC(DB2PROG)
//SYSCIN DD DISP=(MOD,PASS),
// DSN=&&TEMP,
// SPACE=(800,(500,500)),
// UNIT=SYSDA
//***********************************************************
//* DCLGEN MEMBER LOCATION *
//*SYSLIB-----------------INPUT SOURCE LIBRARY FOR SQL---------------*
//***********************************************************
//SYSLIB DD DISP=SHR,
// DSN=DEV.SURESH.DCL <--------(3)
// DD DISP=SHR,
// DSN=DEV.SURESH.CPY
//SYSPRINT DD SYSOUT=T
//SYSTERM DD SYSOUT=T
//SYSUDUMP DD SYSOUT=*
//SYSUT1 DD SPACE=(800,(500,500),,,ROUND),
// UNIT=SYSDA
//SYSUT2 DD SPACE=(800,(500,500),,,ROUND),
// UNIT=SYSDA
//*
//***********************************************************
//* COMPILATION *
//***********************************************************
//*
//COB EXEC PGM=IGYCRCTL,
// COND=(4,LT,PC),
// PARM=('SIZE(4000K),BUFSIZE(32760),LIST,LIB,MAP,OBJECT',
// 'DATA(31),XREF,RENT'),
// REGION=4M
//STEPLIB DD DISP=SHR,
// DSN=XXXX.XXXXXX
//SYSIN DD DISP=(OLD,DELETE),
// DSN=&&TEMP
//SYSLIN DD DISP=(MOD,PASS),
// DSN=&&LOADTMP,
// SPACE=(800,(500,500)),
// UNIT=SYSDA
//***********************************************************
//*--------------SOURCE LIBRARIES FOR COBOL DB2 CODE (COPY LIBRARIES)*
//***********************************************************
//SYSLIB DD DISP=SHR,
// DSN=DEV.SURESH.DCL <----------------- (4)
// DD DSN=DEV.SURESH.CPY,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSUT1 DD SPACE=(800,(500,500),,,ROUND),
// UNIT=SYSDA
//SYSUT2 DD SPACE=(800,(500,500),,,ROUND),
// UNIT=SYSDA
//SYSUT3 DD SPACE=(800,(500,500),,,ROUND),
// UNIT=SYSDA
//SYSUT4 DD SPACE=(800,(500,500),,,ROUND),
// UNIT=SYSDA
//SYSUT5 DD SPACE=(800,(500,500),,,ROUND),
// UNIT=SYSDA
//SYSUT6 DD SPACE=(800,(500,500),,,ROUND),
// UNIT=SYSDA
//SYSUT7 DD SPACE=(800,(500,500),,,ROUND),
// UNIT=SYSDA
//*
//*
//***********************************************************
//* LINK EDIT *
//***********************************************************
//*
//LKED EXEC PGM=IEWL,
// COND=((4,LT,COB),(4,LT,PC)),
// PARM='XREF'
//SYSLIB DD DISP=SHR,
// DSN=SXXX.SXXXXXXX
// DD DISP=SHR,
// DSN=XXXX.DB2.XXX.XXXXLOAD
// DD DISP=SHR,
// DSN=SYS1.VSCLLIB
//SYSLIN DD DISP=(OLD,DELETE),
// DSN=&&LOADTMP
//* DD DDNAME=SYSIN
//***********************************************************
//*----------------LOCATION OF LOAD LIBRARY--------------------------*
//SYSLMOD DD DISP=SHR,
// DSN=DEV.SURESH.LOADLIB(DB2PROG) <---(5)
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSUT1 DD SPACE=(1024,(50,50)),
// UNIT=SYSDA
//*
//***********************************************************
//* BIND - BIND THE DB2 PACKAGE *
//***********************************************************
//BIND EXEC PGM=IKJEFT01,
// COND=(4,LT),
// REGION=4096K
//STEPLIB DD DISP=SHR,
// DSN=XXX4.DB2.XXXX.XXXXLOAD
//DBRMLIB DD DISP=SHR,
// DSN=DEV.SURESH.DBRM(DB2PROG) <------------ (6)
//SYSPRINT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSIN DD *
DSN SYSTEM (DEVDB )
BIND MEMBER (DB2PROG) -
PACKAGE (PACKG11) -
LIBRARY ('DEV.SURESH.DBRM') - <--------(7)
ACTION (REP) -
ISOLATION (CS) -
VALIDATE (BIND)-
RELEASE (COMMIT) -
OWNER (SURESH) -
QUALIFIER (DEVQUALI)
END
/*
**************************** Bottom of Data ****************************

(1) - When we precompiled, precompiler will create the DBRM, it will
be placed in the pds specified here.

(2) - Location of COBOL-DB2 program

(3) - Needs to speficiy DCLGEN member locations

(4) - Needs to specify DCLGEN and COPYBOOK locations here

(5) - Load module location, load module will be created here. this
location needs to be given in run jcl.

(5) & (6) - specify the location of DBRM, ( same location used in step1 ).

revel · Posted: Wed Nov 19, 2008 3:07 pm

Ajay,

The IKJEFT01 is a terminal monitor program, It function is to create an environment to run JOB PGM1 which is present in Load library present in STEPLIB.

Then about IKJEFT01 is normally present in default load library don't think it has to be STEPLIB Library.

When you RUN above JCL, IKJEFT01 will create an environment in MVS System and it will try to execute program PGM1 which you mentioned in JCL CARD

mambopras · New User Joined: 11 Nov 2008 Posts: 52 Location: Hyderabad

Hi raghu,
Can you help me with my questions too....?

revel · Posted: Wed Nov 19, 2008 3:16 pm

Prashanth,

What exactly you need.. we are all here for to help you :o)

mambopras · New User Joined: 11 Nov 2008 Posts: 52 Location: Hyderabad

Well, i beleive you haven't seen the questions i posted in this thread....i have asked about the exact content of the STEPLIB in a compile jcl for Cobol DB2 program , i gave a sample JCL too...please look above in this thread...you would see questions posted by me.....waiting for your reply.

revel · Posted: Wed Nov 19, 2008 3:51 pm

Hello,

mambopras · New User Joined: 11 Nov 2008 Posts: 52 Location: Hyderabad

Hi Raghu my doubt was about the STEPLIBs in teh JCL i had posted...what are the Libraries in the steplib and all about them....? hope you have understood the uqestion...please help me out with them

revel · Posted: Wed Nov 19, 2008 4:57 pm

Hello,

Thats what i answered, Just check the above post correctly...First Learn ABCD in JCL...

mambopras · New User Joined: 11 Nov 2008 Posts: 52 Location: Hyderabad

Well then may be i misqouted the question , i know what actually a normal steplib contains ...but in the JCL i have given above.......
the precompile step has this
//STEPLIB DD DISP=SHR,
// DSN=SYSX.DB2.XXX.XXXXX
and next in the compilation step it is

//STEPLIB DD DISP=SHR,
// DSN=XXXX.XXXXXX

i said i did not understand...and if i have seen your link right...we dont have this...so that was why i was repeating the question. I hope you dont mistake me..

Robert Sample · Posted: Wed Nov 19, 2008 6:11 pm

Prashanth: a STEPLIB is only valid from EXEC to EXEC statement in JCL. You can specify a different STEPLIB for each EXEC in your job, and in some cases you must specify the STEPLIB for each EXEC. They point to different libraries because different programs are stored in different libraries.

dick scherrer · Posted: Thu Nov 20, 2008 3:55 am

Hello,

And if you have questions about the compile jcl used on your system (everyone should use standard compile jcl, not create their own) your best source of info about the standard compile jcl is your system support people and/or dba's.

I would not muddy the water with examples from the web. . . fwiw

revel · Posted: Thu Nov 20, 2008 1:38 pm

Thank you robert for your valuable input, added to above statement,

Even order of search(To locate program which is in EXEC Card in STEPLIB library) is also different.

1. First it will search in STEPLIB Library
2. Then in JOBLIB Library if it present
3. Default Library(normally SYSIBM.LINKLIB or SYS1.LINKLIB depends on company standard).

Hope you clear now ..

mambopras · New User Joined: 11 Nov 2008 Posts: 52 Location: Hyderabad

Ok! then in a precompile step what can it probably contain (Steplib)? and also in a compilation step....please let me know

enrico-sorichetti · Posted: Thu Nov 20, 2008 4:11 pm

revel · Posted: Thu Nov 20, 2008 4:27 pm

enrico-sorichetti · Posted: Thu Nov 20, 2008 10:19 pm

Robert Sample · Posted: Thu Nov 20, 2008 11:56 pm

Enrico -- I have to agree with you; revel is wrong in thinking the JOBLIB is searched if there's a STEPLIB. I've seen too many cases where the JOBLIB is ignored when a STEPLIB is included to think the manual is wrong here.

dick scherrer · Posted: Fri Nov 21, 2008 3:03 am

Hello,

Devil's Advocate here. . . .

What are the odds that there is some exit/add-on (purchased or "own-code") that traps the 806 when there is a steplib and uses the joblib if there is one?

My experience from many, many systems is as Enrico, Robert, and the manual have said - when there is a steplib, joblib is ignored for that step.

Anuj Dhawan · Posted: Fri Nov 21, 2008 4:12 am

Hi,

Was reading just other Manual:

Anuj Dhawan · Posted: Fri Nov 21, 2008 4:15 am

Hello again,

The program search order for MVS uses the following program libraries in the order given:

1. JOB Pack Area (already loaded programs)
2. Private task library, if specified.
3. STEPLIB library, if specified.
4. JOBLIB library, if specified, AND no STEPLIB is specified
5. Link Pack Area (PLPA)
6. System Link List (i.e., SYS1.LINKLIB and the data sets concatenated to it).