//STEP1 EXEC PGM=SORT

//SYSPRINT DD SYSOUT=*

//SYSOUT DD SYSOUT=*

//SORTIN DD DSN=INPUT.DATA,DISP=SHR

//OUTDATA DD DSN=OUTPUT.DATA,DISP=(NEW,CATLG,DELETE)

.

.

.

//SYSIN DD *

OPTION COPY

OUTFIL FNAMES=OUTDATA,SAMPLE=2

THIS WILL COPY ALL EVEN RECORDS

-------------------------------------------

FOR ODD RECORDS

OUTFIL FNAMES=OUTDATA,STARTREC=1,SAMPLE=2