|
View previous topic :: View next topic
|
| Author |
Message |
nkothako
Active User
Joined: 26 Nov 2008
Posts: 125
Location: chennai
|
|
|
|
| Code: |
//PS050 EXEC PGM=ICETOOL,COND=(4,LT)
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//SORTIN DD DSN=File1.SORTED,DISP=SHR
// DD DSN=File2.PRVDSN,DISP=SHR
//OUTPUT DD DSN=File3.CURDSN,
//TOOLIN DD *
SELECT FROM(SORTIN) TO(OUTPUT) ON(1,80,CH) NODUPS
/*
|
CASE #1
The above code working what i need in the below senerio
Sorted file
1
2
3
PRVDSN file
1
2
and desired out put is
3
Case #2
Sorted file
1
2
PRVDSN file
1
2
3
But its writing record 3 of PRVDSN file into output file which I don't want to happen... Is there anyway...highly helpful |
|
| Back to top |
|
 |
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix
|
|
|
|
Hello,
Suggest you read about JOINKEYS.
There are many examples here in the forum. In the blue line near the top of the page is a SEARCH function. Search for JOINKEYS in this part of the forum (DFSORT/ICetool).
If you are going to do more with the sort, suggest you download a copy of the documentation so it will be convenient. |
|
| Back to top |
|
|
Pandora-Box
Global Moderator
.jpg)
Joined: 07 Sep 2006
Posts: 1592
Location: Andromeda Galaxy
|
|
|
|
Read the manual about JOIN UNPAIRED
Lots of examples in forum
Also let us know the sort product that is being used |
|
| Back to top |
|
|
magesh23586
Active User
Joined: 06 Jul 2009
Posts: 213
Location: Chennai
|
|
|
|
| Code: |
//STEP01 EXEC PGM=SORT,COND=(4,LT)
//SYSOUT DD SYSOUT=*
//SORTJNF1 DD DSN=File1.SORTED,DISP=SHR
//SORTJNF2 DD DSN=File2.PRVDSN,DISP=SHR
//SORTOUT DD DSN=DSN=File3.CURDSN,DISP=SHR
//SYSIN DD *
JOINKEYS FILE=F1,FIELDS=(1,1,A)
JOINKEYS FILE=F2,FIELDS=(1,1,A)
REFORMAT FIELDS=(F1:1,Lenthoffile1.sorted)
JOIN UNPAIRED,F1,ONLY
SORT FIELDS=COPY
/*
|
|
|
| Back to top |
|
|
|
|
