Display Message Subfile In Color?

[J.Pluta]

Barbara, that's exactly the approach I would take. By adding the "attribute character" as the first byte of the message, you could then set it to whatever value you need. Just be sure to reserve the first byte of your message data for the attribute.

[Guest.Visitor]

I tried using "Eval MsgData = X'2E' + MsgData" with a subsitution variable at the beginning of the predefined message but it still didn't work. How should the MsgData and MsgData length variables be defined in my RPG IV program? Also, how should I define the subsitution variable at the beginning of the message? Thanks!

[Terry Winchester]

Sorry Douglas, I can't help you much with the RPG-IV code since I'm primarily a COBOL'er. I do know that if you change the 1st character in your string to match one of the hex codes posted that you will get some neat effects. With the disclaimer that I'm *not* an RPG'er, here's what my attempt would look like: D MsgData DS D Attrib 1 INZ(*BLANKS) D Message 79 INZ(*BLANKS) D MsgLen S 10I 0 INZ(0) and then use the EVAL command: C EVAL Attrib = x'2E' C EVAL Message = 'My Message' C EVAL MsgLen = 80 Good Luck Terry