|
OVRDBF {file} POSITION(*END)
-irg
>From: William Washington III <W.WASHINGTON3@xxxxxxxxxxxxx>
>Reply-To: RPG programming on the AS400 / iSeries <RPG400-L@xxxxxxxxxxxx>
>To: Midrange <MIDRANGE-L@xxxxxxxxxxxx>, rpg400 <RPG400-L@xxxxxxxxxxxx>
>Subject: Externally-defined,arrival-sequence file - getting to the last
record
>Date: Sat, 28 Feb 2004 14:07:19 -0800 (PST)
>
>Hi All,
>
>How does one get to the last record of an externally-defined,
arrival-sequence (i.e., no keys) file without reading thru every
record? I want to start the program, then immediately hit the
end-of-file, then wait for a new record to appear. (I know about
overriding the file with EOFDLY(nnn) for this to work.)
>
>I added the RECNO(rrn) keyword to the file definition, set rrn=*hival and
tried using
>
>CHAIN (rrn) Filename and
>SETGT (rrn) Filename.
>
>I keep getting compile error messages saying "key field list not allowed
with program described file".
>
>I have the file defined as an input, full procedural,
externally-described disk file with a blank record address type and a
RECNO keyword. To me, that makes this a file to be processed by relative
record number.
>
>Where am I going wrong????? Ideas??? (I haven't had to deal with
relative record number processing outside of subfiles since my S/34 Mapics
days fresh out of school!)
>
>Many thanks in advance,
>
>William
>
>
>
>_______________________________________________
>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.
>
----------------------------------------------------------------------
Take off on a romantic weekend or a family adventure to these great U.S.
locations.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.