John McKown wrote on 06/05/2008 01:34:30 PM:
> Use ICETOOL.
>
> //MULTSORT EXEC PGM=ICETOOL
> //SYSPRINT DD SYSOUT=*
> //SYSOUT DD SYSOUT=*
> //TOOLMSG DD SYSOUT=*
> //DFSMSG DD SYSOUT=*
> //TOOLIN DD *
>  SORT FROM(I1) TO(O1) USING(SORT)
>  SORT FROM(I2) TO(O2) USING(SORT)
>  SORT FROM(I3) TO(O3) USING(SORT)
> /*
> //SORTCNTL DD *
>  SORT FIELDS=(10,12,A),FORMAT=CH
> /*
> //SORTWK.. DD ...

You beat me to it, John.  The only thing I would add is that
you don't need to supply SORTWK DDs since ICETOOL automatically
enables DFSORT's dynamic work data set alllcation feature
(DYNALLOC).

Frank Yaeger - DFSORT Development Team (IBM) - [EMAIL PROTECTED]
Specialties: PARSE, JFY, SQZ, ICETOOL, IFTHEN, OVERLAY, Symbols, Migration

 => DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort/

>

----------------------------------------------------------------------
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

Reply via email to