The below ICETOOL example gives new thoughts on copying single data set to multiful data sets.
You can write JCL in Mainframe as below for this. Maximum output data sets limit is 10.
//EXAMP JOB …
//TOOL EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=A
//DFSMSG DD SYSOUT=A
//TOOLIN DD *
COPY FROM(N) TO(DASD,PRINT,TAPE) =
COUNT FROM(IN2)
SORT FROM(IN1) TO(OUT1) USING(CTL1) SPLICE FROM(CONCT) TO(COMBINE) ON(11,5,CH) WITH(41,2) UNIQUE FROM(OUT1) ON(3,2,PD) VERIFY FROM(IN2) ON(1,2,ZD) ON(41,6,PD)
Notes: You can combine ICETOOL with DFSORT control cards as above.
Keep Reading
