20 lines
926 B
Plaintext
20 lines
926 B
Plaintext
//*********************************************************************
|
|
//DTSRSORT PROC RPTNODE='PER.RPT',
|
|
// RPTGEN='(+1)'
|
|
//*********************************************************************
|
|
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS
|
|
// COND=(0,LT)
|
|
//SYSOUT DD SYSOUT=*
|
|
//SORTIN DD DSN=DOESTAX.&MSTNODE..&RPTNODE.&RPTGEN.,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.PROD.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)
|
|
//*********************************************************************
|