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.

REGISTER or login:

Forgot Password?
By submitting you agree to receive email from TechTarget and its partners. If you reside outside of the United States, you consent to having your personal data transferred to and processed in the United States. Privacy

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.

REGISTER or login:

Forgot Password?
By submitting you agree to receive email from TechTarget and its partners. If you reside outside of the United States, you consent to having your personal data transferred to and processed in the United States. Privacy

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

Following