>I use Syncsort to do this. > > SORT FIELDS=COPY,STOPAFT=250000 > OUTFIL FILES=01 > END > > SORT FIELDS=COPY,SKIPREC=250000 > OUTFIL FILES=01 > END
The above needs two passes over the input data set. This will do it in one pass: //ICETOOL1 EXEC PGM=ICETOOL //.... //SORTIN DD DSN=.... //OUTDD1 DD DSN=.... //OUTDD2 DD DSN=.... //TOOLIN DD * COPY FROM(SORTIN) USING(SPLT) /* //SPLTCNTL DD * OUTFIL FNAMES=OUTDD1,ENDREC=250000 OUTFIL FNAMES=OUTDD2,STARTREC=250001 /* Peter Hunkeler Credit Suisse ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
