//DESBD125 PROC                                                         00000010
//*********************************************************************
//STEP0100 EXEC PGM=DESBD125,PARM='&LOGNO.'
//*
//BD125W4I DD  DSN=DOESTAX.CONV.&W4FILE.,
//             DISP=SHR
//*
//BD125W4O DD  DSN=&&BD125,
//             DISP=(,PASS,DELETE),
//             UNIT=SYSDA,
//             SPACE=(9000,(900,900),RLSE),
//             DCB=(RECFM=FB,LRECL=90,BLKSIZE=9000)
//*
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR                                      00220002
//*****************************************************************     00320000
//STEP0200 EXEC PGM=IDCAMS,COND=(0,LT)                                  00590044
//SYSPRINT DD SYSOUT=*                                                  00600044
//*
//INDD01   DD DSN=&&BD125,DISP=(OLD,DELETE,DELETE)                      00610044
//OUTDD01  DD DSN=DOESTAX.CONV.&W4FILE.,DISP=OLD                        00620044
//*
//SYSIN    DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR      00630044
//*                                                                     00640044