Find Duplicate in a ps file

cvadlamudi · Active User Joined: 19 Apr 2007 Posts: 54 Location: India

Hi All,

Is there any tso command which can be used to find a duplicate record in a file.

Regards,
Mouli

expat · Posted: Fri May 09, 2008 5:49 pm Post subject:

Not that I know of.

ParagChouguley · Posted: Fri May 09, 2008 6:33 pm Post subject:

Interesting Requirement...........!

I usually use SORT utilities for this thru JCL.
Using SORT command on TSO, one can get duplicate records one after another...................But again how to see if duplicates exists ??

dbzTHEdinosauer · Posted: Fri May 09, 2008 6:45 pm Post subject:

if you can edit/VIEW the file, and it is sorted by the dup position that you are looking for, you can write a quick macro that can find dups for you.
i normally x all, and then only show dups.

cvadlamudi · Active User Joined: 19 Apr 2007 Posts: 54 Location: India

How the x all command is used, do u say XSUM in the JCL or it is a tso command...

Regards,
Mouli

acevedo · Active User Joined: 11 May 2005 Posts: 280 Location: Spain

as Dick pointed it's easy to get it using a Macro, sure there's a lot of ways but this is what I use:

1-Sort for field desired (start and length).
2-Exclude all
3-loop from 1 to zlast, if actualline (s,l) = previousline (s,l) then change status to nx.

you can play with flip or delete excluded or non-excluded...

hth.