davindersingh29

 Profile Answers by davindersingh29 

• Jan 17th, 2012

 

You have to write a JCL to run a cobol-db2 program. Can you please give your JCL if you need any changes.

rasheeed17

 Profile Answers by rasheeed17 

• Jan 19th, 2012

 

To run an DB2 program,.

1) in Job card changes (to specify which db2 environment to be connected)

--> Add SCHENV=DB2 keyword, DB21-> db2 env , your db2 admin/ PM will provide this

Code
//RASHEED JOB (RAC0000),TEST,CLASS=A,MSGCLASS=X,MSGLEVEL=(1,1),  


//             COND=(4,LT),SCHENV=DB21


 


 

2) we don't run db2 program directly , instead we execute IKJEFT01 and call our DB2 program in it. for this we have to pass our DB2 program details as sysin parameter

Code
 //BINDYSS2 EXEC PGM=IKJEFT01,DYNAMNBR=20


 //SYSTSPRT DD SYSOUT=*               


 //SYSPRINT DD SYSOUT=*               


 //SYSUDUMP DD SYSOUT=*               


 //SYSTSIN  DD *                      


   DSN SYSTEM(DB21)                   


   RUN PROGRAM(DSNTEP2) PLAN(DSNTEP2) 


   LIB(DSNDB21.DSN.RUNLIB.LOAD)     


//*


 


 


   DSN SYSTEM(DB21)                   --> your DB2 environment(same as SCHENV value in job card)


   RUN PROGRAM(DSNTEP2)          -->  your program name in braces


   PLAN(DSNTEP2)                       --> plan of your program... always same as your program name


   LIB(DSNDB21.DSN.RUNLIB.LOAD)  --> your load library name