Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Query regarding ICETOOL

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
ap_mainframes

Active User


Joined: 29 Dec 2005
Posts: 181
Location: Canada

PostPosted: Mon Apr 24, 2006 10:28 am    Post subject: Query regarding ICETOOL
Reply with quote

Hi,
This is my first use of ICETOOL, but I am not getting desired results.
I want to write the common records between the two datasets into another dataset.
Code:

//S1 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN1 DD DSN=XXXXXXXX.COMP,DISP=SHR
//*N2 DD DSN=YYYYYYY.COMP.A,DISP=SHR
//IN2 DD DSN=ZZZZZZZZZZ,DISP=SHR
//OUT12 DD  SYSOUT=*
//OUT1  DD  SYSOUT=*
//OUT2  DD  SYSOUT=*
//T1   DD DSN=&&T1,UNIT=SYSDA,SPACE=(CYL,(5,5)),
//        DISP=(MOD,PASS)
//TOOLIN DD *
COPY FROM(IN2) TO(T1) USING(CTL1)
COPY FROM(IN2) TO(OUT1) USING(CTL1)
COPY FROM(IN1) TO(T1) USING(CTL2)
COPY FROM(IN1) TO(OUT2) USING(CTL2)
SPLICE FROM(T1) TO(OUT12) ON(1,16,CH) WITH(6503,1) -
USING(CTL3)
//CTL1CNTL DD *
  OUTREC FIELDS=(1,6500,6502:C'11')
/*
//CTL2CNTL DD *
  OUTREC FIELDS=(1,96,6502:C'22')
/*
//CTL3CNTL DD *
  OUTFIL FNAMES=OUT12,INCLUDE=(6502,2,CH,EQ,C'12')
/*


I am not getting anything in OUT12?? can anybody tell me why??

Thanks
Back to top
View user's profile Send private message

sril.krishy

Active User


Joined: 30 Jul 2005
Posts: 182
Location: hyderabad

PostPosted: Mon Apr 24, 2006 4:38 pm    Post subject:
Reply with quote

Hi,
Could you please provide the sample data for the 2 i/p files.Do you have any duplicate values either of the files etc.. will need to be known before getting the desired results.

Please put some dummy data for both the files and the desired o/p as well.

Thank you
Krishy
Back to top
View user's profile Send private message
priyesh.agrawal

Senior Member


Joined: 28 Mar 2005
Posts: 1452
Location: Chicago, IL

PostPosted: Mon Apr 24, 2006 6:05 pm    Post subject: Re: Query regarding ICETOOL
Reply with quote

What is LRECL for IN1 & IN2 ...??

Regards,
Priyesh.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Join in SQL Query vickey_dw DB2 2 Tue Jan 17, 2017 12:15 am
This topic is locked: you cannot edit posts or make replies. MQ setup query mohitsaini Java & MQSeries 4 Sun Jan 08, 2017 1:53 am
No new posts DB2 query Using Recursion, Converting... smilewithashu2 DB2 1 Tue Jan 03, 2017 12:50 pm
No new posts SQL query to run through list of valu... Ni3-db2 DB2 14 Wed Dec 14, 2016 9:52 am
This topic is locked: you cannot edit posts or make replies. Db2 SQL query to convert rows into co... subratarec DB2 5 Thu Nov 17, 2016 4:51 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us