//*****
//*
//*    UI TAX ACCOUNTING SUMMARY EXTRACT.
//*
//*****
//DTSUD510 PROC CHKONLY='N',
//             RUNTYPE='  ',
//             RPTGEN='+1'
//**********************************************************************
//STEP0100 EXEC PGM=DTSBD510,                 ACCOUNTING SUMMARY EXTRACT
//             COND=(0,LT),
//*            TIME=(10,00),
//             REGION=2048K,
//             PARM='&RUNTYPE.,&CHKONLY.'
//SYSOUT   DD  SYSOUT=*
//CEEDUMP  DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//CAIMRPTS DD  SYSOUT=*
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//DTSFMSTI DD  DUMMY,DCB=(RECFM=VB,LRECL=4096,BLKSIZE=8192)
//DTSFVRO1 DD  DSN=DOESTAX.PROD.PER.RPT(&RPTGEN),
//             DISP=(,CATLG,DELETE),
//             SPACE=(8192,(200,200),RLSE),
//             DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192)
//SYSIN    DD  DUMMY,DCB=BLKSIZE=80
//******************************************************************