RE: Program Described File

Cyndi,

I apologize for coming in late to the dance, but I don't recall seeing this
before.

And I may not understand the problem, but, if I'm close, the issue is with a
record of a program described file that you simply want to ignore.

Copying and passing from the archives:

IFILE01 NS 01 25 C1
I 01 06 CLIENT Rcd 1
I 07 21 ID
I 287 288 DYS

IFILE01 NS 02 25 CB
I 01 06 CLIENT Rcd B
I 07 21 ID
I 49 49 N61
I 74 74 N62

IFILE01 NS 03 25NC1 26 CI 27 CD Rcd /
I 01 06 CLIENT
I 07 21 ID
I 26 75 NAME

IFILE01 NS 99 25 Z2 25 D0 Rcd A

The issue seems to be the "99" record which you want to simply ignore. I
had this issue years ago (S/3). I tried to identify all of the
possibilities that did not meet the preceding definitions. I found out that
this was a waste of effort (after the program blew up in my ugly face a
couple of times, mind you). Simply set the *last* definition of the file
as:

IFILE01 NS 99

The way the RPG cycle works (guessing it's a primary file; you never said)
is that it checks the input records *until* it finds a match. Once it (the
Cycle) finds an match, it quits looking and skips to Calcs. That is, the
example I gave (above) will catch anything that is not an 01, 02, or 03
record. That is, only *one* of the input record IDs can be turned on by the
cycle - unless you turn it on in Calcs (which I've seen done - sadly).

Or did I completely misunderstand the problem?

Jerry C. Adams
IBM i Programmer/Analyst
I'd tell you to go to Hell, but I work there and don't want to see you every
day.