Re: CPF5123 - 3 key fields not valid.

["Rich Dotson" <rich_dotson@xxxxxxxxxxx>]

Ron,   The file has only 1 record format and 1 member:

*...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+...
                       Record  Format Level
 Format       Fields   Length  Identifier
 TA930R            9       86  34FCB4BF4B326
   Text . . . . . . . . . . . . . . . . . . . :
 Total number of formats  . . . . . . . . . . :           1
 Total number of fields . . . . . . . . . . . :           9
 Total record length  . . . . . . . . . . . . :          86
Member List
                             Source Creation    Last Change
 Member           Size        Type  Date       Date     Time      Records
 TAP930                61440        08/27/04 12/03/04 14:27:23        390
   Text:  DSI Interface Statement File Definition File
 Total number of members  . . . . . . . . . :                 1
 Total number of members not available  . . :                 0
 Total records  . . . . . . . . . . . . . . :               390
 Total deleted records  . . . . . . . . . . :                 0

----Original Message Follows----
From: RPower@xxxxxxxxxx
Reply-To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
Subject: Re: CPF5123 - 3 key fields not valid.
Date: Thu, 16 Dec 2004 14:39:07 -0330

That file doesn't have more than one record format or members?  Not sure,
but looking at the error message and it seems it may be that it's thinking
you are chaining to one record format, when you should be using TA930R
format?  Shot in the dark I may be totally out to lunch here.

Ron Power
Programmer
Information Services
City Of St. John's, NL
P.O. Box 908
St. John's, NL
A1C 5M2
Tel: 709-576-8132
Email: rpower@xxxxxxxxxx
Website: http://www.stjohns.ca/
___________________________________________________________________________
Success is going from failure to failure without a loss of enthusiasm. -
Sir Winston Churchill




"Rich Dotson" <rich_dotson@xxxxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
16/12/2004 02:13 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
rpg400-l@xxxxxxxxxxxx
cc

Subject
CPF5123 - 3 key fields not valid.






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 is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.


--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.

_________________________________________________________________
Don?t just search. Find. Check out the new MSN Search! 
http://search.msn.click-url.com/go/onm00200636ave/direct/01/