Direct copy of multiple files. Copy files from DD names INFILE1, INFILE2, INFILE3 to OUTFILE1, OUTFILE2, OUTFILE3
//TOOLIN DD * COPY FROM(INFILE1) TO(OUTFILE1) COPY FROM(INFILE2) TO(OUTFILE2) COPY FROM(INFILE3) TO(OUTFILE3)
Copy of multiple files with some processing. Copy files from DD names INFILE1, INFILE2, INFILE3 to OUTFILE1, OUTFILE2, OUTFILE3
//TOOLIN DD * COPY FROM(INFILE1) TO(OUTFILE1) USING(CTL1) COPY FROM(INFILE2) TO(OUTFILE2) USING(CTL2) COPY FROM(INFILE3) TO(OUTFILE3) USING(CTL3) /* //CTL1CNTL DD * SORT FIELDS=(1,5,CH,A) /* //CTL2CNTL DD * SORT FIELDS=(6,5,CH,A) /* //CTL3CNTL DD * SORT FIELDS=COPY OUTFIL CONVERT, OUTREC=(1:5,80,20X)
Use this code 