|
Two ways that I've used. 1. Use DBU, set to CHANGE mode then change to hex FORMAT and place the hex value(i.e X'21') in the attribute byte of the literal in SRCDTA that you want to change. If you only want to change the attlribute of a literal then a x'20' is required after the literal to turn the attribute off. I am using X'21' only for an example. You could used any from x'21' to and not including x'40'(blanks). If you don't place an x'20' on the line the whole source record from where you place x'21' will be changed. 2. I've also written utilities which utilize this technique over source file members such as highlighting certain op-codes(if,do,begsr,etc) while providing nesting levels. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 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.