View previous topic :: View next topic |
Author |
Message |
Ranjish Beginner

Joined: 22 Dec 2002 Posts: 64 Topics: 28 Location: Chennai
|
Posted: Tue Sep 28, 2004 11:29 pm Post subject: Question on duplicate elimination |
|
|
Hi,
I have the following input data for SORT.
00000001AAAAAAAAAAAAA77
00000002AAAAAAAAAAAAA66
00000003AAAAAAAAAAAAA21
00000004AAAAAAAAAAAAA55
00000005AAAAAAAAAAAAA77
00000006AAAAAAAAAAAAA88
00000007AAAAAAAAAAAAA66
00000008AAAAAAAAAAAAA21
My SORT condition is
SORT FIELDS=(9,15,CH,A)
SUM FIELDS=NONE
The output is
00000003AAAAAAAAAAAAA21
00000004AAAAAAAAAAAAA55
00000002AAAAAAAAAAAAA66
00000005AAAAAAAAAAAAA77
00000006AAAAAAAAAAAAA88
Please note that 00000005AAAAAAAAAAAAA77 was kept while 00000001AAAAAAAAAAAAA77 was reoved. I wanted the first occurrence to be kept and 2nd removed. How can I achieve that?
Note: I am using SYNCSORT.
Regards
Ranjish |
|
Back to top |
|
 |
Siva Kumar Sunku Beginner
Joined: 17 Aug 2004 Posts: 25 Topics: 14
|
Posted: Tue Sep 28, 2004 11:53 pm Post subject: |
|
|
Hi Ranjish,
Following Code may help you.
Code: |
//STEP020 EXEC PGM=SYNCSORT
//SYSPRINT DD SYSOUT=*
//SORTIN DD *
00000001AAAAAAAAAAAAA77
00000002AAAAAAAAAAAAA66
00000003AAAAAAAAAAAAA21
00000004AAAAAAAAAAAAA55
00000005AAAAAAAAAAAAA77
00000006AAAAAAAAAAAAA88
00000007AAAAAAAAAAAAA66
00000008AAAAAAAAAAAAA21
/*
//SORTOUT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=(9,15,CH,A),EQUALS
SUM FIELDS=NONE
|
Result
00000003AAAAAAAAAAAAA21
00000004AAAAAAAAAAAAA55
00000002AAAAAAAAAAAAA66
00000001AAAAAAAAAAAAA77
00000006AAAAAAAAAAAAA88
EQUALS is the keyword that maintains the order of the input records.
Hope this helps you.
-Siva. |
|
Back to top |
|
 |
Ranjish Beginner

Joined: 22 Dec 2002 Posts: 64 Topics: 28 Location: Chennai
|
Posted: Wed Sep 29, 2004 12:08 am Post subject: |
|
|
Hi Siva,
Your code worked. Thank you very much for the quick reply.
Regards
Ranjish |
|
Back to top |
|
 |
|
|