PDA

View Full Version : Documentation Color



Guest.Visitor
01-01-1995, 02:00 AM
I have noticed when modifying code from other companies That they have changed the color of there important notices to white. This is a wonderful Idea as it draws attention to that notice in the middle of all that green text. How is this done?

nycsusan@hotmail.com
11-01-2000, 10:30 AM
I change the color of text in the DDS. There is an attribute where you can specify any one of several colors: BLU, GRN, PNK, RED, TRQ, etc. Also, change a display attribute to HIGHLIGHT (I forget the abbreviation - HI perhaps) will make text appear white on my screens. I am not at work now, so I cannot cut and paste the exact line from my DDS's. I'll do that tomorrow if you need more specifics.

Guest.Visitor
11-01-2000, 10:57 AM
Here is the code for a utility program that will let you colorize your source code. This zip file has the command, display file, rpg program and clp program. You can do a CPYFRMPCD to a source file. It takes you into your source and diplays a window with color selections for many colors. Enjoy.

Guest.Visitor
11-01-2000, 11:04 AM
If your talking about changing the attributes of the source, you need to use a file edit utility, like DBU, to modify the source code to have a hex value at the beginning of the line (or whereever you want it to start). I'll lookup the documentation I have but off the top of my head, I think most of the values are in the twenty range. i.e. x'20', x'21' . . . x'29'

G.Gaunt
11-01-2000, 01:16 PM
Run this REXX, then use F15=Browse to copy colors from QTEMP/COLORS/COLORS. <pre> "CRTSRCPF FILE(QTEMP/COLORS) MBR(COLORS)" "OVRDBF FILE(STDOUT) TOFILE(QTEMP/COLORS) MBR(COLORS)" Do X = 1 To 32 Say Right( X, 4, '0' ) || '00000000' || D2C( X + 31 ) D2X( X + 31 ) End X</pre>

Guest.Visitor
11-01-2000, 01:48 PM
Having trouble using using program. Everything compiled, runs fine but doesn't change text color. Any instructions?

Guest.Visitor
11-01-2000, 02:17 PM
Check out www.rpgalive.com bobh

Terry Winchester
11-02-2000, 04:03 AM
If your using Client Access Express, you can also use a key combination that will place the hex value in CC1 while your in SEU. I have CTRL-W set for white text using: apl 22 Terry

Guest.Visitor
11-02-2000, 07:02 AM
Steve - Are you calling 'COLORTEXT' with your library/file/member and going into the utility? Place the cursor just before the * of a comment line and take F9. Put an 'X' beside the color you'd like and hit ENTER. There shouldn't be very much to it. Let me know if this isn't the case.

Guest.Visitor
11-02-2000, 10:37 AM
Steve, I had the same problem. Some of the color hex values were incorrect. I had to DBU the source member to set them correctly before it would work. HTH, Cheryl

Guest.Visitor
11-02-2000, 10:54 AM
Sorry about that. I'm thinking that got screwed up in the CPYTOPCD and sending it out in a word.doc format. Here is the RPG program that was giving you the problems. If you use the DSPF, CMD, CLP from the zip and then use this RPG you should be ok. I just tried the transfer and it's OK now.