|
I am trying to learn this stuff; I see a lot of RPGII and it doesn't upset me. But I am trying to learn this new stuff. Like now: I am wondering where/how *IN90 gets turned on in this bit? And why "count = count + 1" is better than "add 1 count"? > at 10:46 AM, Jim Welsh <jimwelsh@ix.netcom.com> said: >FILLSF BEGSR > READ MYFILE ( logical keyed by Last Name ) >*IN90 DOWEQ *OFF >write subfile record here >count = count + 1 >if count = page size then LEAVE ( exit loop ) > READ MYFILE > ENDDO > ENDSR -- ----------------------------------------------------------- boothm@earth.goddard.edu ----------------------------------------------------------- * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * This is the Midrange System Mailing List! To submit a new message, * * send your mail to "MIDRANGE-L@midrange.com". To unsubscribe from * * this list send email to MAJORDOMO@midrange.com and specify * * 'unsubscribe MIDRANGE-L' in the body of your message. Questions * * should be directed to the list owner / operator: david@midrange.com * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
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.