|
%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.
As an Amazon Associate we earn from qualifying purchases.
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.