subject:"ICETOOL \- Question regarding a statement in the ICETOOL Guide"

Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

2017-10-27 Thread George, William@FTB

Thanks Sri!
I'll check this out. I have saved a link to the most recent DFSORT A.P.G. and 
looked at JOINKEYS.  At first glance it seems somewhat daunting but I'll study 
it and try it out.

Bill


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Sri h Kolusu
Sent: Friday, October 27, 2017 9:09 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

Bill,

Here is a DFSORT JOINKEYS job which will give you the desired results similar 
to splice


//STEP0100 EXEC PGM=SORT 
//SYSOUT   DD SYSOUT=* 
//INA  DD * 
VICKY 
FRANK 
CARRIE 
HOLLY 
PAUL 
//INB  DD * 
KAREN 
HOLLY 
CARRIE 
VICKY 
MARY 
//OUT12DD SYSOUT=* 
//OUT1 DD SYSOUT=* 
//OUT2 DD SYSOUT=* 
//SYSINDD * 
  OPTION COPY 
  JOINKEYS F1=INA,FIELDS=(1,10,A) 
  JOINKEYS F2=INB,FIELDS=(1,10,A) 
  JOIN UNPAIRED 
  REFORMAT FIELDS=(F1:1,10,?,F2:1,10) 

  OUTFIL FNAMES=OUT12,INCLUDE=(11,1,CH,EQ,C'B'),BUILD=(1,10) 
  OUTFIL FNAMES=OUT1,INCLUDE=(11,1,CH,EQ,C'1'),BUILD=(1,10) 
  OUTFIL FNAMES=OUT2,INCLUDE=(11,1,CH,EQ,C'2'),BUILD=(12,10) 
//* 


Joinkeys is explained in detail here

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.2.0/com.ibm.zos.v2r2.icea100/joinkeys.htm

Also here are the examples (look up example 5 )

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.icea100/ice2ca_JOINKEYS_application_examples.htm


Further if you have any questions please send an email to our hotline 
(dfs...@us.ibm.com) or you can mail me directly.

Thanks,
Sri Hari Kolusu
DFSORT Development
IBM Corporation

IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> wrote on 
10/26/2017 11:41:15 PM:

> From: "George, William@FTB" <bill.geo...@ftb.ca.gov>
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 10/26/2017 11:41 PM
> Subject: Re: ICETOOL - Question regarding a statement in the ICETOOL 
Guide
> Sent by: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU>
> 
> Thanks Sri!
> JOINKEYS... that's a new one on me.  I guess I have an outdated DFSORT 
manual.
> Here's the link I have: 
http://publibz.boulder.ibm.com/epubs/pdf/ice1ca30.pdf
> 
> Thanks again
> Bill
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU
> ] On Behalf Of Sri h Kolusu
> Sent: Thursday, October 26, 2017 10:56 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: ICETOOL - Question regarding a statement in the ICETOOL 
Guide
> 
> George,
> 
> It was a typo in our publications, it should be 1-10 instead of 1-3.
> The sorting of 1-10 bytes is done with ON statement on SPLICE. 
> Please look at the DFSMSG dataset and you will see the SPLICE 
> control cards generates the SORT statement with 1,10,CH,A
> 
> We will update our pubs. Thanks for bringing it to our attention.
> 
> 
>  "We sort the records of T1 on positions 1-10 and splice the second 
> id byte for matching records. We use KEEPNODUPS to keep non-
> duplicate records. 
> 
> 
> Just an fyi, SPLICE is an Older technique to find the matching records. 
> Ideally we suggest using JOINKEYS
> 
> 
> Thanks,
> Sri Hari Kolusu
> DFSORT Development
> IBM Corporation
> 
> IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> wrote on
> 10/26/2017 03:09:04 AM:
> 
> > From: "George, William@FTB" <bill.geo...@ftb.ca.gov>
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Date: 10/26/2017 03:09 AM
> > Subject: ICETOOL - Question regarding a statement in the ICETOOL Guide 

> > Sent by: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU>
> > 
> > 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=&,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

Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

2017-10-27 Thread Sri h Kolusu

Bill,

Here is a DFSORT JOINKEYS job which will give you the desired results 
similar to splice


