CPF5123 - 3 key fields not valid. -- RPG400-L

I am receiving the following CPF message when I am trying to Chain to a file:

Message ID . . . . . . : CPF5123 Message . . . . : 3 key fields not valid. Cause . . . . . : The number of key fields specified for member TAP930 file TAP930 in library OSBDATA is greater than 1, which is the maximum number allowed.

The file (TAP930) has three key fields defined. There is only 1 copy of this file on the system. I checked the open files and it had the file in the library OSBDATA open. Here is the DSPFD output:

Number of key fields  . . . . . . . . . . . :              3
Record format . . . . . . . . . . . . . . . :            TA930R
 Key field . . . . . . . . . . . . . . . . :            TFBANK
   Sequence  . . . . . . . . . . . . . . . :            Ascending
   Sign specified  . . . . . . . . . . . . :            SIGNED
   Zone/digit specified  . . . . . . . . . :            *NONE
   Alternative collating sequence  . . . . :            No
 Key field . . . . . . . . . . . . . . . . :            TFREGION
   Sequence  . . . . . . . . . . . . . . . :            Ascending
   Sign specified  . . . . . . . . . . . . :            SIGNED
   Zone/digit specified  . . . . . . . . . :            *NONE
 Key field . . . . . . . . . . . . . . . . :            TFPRODTYP
   Sequence  . . . . . . . . . . . . . . . :            Ascending

Here is the 'F' spec:

FTAP930    IF   E           K Disk

Here is the /Free code where the error is occuring:

Chain (DMBK : CFBRGN : DMType) TAP930;

I checked the fields I am using to chain with (DMBK, CFBRGN and DMType) and they have the same attributes as the fields in TAP930. I did an EVAL on each of the fields while in debug and they all contained valid data that matched a record that exists in TAP930. There are no overrides in the job.

What else would cause the CPF5123 error?

Thanks,
Rich...

_________________________________________________________________ Express yourself instantly with MSN Messenger! Download today - it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/

This mailing list archive is Copyright 1997-2024 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].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.