If you were not aware, there is a dfsort hotline where you can email any DFSORT question to IBM. This is a no charge service
To do so - user dfs...@us.ibm.com Lizette > -----Original Message----- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of George, William@FTB > Sent: Wednesday, October 25, 2017 2:39 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: ICETOOL - Question regarding a statement in the ICETOOL Guide > > I am confused about a statement I'm seeing in the DFSORT - ICETOOL Chapter > and its example: > Example 3 - Create files with matching and non-matching records I've copied > the example below and my question is regarding the last line below and it > statement on sorting: > We sort the records of T1 on positions 1-3 and splice the second id byte for > matching records. > > Where in the JCL code does it state to sort the T1 records on positions 1-3?? > > //S3 EXEC PGM=ICETOOL > //TOOLMSG DD SYSOUT=* > //DFSMSG DD SYSOUT=* > //IN1 DD * > Vicky > Frank > Carrie > Holly > Paul > /* > //IN2 DD * > Karen > Holly > Carrie > Vicky > Mary > /* > //OUT12 DD SYSOUT=* > //OUT1 DD SYSOUT=* > //OUT2 DD SYSOUT=* > //T1 DD DSN=&&T1,DISP=(MOD,PASS),UNIT=SYSDA,SPACE=(TRK,(5,5)) > //TOOLIN DD * > COPY FROM(IN1) TO(T1) USING(CTL1) > COPY FROM(IN2) TO(T1) USING(CTL2) > SPLICE FROM(T1) TO(OUT12) ON(1,10,CH) WITH(13,1) USING(CTL3) KEEPNODUPS > /* > //CTL1CNTL DD * > OUTREC FIELDS=(1,10,12:C'11') > /* > //CTL2CNTL DD * > OUTREC FIELDS=(1,10,12:C'22') > /* > //CTL3CNTL DD * > OUTFIL FNAMES=OUT12,INCLUDE=(12,2,CH,EQ,C'12'),OUTREC=(1,10) > OUTFIL FNAMES=OUT1,INCLUDE=(12,2,CH,EQ,C'11'),OUTREC=(1,10) > OUTFIL FNAMES=OUT2,INCLUDE=(12,2,CH,EQ,C'22'),OUTREC=(1,10) > /* > > We copy the IN1 records to the T1 data set and add an identifier of '11' to > show they come from FILE1. > We copy the IN2 records to the end (MOD) of the T1 data set and add an > identifier of '22' to show they come from FILE2. > We sort the records of T1 on positions 1-3 and splice the second id byte for > matching records. > > > Thanks for any insights > Bill > > ______________________________________________________________________ > CONFIDENTIALITY NOTICE: This email from the State of California is for the > sole use of the intended recipient and may contain confidential and > privileged information. Any unauthorized review or use, including disclosure > or distribution, is prohibited. If you are not the intended recipient, please > contact the sender and destroy all copies of this email. > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, send email to > lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
