How to create a code using diff colors in RPG & CL

205 pts.
Tags:
CL
RPG
RPG/400
How to create a code using diff colors in RPG & CL

Answer Wiki

Thanks. We'll let you know when a new response is added.

Do you mean you wish to display data in different colours?

if so, you need to either use the Screen DDS to specify the colour, or prefix the field data with a hex attribute

this bit of REXX code will expose the hex values
place it into a source file as attributre REXX

———————————————————–

“CRTSRCPF FILE(library/file) MBR(COLORS)”
“OVRDBF FILE(STDOUT) TOFILE(library/file) MBR(COLORS)”

Do I = 1 To 32

Say Right(indx || I, 4, 0 ) || 00000000 || D2C(I + 31)D2X (I + 31)D2C( 32)

End

—————————————————————–

use option 16 or
STRREXPRC (f4) to run it.

When you know what the hex value is for the colour you want, simply prefix it to the data with an eval, making sure to allow space for it in the displayed field length

Discuss This Question:  

 
There was an error processing your information. Please try again later.
Thanks. We'll let you know when a new response is added.
Send me notifications when members answer or reply to this question.

Forgot Password

No problem! Submit your e-mail address below. We'll send you an e-mail containing your password.

Your password has been sent to:

To follow this tag...

There was an error processing your information. Please try again later.

Thanks! We'll email you when relevant content is added and updated.

Following

Share this item with your network: