Re: Relative Record Number processing in RPG-Free

["Rich Dotson" <rich_dotson@xxxxxxxxxxx>]

Thanks Scott.  That's what I needed.

Rich Dotson
RT3 Consulting Services, Inc.
P.O. Box 126
Lorain, OH  44052-0126

Phone: 1-216-556-1710
eMail: Rich_Dotson@xxxxxxxxxxx

> From: Scott Klement <klemscot@xxxxxxxxxxxx>
> Reply-To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
> To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
> Subject: Re: Relative Record Number processing in RPG-Free
> Date: Sun, 25 Apr 2004 21:09:20 -0500 (CDT)
>
>
> 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
> >

_________________________________________________________________
FREE pop-up blocking with the new MSN Toolbar ? get it now! 
http://toolbar.msn.com/go/onm00200415ave/direct/01/