Scenario - Below example describes how the COBOL + DB2 program bind process using JCL.

Input required -

• DBRMLIB - MATEGJ.COBDB2.DBRMLIB
• PLAN - MATEGJC

BIND JCL Code -

----+----1----+----2----+----3----+----4----+----5----+
//MATEGJB JOB MSGLEVEL=(1,1),NOTIFY=&SYSUID
//****************************************************
//*  DB2 BIND JCL
//****************************************************
//BIND     EXEC PGM=IKJEFT01
//STEPLIB  DD  DISP=SHR,DSN=DSNA10.DBAG.SDSNEXIT
//         DD  DISP=SHR,DSN=DSNA10.SDSNLOAD
//DBRMLIB  DD  DSN=MATEGJ.COBDB2.DBRMLIB,DISP=SHR
//SYSTSIN  DD  *
DSN SYSTEM (DBAG   )
BIND  PLAN      (MATEGJC ) -
      MEMBER    (SELECT1 ) -
      ACTION    (REP)      -
      ISOLATION (CS)       -
      VALIDATE  (BIND)     -
      RELEASE   (COMMIT)   -
      OWNER     (MATEGJ )  -
      QUALIFIER (MATEGJ )  -
       ENCODING  (1047)
 END
 /*
 //SYSPRINT DD  SYSOUT=*
 //SYSTSPRT DD  SYSOUT=*
 //SYSUDUMP DD  SYSOUT=*

JOB Result - MAXCC

JOB Result - BIND Step

JOB Result - BIND Step Final Report

---