//STEP001 EXEC PGM=SYNCSORT
//*SORTIN DD DSN=PCCAR.AR4050WP.SORTED.REGIONS.BKUP.G0005V00,
//SORTIN DD DSN=PCCPU.PU0400DP.INPUT.TRACRECS(0),
// DISP=SHR
//SORTOUT DD DSN=TCCPU.PU0400DP.INPUT.TRACRECS.VBTOFB,
// DISP=(,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(CYL,(550,150),RLSE),
// DCB=(RECFM=FB,BLKSIZE=0)
//SYSOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(1:5,10000),CONVERT
//
//*SORTIN DD DSN=PCCAR.AR4050WP.SORTED.REGIONS.BKUP.G0005V00,
//SORTIN DD DSN=PCCPU.PU0400DP.INPUT.TRACRECS(0),
// DISP=SHR
//SORTOUT DD DSN=TCCPU.PU0400DP.INPUT.TRACRECS.VBTOFB,
// DISP=(,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(CYL,(550,150),RLSE),
// DCB=(RECFM=FB,BLKSIZE=0)
//SYSOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(1:5,10000),CONVERT
//
No comments:
Post a Comment