Re: Relative Record Number processing in RPG-Free

[Scott Klement <klemscot@xxxxxxxxxxxx>]

Remove the parenthesis!   Parenthesis on a CHAIN operation is for a
keylist.  Since your RRN is not a keylist, you don't want to specify them.

In other words, you want to code this:

    CHAIN RR# FILENAME;

NOT this:

    CHAIN (RR#) FILENAME;



On Sun, 25 Apr 2004, Rich Dotson wrote:

> I'm having a problem in RPG-Free that I have done numerous time in RPG IV.
> I am trying to process a non-keyed file by the relative record number but
> the program will not compile giving me the error that you cannot do key list
> processing on a program described file (even though the file is defined as
> an externally described file).
>
> I can jump out of the free-format into the fixed-column format for the CHAIN
> op code and everything works fine.  But when I do the CHAIN (RR#) FILENAME,
> the free-form program will not compile.
>
> Has anyone else run into this?   Can you not process a non-keyed file by
> relative record number in free-form RPG?
>
> Thanks in advance,
> Rich Dotson
>
> RT3 Consulting Services, Inc.
> P.O. Box 126
> Lorain, OH  44052-0126
>
> Phone: 1-216-556-1710
> eMail: Rich_Dotson@xxxxxxxxxxx
>
> _________________________________________________________________
> Is your PC infected? Get a FREE online computer virus scan from McAfee®
> Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963
>
> _______________________________________________
> 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.
>