× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Bob,

http://publib.boulder.ibm.com/iseries/v5r1/ic2924/books/c0925083561.htm#HDRBBEOF
-----------
The following operations, if successful, set %EOF(filename) off.   If
the operation is not successful, %EOF(filename) is not changed. %EOF
with no parameter is not changed by these operations.

CHAIN (Random Retrieval from a File) 
OPEN (Open File for Processing) 
SETGT (Set Greater Than) 
SETLL (Set Lower Limit)

-----------
On 8/18/05, Bob Cozzi <cozzi@xxxxxxxxx> wrote:
> %EOF with or without a parameter is NOT impacted by the CHAIN opcode.
> CHAIN only sets %ERROR (if the E operation extender is used) and %FOUND.
> %EOF is set by one of the READxx operation codes, not by chain. Likewise,
> %FOUND is NOT set by the READxx operation codes.
> 
> You can specify %EOF or %EOF()
> Both mean, check for end-of-file on the last database READxx operation.
> You can specify %EOF(MYFILE)
> Which means, check for end-of-file condition on the MYFILE file, regardless
> of whether or not it was the last file read.
> 
> -Bob Cozzi
> www.RPGxTools.com
> If everything is under control, you are going too slow.
> - Mario Andretti
> 
> 
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
> On Behalf Of HauserSSS
> Sent: Thursday, August 18, 2005 1:59 PM
> To: RPG programming on the AS400 / iSeries
> Subject: AW: AW: How to properly use %EOF() bif?
> 
> Hi Scott,
> 
> I think my English is sometimes not good enough to distinguish between small
> subtleties.
> 
> But I think the essential is to differentiate between "EOF without File" or
> "EOF with file".
> 
> Birgitta
> 
> -----Ursprungliche Nachricht-----
> Von: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]Im Auftrag von Scott Klement
> Gesendet: Donnerstag, 18. August 2005 20:45
> An: RPG programming on the AS400 / iSeries
> Betreff: Re: AW: How to properly use %EOF() bif?
> 
> 
> Hi Birgitta,
> 
> >>> Chain does not set the value of %EOF  (it doesn't turn it on or off)
> [SNIP]
> > %EOF with no parameter is not changed by these operations.
> > 1. CHAIN (Random Retrieval from a File) on page 573
> 
> Sounds like they're saying the same thing to me?  One says chain does not
> set the value of %EOF <--- note that there's no parameter listed there.
> The other says "%EOF with no parameter is not changed by CHAIN".
> 
> Where's the discrepancy?
> --
> 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.
> 
> 
> 
> --
> 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.
> 
> 
> 
> 
> --
> 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.
> 
>


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 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.