//DTSRQ310 JOB (UI,4300,3400,T),DTSBU310,CLASS=S,MSGCLASS=X,            00000010
//          USER=#DOADTS,
//          NOTIFY=ECNTZL1
//**
// SET LVLNODE='PROD'
// SET MSTNODE='PROD'
//**
//PROCLIB  JCLLIB ORDER=DOESTAX.&LVLNODE..PROCLIB                       00001600
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00001600
//*                                                                     00001700
//STEP0100 EXEC PGM=DTSBU310,    BUILD WITM FILE
//             COND=(0,LT),
//             REGION=4096K
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//CAIMRPTS DD  SYSOUT=*
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//*
//DTSFBIO  DD  DSN=DOESTAX.&LVLNODE..WITM.FILE,
//             DISP=(NEW,CATLG,CATLG),
//*            DISP=(OLD,KEEP,KEEP),
//             SPACE=(CYL,(75,15),RLSE),
//             DCB=(RECFM=FB,LRECL=17,BLKSIZE=30600)
/*
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0',    SORT ITM RECORDS
//             COND=(0,LT)
//SYSOUT   DD  SYSOUT=*
//SORTIN   DD  DSN=DOESTAX.&LVLNODE..WITM.FILE,
//             DISP=(OLD,KEEP,KEEP)
//*
//SORTOUT  DD DSN=&&WITMSORT,
//             DISP=(,PASS,DELETE),
//             UNIT=SYSDA,
//             SPACE=(CYL,(75,15),RLSE),
//             DCB=(RECFM=FB,LRECL=17,BLKSIZE=30600)
//SYSIN    DD  DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSWITM),DISP=SHR
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(50,25),RLSE)
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(50,25),RLSE)
//SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,(50,25),RLSE)
//SORTWK04 DD UNIT=SYSDA,SPACE=(CYL,(50,25),RLSE)
//*********************************************************
//STEP0300 EXEC PGM=IDCAMS,         DELETE/DEFINE ITM FILE
//            REGION=0K
//SYSPRINT DD  SYSOUT=*
//SYSIN    DD  DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDITM),DISP=SHR
//*
//**********************************************************
//*
//STEP0310 EXEC PGM=DTSBD998,       INITIALIZE ITM FILE
//             REGION=4096K
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//CAIMRPTS DD  SYSOUT=*
//DTSFITM  DD  DSN=DOESTAX.&LVLNODE..VSAM.ITM,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//SYSIN    DD  DSN=DOESTAX.PROD.APPL.PARMLIB(DTSIITM),DISP=SHR
//******************************************************
//*
//STEP0400 EXEC PGM=IDCAMS,          LOAD VSAM FILE
//             COND=(0,LT)
//SYSPRINT DD SYSOUT=*
//INDD01   DD DSN=&&WITMSORT,
//             DISP=(OLD,PASS,DELETE)
//OUTDD01  DD DSN=DOESTAX.&LVLNODE..VSAM.ITM,DISP=SHR
//SYSIN    DD  DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR
//*
//*********************************************************************