|
Buck, I got this small sample below to work. Great! There must be a problem with the code I inserted into the my other macro. I'll find it tomorrow. This stuff is great. I am surprise at how under-marketed this has been over the years. What a time-saver. The all-time greatest that I've found so far is the RPG Indicators (view|cross reference). The time saved looking for indicators and work fields in those monolithic RPGIII pgms makes that one feature alone worth it. And now that it's free it's a no-brainer. CODE is like modeling clay - it'll be whatever you make it to be, restricted only by your motivation & patience. Phil 'Set lineread.title SQL dspf pgm Generator' 'Set lineread.prompt Enter expression' 'lineread 45' 'extract lastline' 'extract lastkey' if ((lastkey = esc) | (lastline = '')) then do 'msg Funtion Cancelled' exit end 'insert ** 'lastline 'insert D SQL_eof c const('02000')' exit _________________________________________________________ Do You Yahoo!? Get your free @yahoo.com address at http://mail.yahoo.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.