Re: This is strange: an RNQ1011 for no apparent reason

John McKee wrote:

Did the second level help add anything?

Was there a message preceding this in the joblog that might have shed
additional light on this error?

John McKee

Not in the joblog, but I do see this in the dump:

File . . . . . . . . . . . . . . . . . : WTEREL
File Open . . . . . . . . . . . . . . : YES
File at EOF . . . . . . . . . . . . . : NO
File Status . . . . . . . . . . . . . : 01011
Undefined record type is found in file (C G D F).
File Operation . . . . . . . . . . . . : CHAINF
File Routine . . . . . . . . . . . . . : *INZSR
Statement Number . . . . . . . . . . . : 00000508
Record Name . . . . . . . . . . . . . :
Message Identifier . . . . . . . . . . : CPF5006
Record not found in file .
OPEN FEEDBACK
ODP type . . . . . . . . . . . . . . . : DB
File Name . . . . . . . . . . . . . . : WTEREL
Library . . . . . . . . . . . . . . : WINTOUCHP
Member . . . . . . . . . . . . . . . . : WTEREL
Primary Record Length . . . . . . . . : 99
Secondary Record Length . . . . . . . : 4
Input Block Length . . . . . . . . . . : 114

We are chaining on '03', and *WAIT A SECOND!*

I could have sworn there was a record for '03' in the file I could have sworn it was there, and that I was looking at the right instance of the file. And yet there isn't. And if I change the conditions so that the program doesn't have a reason to chain to '03' everything works fine.

WHOSE BRILLIANT IDEA WAS IT AT IBM, TO THROW AN "UNDEFINED RECORD TYPE" EXCEPTION FOR A FAILED CHAIN STATEMENT?!? (urge to strangle!)

I think the problem is solved.

On Fri, Nov 16, 2012 at 7:56 PM, James Lampert <jamesl@xxxxxxxxxxxxxxxxx> wrote:

Given a CHAIN on a keyed, externally described PF.

The format level is correct, and no level check is thrown.

There is nothing visibly wrong with any of the records in the file.

And yet a CHAIN on it throws an RNQ1011 ("Undefined record type . . .").

Can anybody shed any light on this?

--
JHHL

--
This is the RPG programming on the IBM i / System i (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.