Re: confusing coding?

Agreed.

The main reason I prefer a priming read is because (in most cases) hitting EOF on the first read is typically an unexpected condition. Hitting EOF on subsequent reads is not only expected but essential!


Jon Paris
Jon.Paris@xxxxxxxxxxxxxx

On Aug 5, 2025, at 11:08 AM, Vern Hamberg via RPG400-L <rpg400-l@xxxxxxxxxxxxxxxxxx> wrote:

+100000 on priming reads!

*Regards*

*Vern Hamberg*

IBM Champion 2025 <cid:part1.rNIifWgW.6jeX74XE@centurylink.net> CAAC (COMMON Americas Advisory Council) IBM Influencer 2023


On 8/5/2025 11:40 AM, Brad Stone wrote:

I leared the hard way in college (I think using Modula II or Ada) that a
priming read is gospel. When the teacher showed up with a stack of green
bar paper 5 inches high, slammed it on the table, pointed at me and said
"we need to talk after class".... I knew I effed up.

Never again. Shame works. haha.

On Tue, Aug 5, 2025 at 11:35 AM John Yeung<gallium.arsenide@xxxxxxxxx>
wrote:

On Tue, Aug 5, 2025 at 11:41 AM Brad Stone<bvstone@xxxxxxxxx> wrote:

Finding it doesn't make it good coding. I've seen worse. I've done
worse. :)

What mystifies me the most is how often some people like to take
aspects of the various approaches and arrange them into something
worse than any of them, such as

setll
if %equal
dow not %eof
reade
if %eof
leave
endif
stuff
enddo
endif

Yeah. Way to go, avoiding the cardinal sin of an "infinite loop".

John Y.
--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email:RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:https://lists.midrange.com/mailman/listinfo/rpg400-l
or email:RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
athttps://archive.midrange.com/rpg400-l.

Please contactsupport@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.