zOs/TX/WK992DBI

//A540769L JOB (CP00,KE50),'DBA TOOL',
//*       RESTART=STEPNAME, <== FOR RESTART REMOVE * AND ENTER STEP NAME
//         MSGCLASS=T,TIME=1440,
//         NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG,SYSTEM=S11
//*
//*
//**********************************************************************
//*
//* DB2 BATCH
//*
//* BATCH JOB TO EXECUTE SQL
//*
//***********************************************************ADB2PSQL***
//DB2BATCH EXEC PGM=IKJEFT01,DYNAMNBR=100
//UTPRINT  DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//ADBRPTSM DD SYSOUT=*
//SYSTSIN  DD *
  DSN SYSTEM(DVTB)
BIND PACKAGE(TESTWK) -
  MEM(XBARR0) -
  QUAL(BUA) -
  OWNER(CMNBATCH) -
  LIB('CMN.DIV.P0.ELAB.#000667.DBR') -
  SQLERROR(NOPACKAGE) -
  VALID(B) -
  ISOL(CS) -
  EXPL(YES) -
  CURRENTD(N) -
  ACTION(REPLACE)                -
  DEGREE(1)                       -
  DYNAMICRULES(BIND)              -
  KEEPDYNAMIC(N)                   -
  REOPT(NONE)                       -
  DBPROTOCOL(D)                      -
  ENCODING(500)                       -
  IMMEDWRITE(N)                        -
  ROUNDING(HALFEVEN)