//STEP0100 EXEC PGM=SORT 
//SYSOUT   DD SYSOUT=* 
//INA  DD * 
VICKY 
FRANK 
CARRIE 
HOLLY 
PAUL 
//INB  DD * 
KAREN 
HOLLY 
CARRIE 
VICKY 
MARY 
//OUT12DD SYSOUT=* 
//OUT1 DD SYSOUT=* 
//OUT2 DD SYSOUT=* 
//SYSINDD * 
  OPTION COPY 
  JOINKEYS F1=INA,FIELDS=(1,10,A) 
  JOINKEYS F2=INB,FIELDS=(1,10,A) 
  JOIN UNPAIRED 
  REFORMAT FIELDS=(F1:1,10,?,F2:1,10) 

  OUTFIL FNAMES=OUT12,INCLUDE=(11,1,CH,EQ,C'B'),BUILD=(1,10) 
  OUTFIL FNAMES=OUT1,INCLUDE=(11,1,CH,EQ,C'1'),BUILD=(1,10) 
  OUTFIL FNAMES=OUT2,INCLUDE=(11,1,CH,EQ,C'2'),BUILD=(12,10) 
//* 


Joinkeys is explained in detail here

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.2.0/com.ibm.zos.v2r2.icea100/joinkeys.htm

Also here are the examples (look up example 5 )

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.icea100/ice2ca_JOINKEYS_application_examples.htm


Further if you have any questions please send an email to our hotline 
(dfs...@us.ibm.com) or you can mail me directly.

Thanks,
Sri Hari Kolusu
DFSORT Development
IBM Corporation

IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> wrote on 
10/26/2017 11:41:15 PM:

> From: "George, William@FTB" <bill.geo...@ftb.ca.gov>
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 10/26/2017 11:41 PM
> Subject: Re: ICETOOL - Question regarding a statement in the ICETOOL 
Guide
> Sent by: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU>
> 
> Thanks Sri!
> JOINKEYS... that's a new one on me.  I guess I have an outdated DFSORT 
manual.
> Here's the link I have: 
http://publibz.boulder.ibm.com/epubs/pdf/ice1ca30.pdf
> 
> Thanks again
> Bill
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU
> ] On Behalf Of Sri h Kolusu
> Sent: Thursday, October 26, 2017 10:56 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: ICETOOL - Question regarding a statement in the ICETOOL 
Guide
> 
> George,
> 
> It was a typo in our publications, it should be 1-10 instead of 1-3.
> The sorting of 1-10 bytes is done with ON statement on SPLICE. 
> Please look at the DFSMSG dataset and you will see the SPLICE 
> control cards generates the SORT statement with 1,10,CH,A
> 
> We will update our pubs. Thanks for bringing it to our attention.
> 
> 
>  "We sort the records of T1 on positions 1-10 and splice the second 
> id byte for matching records. We use KEEPNODUPS to keep non-
> duplicate records. 
> 
> 
> Just an fyi, SPLICE is an Older technique to find the matching records. 
> Ideally we suggest using JOINKEYS
> 
> 
> Thanks,
> Sri Hari Kolusu
> DFSORT Development
> IBM Corporation
> 
> IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> wrote on
> 10/26/2017 03:09:04 AM:
> 
> > From: "George, William@FTB" <bill.geo...@ftb.ca.gov>
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Date: 10/26/2017 03:09 AM
> > Subject: ICETOOL - Question regarding a statement in the ICETOOL Guide 

> > Sent by: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU>
> > 
> > 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=&,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)

Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

2017-10-26 Thread George, William@FTB

Well... I guess it's time to hunt out a more current release.  8-D

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of retired mainframer
Sent: Thursday, October 26, 2017 1:56 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

That was copyrighted in 2008 and synchronized with z/OS 1.10, 9 years and 6 
releases back.

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
> On Behalf Of George, William@FTB
> Sent: Thursday, October 26, 2017 11:11 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: ICETOOL - Question regarding a statement in the ICETOOL 
> Guide
> 
> Thanks Sri!
> JOINKEYS... that's a new one on me.  I guess I have an outdated DFSORT
manual.
> Here's the link I have:
http://publibz.boulder.ibm.com/epubs/pdf/ice1ca30.pdf

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

__
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

Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

2017-10-26 Thread retired mainframer

That was copyrighted in 2008 and synchronized with z/OS 1.10, 9 years and 6
releases back.

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of George, William@FTB
> Sent: Thursday, October 26, 2017 11:11 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: ICETOOL - Question regarding a statement in the ICETOOL Guide
> 
> Thanks Sri!
> JOINKEYS... that's a new one on me.  I guess I have an outdated DFSORT
manual.
> Here's the link I have:
http://publibz.boulder.ibm.com/epubs/pdf/ice1ca30.pdf

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

2017-10-26 Thread George, William@FTB

Thanks Sri!
JOINKEYS... that's a new one on me.  I guess I have an outdated DFSORT manual.
Here's the link I have: http://publibz.boulder.ibm.com/epubs/pdf/ice1ca30.pdf

