tag a record

[Kenneth Brody]

Quoting Steven Waters (Wed, 27 Apr 2005 12:25:32 -0700):

> G-day,
> I am writing a small program that I want
> to tag with a "X" duplicate P/N's in a file.
> I can't figure out how to get the first instance
> of a duplicate P/N. For example if there are 3 records
> with the same P/N I only get a "X" by record 2 and 3. record 1
> is not X'd.
>
>   1  -------   -   -
>         If: 1 eq ab
>        Then: 12="X";end
>   2  -------   -   -   -
>         If: 1 ne ab
>        Then: ab(40,,g)=1
[...]

(Note that the if on line 2 is unnecessary, as it can't get there if 1
is equal to ab.  Not to mention that if 1 is equal to ab, the assignment
won't really have any effect anyway.)

This should work if you run this in *report while sorting on field 1.

--
KenBrody at BestWeb dot net        spamtrap: <g8ymh8uf001 at sneakemail.com>
http://www.hvcomputer.com
http://www.fileProPlus.com