Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist 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: 183
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 reg query on DYNALLOC feature raghuraman123 SYNCSORT 12 Wed Jan 10, 2018 2:42 pm
No new posts query to fetch record which has only ... maxsubrat DB2 12 Mon Dec 11, 2017 5:03 pm
No new posts How to query MAXGENS of an existing P... Chuchulo Hatyzak JCL & VSAM 4 Wed Nov 22, 2017 10:23 pm
No new posts Native SQL Query kishpra DB2 1 Wed Nov 22, 2017 8:38 pm
No new posts ICETOOL - RESIZE DYNAMICALLY kranthikumarb DFSORT/ICETOOL 0 Tue Nov 21, 2017 5:30 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us