=?iso-8859-1?Q?R=E9f=2E?= : Re: =?iso-8859-1?Q?R=E9f=2E?= : QUICK Screen OccurrenceChecking

[Carol Kaffenberger]

Z,

I ended up using this logic.  It makes much more sense to me.  I like
being able to trap this condition in the input procedure.  Thanks
again for your help.

Carol

zafrir.amitai@bnpparibas.com wrote:

> Hi,
> I stooped being lazy and I actually tried it, so the best code is
>
> temp t-occ
>
> proc input zip
> begin
> let t-occ = occurrence
> for zip-file
> begin
>  if fieldtext = zip of zip-file  &
>    and  t-occ <> occurrence
>       then error "Duplicate"
>   end
> end
>
> zip-file is the detail file.
> I apologise for the confusion, but we are getting there.
> Bye,
> Z.
>