|
What happens if you always z-add *zeros before you do the SETGT and READP? Then you'd not need to do the *IN70 ifeq *on would you? In <000001be44cd$86b759a0$533770c2@ikat.dircon.co.uk>, on 01/20/99 at 10:34 PM, "Marc Woodbridge" <ikat@dircon.co.uk> said: >I've tried a bit of code like: >*IN70 IFEQ *ON > Z-ADD *ZEROS GBBKXV >(or) MOVE *ZEROS GBBKXV > ENDIF -- ----------------------------------------------------------- boothm@ibm.net Booth Martin ----------------------------------------------------------- * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * This is the RPG/400 Discussion Mailing List! To submit a new * * message, send your mail to "RPG400-L@midrange.com". To unsubscribe * * from this list send email to MAJORDOMO@midrange.com and specify * * 'unsubscribe RPG400-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.
midrange.com
