I'm sorry, I had the message id wrong. The message I'm getting is:

                         Additional Message Information

 Message ID . . . . . . :   RNQ1011       Severity . . . . . . . :   99

 Message type . . . . . :   Inquiry

 Date sent  . . . . . . :   07/28/98      Time sent  . . . . . . :

 Message . . . . :   Undefined record type is found in file PRLED201 (C G D
 Cause . . . . . :   RPG procedure HRRCB05 in program V5TEST/HRRCB05 at

   statement 468 detected an undefined record type in file PRLED201. If
   PRLED201 is a program-described file, a record is read with

   record-identification codes that do not match any of the record types

   defined on the input specifications for the file. If file PRLED201 is an

   externally-described file, a record is read with a format unknown to the
   program. The actual file is V5TEST/PRLED201(PRLED201).

 Recovery  . . . :   Contact the person responsible for program maintenance
   determine the cause of the problem.

Statement 468 is:

    468 C     Edd_Key       Chain     Prled201
    469 C                   If        NOT %EOF

and Edd_Key is a key list defined correctly to match the key to PRLED201.

Thanks again for any help anyone can offer.

Mark Welte

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

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].