//DTSBZ263 PROC                                                         00000010
//*                                                                     00001700
//STEP0100 EXEC PGM=DTSBZ263,     CONVERT WTC FILE
//             COND=(0,LT),
//             REGION=4096K
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//CAIMRPTS DD  SYSOUT=*
//**
//OLDWTCI  DD  DSN=DOESTAX.&LVLNODE..VSAM.WTX,DISP=SHR,                 00005000
//             AMP=('BUFNI=5,BUFND=10')
//*
//NEWWTCO  DD  DSN=&&BZ263,                                             00005000
//             DISP=(NEW,PASS,DELETE),                                  00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(1280,(2000,5000),RLSE),                           00008000
//             DCB=(RECFM=FB,LRECL=128,BLKSIZE=1280)                    00009000
//*
//STEP0100 EXEC PGM=IDCAMS,         DELETE/DEFINE WTC FILE
//             REGION=0K
//SYSPRINT DD  SYSOUT=*
//SYSIN    DD  DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDWTC),DISP=SHR
//*
//*******************************************************************
//STEP0300 EXEC PGM=IDCAMS          LOAD VSAM.WTC
//SYSPRINT DD  SYSOUT=*
//INDD01   DD  DSN=&&BZ263,DISP=(OLD,DELETE,DELETE)
//OUTDD01  DD  DSN=DOESTAX.&LVLNODE..VSAM.WTC,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=30')
//SYSIN    DD  DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR
//*