|
On Sun, 2001-12-30 at 10:25, Joe Pluta wrote: > I did some researching back a ways, and I found that there have been a few > discussions regarding the use of the file I/O BIFs. It seemed to always > revolve around which of the basic CHAIN/SETLL/READE loops you used. Now, > ever since I was able to, I've used the following standard code: > > CHAIN > *IN90 DOWEQ *OFF > (process) > READE > ENDDO > Hi Joe We pretty much all used this method in our department, and got a bit confused with the right %BIF to use when moving to RPGIV. We settled on a one line extension to it and just used the (functional equivalent) SETLL/READE pair instead of the CHAIN and just use %EOF. FileKey SETLL File FileKey READE File DOW not %EOF(File) (process) FileKey READE File ENDDO Regards, Martin -- martin@dbg400.net jamaro@firstlinux.net http://www.dbg400.net /"\ DBG/400 - DataBase Generation utilities - AS/400 / iSeries Open \ / Source free test environment tools and others (file/spool/misc) X [this space for hire] ASCII Ribbon Campaign against HTML mail & news / \
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.