Re: record with duplicate key

["Peter Dow" <pcdow@xxxxxxxxxxxxxxx>]

Hi Adam,

Do you have a logical file with a unique key over the physical file? That
is, the duplicate key error may be because of a related logical file's key
fields.

HTH,
Peter Dow
Dow Software Services, Inc.
909 425-0194 voice
909 425-0196 fax

----- Original Message -----
From: "Ray, Adam" <aray@fhp.org>
To: <RPG400-L@midrange.com>
Sent: Wednesday, January 10, 2001 11:37 AM
Subject: record with duplicate key


> I'm having a problem with a program which adds records to a file. I get
> error code 01021 - Tried to write a record that already exists.
> I looked at the program dump and determined what the key of the record it
> was trying to write was. Then I looked in the file it was writing to and
> found one record that was SIMILAR to the record being written, EXCEPT for
> one field in the key was different. The key I am using is comprised of 10
> fields, the 4th one being a signed packed decimal in descending sequence.
> All other fields are character. The field that is different in the 2
records
> is the 5th field of the key. Why is it saying I'm trying to write a
> duplicate key when the keys are different? Is it something to do with the
> DESCEND keyword on the signed packed decimal field? What is going on here,
> I'm stumped?
>
> Adam Ray
> Applications Programmer
> Family Health Partners
> 816-855-1822
> aray@fhp.org <mailto:aray@fhp.org>
> +---
> | This is the RPG/400 Mailing List!
> | To submit a new message, send your mail to RPG400-L@midrange.com.
> | To subscribe to this list send email to RPG400-L-SUB@midrange.com.
> | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator:
david@midrange.com
> +---

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---