//****
//DESRSORT PROC   LGEN='(+0)'
//****
//STEP0100 EXEC PGM=SORT,                          SORT REPORT RECORDS
//             COND=(0,LT),
//             REGION=0M
//SYSOUT   DD  SYSOUT=*
//SORTIN   DD  DSN=DOESTAX.&LVLNODE..DES.RPT&LGEN.,
//             DISP=SHR
//SORTOUT  DD  DSN=&&SRTRPT,
//             DISP=(,PASS,DELETE),
//             UNIT=SYSDA,
//             SPACE=(16384,(1000,1000),RLSE),
//             DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192)
//SYSIN    DD  DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSRREC),DISP=SHR
//SORTWK01 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)
//SORTWK02 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)
//SORTWK03 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)
//SORTWK04 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)
//****