|
|
| Author |
Message |
ap_mainframes
Active User
Joined: 29 Dec 2005
Posts: 116
|
|
|
|
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 |
|
 |
References
|
 Posted: Mon Apr 24, 2006 10:28 am Post subject: Re: Query regarding ICETOOL |
|
|
|
|
sril.krishy
Active User
Joined: 30 Jul 2005
Posts: 161
Location: hyderabad
|
|
|
|
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 |
|
|
priyesh.agrawal
Global Moderator
Joined: 28 Mar 2005
Posts: 1504
Location: Chicago, IL
|
|
|
|
What is LRECL for IN1 & IN2 ...??
Regards,
Priyesh. |
|
| Back to top |
|
|
|
|
|
