//**** //**** PROCESS ERROR REPORT FOR ESSP DATA //**** //**** //**** //DTSRSESP PROC RPTNODE=&RPTNODE., // RPTGEN='(+0)' /* ASSUMES USE WITHIN THE JOB //**** //STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS // COND=(4,LT), // REGION=0K //SYSOUT DD SYSOUT=* //SORTIN DD DSN=DOESTAX.&LVLNODE..&RPTNODE.&RPTGEN,DISP=SHR //SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(15,15),RLSE) 00005199 //SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(15,15),RLSE) 00005299 //SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,(15,15),RLSE) 00005399 //SORTOUT DD DSN=&&SRTRPT, // DISP=(,PASS,DELETE), // UNIT=SYSDA, // SPACE=(8192,(1000,1000),RLSE), // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) //SYSIN DD DSN=DOESTAX.CONV.USER.PARMLIB(DTSSRREC),DISP=SHR //****