Thanks again
Bill

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Sri h Kolusu
Sent: Thursday, October 26, 2017 10:56 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

George,

It was a typo in our publications, it should be 1-10 instead of 1-3.  The 
sorting of 1-10 bytes is done with ON statement on SPLICE. Please look at the 
DFSMSG dataset and you will see the SPLICE control cards generates the SORT 
statement with 1,10,CH,A

We will update our pubs. Thanks for bringing it to our attention.


 "We sort the records of T1 on positions 1-10 and splice the second id byte for 
matching records. We use KEEPNODUPS to keep non-duplicate records. 


Just an fyi, SPLICE is an Older technique to find the matching records. 
Ideally we suggest using JOINKEYS


Thanks,
Sri Hari Kolusu
DFSORT Development
IBM Corporation

IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> wrote on
10/26/2017 03:09:04 AM:

> From: "George, William@FTB" <bill.geo...@ftb.ca.gov>
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 10/26/2017 03:09 AM
> Subject: ICETOOL - Question regarding a statement in the ICETOOL Guide 
> Sent by: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU>
> 
> 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=&,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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

2017-10-26 Thread Sri h Kolusu

George,

It was a typo in our publications, it should be 1-10 instead of 1-3.  The 
sorting of 1-10 bytes is done with ON statement on SPLICE. Please look at 
the DFSMSG dataset and you will see the SPLICE control cards generates the 
SORT statement with 1,10,CH,A

We will update our pubs. Thanks for bringing it to our attention.


 "We sort the records of T1 on positions 1-10 and splice the second id 
byte for matching records. We use KEEPNODUPS to keep non-duplicate 
records. 


Just an fyi, SPLICE is an Older technique to find the matching records. 
Ideally we suggest using JOINKEYS


Thanks,
Sri Hari Kolusu
DFSORT Development
IBM Corporation

IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> wrote on 
10/26/2017 03:09:04 AM:

> From: "George, William@FTB" <bill.geo...@ftb.ca.gov>
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 10/26/2017 03:09 AM
> Subject: ICETOOL - Question regarding a statement in the ICETOOL Guide
> Sent by: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU>
> 
> 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=&,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

Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

2017-10-26 Thread George, William@FTB

Thanks Steve... I tend to believe also it is a mistake (typo maybe) and should 
state it is sorted on the ON positions.
I'll check out this 'mini' guide. 

Bill

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Steve Smith
Sent: Thursday, October 26, 2017 5:29 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

Nothing in the "JCL code".
It appears to me the example has a mistake: either they meant they sort on 
"positions 1-10", or the SPLICE statement should have "ON(1,3,CH)".  This 
example is so trivial, it's hard to know for sure what they meant.  But 
probably it's the former.

There's a really helpful manual I found called "DFSORT: ICETOOL Mini-User 
Guide" (a misnomer -- full-sized users will find it
valuable) by Frank L. Yaeger.  My copy is dated October 2010.  It came from the 
DFSORT Team in San Jose, so it should be available from IBM.

sas

On Wed, Oct 25, 2017 at 5:39 PM, George, William@FTB <bill.geo...@ftb.ca.gov> 
wrote:
> I am confused about a statement I'm seeing in the DFSORT - ICETOOL Chapter 
> and its example:
>

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

__
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

Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

2017-10-26 Thread Lizette Koehler

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 - userdfs...@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=&,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

Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

2017-10-26 Thread Steve Smith

Nothing in the "JCL code".
It appears to me the example has a mistake: either they meant they
sort on "positions 1-10", or the SPLICE statement should have
"ON(1,3,CH)".  This example is so trivial, it's hard to know for sure
what they meant.  But probably it's the former.

There's a really helpful manual I found called "DFSORT: ICETOOL
Mini-User Guide" (a misnomer -- full-sized users will find it
valuable) by Frank L. Yaeger.  My copy is dated October 2010.  It came
from the DFSORT Team in San Jose, so it should be available from IBM.

sas

On Wed, Oct 25, 2017 at 5:39 PM, George, William@FTB
 wrote:
> I am confused about a statement I'm seeing in the DFSORT - ICETOOL Chapter 
> and its example:
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

ICETOOL - Question regarding a statement in the ICETOOL Guide

2017-10-25 Thread George, William@FTB

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=&,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

Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

Re: ICETOOL - Question regarding a statement in the ICETOOL Guide

ICETOOL - Question regarding a statement in the ICETOOL Guide

10 matches

Site Navigation

Mail list logo

Footer information