|
The RPG showing color lines for source files
* ___________________________________________________________________
* Re: Does anyone know how to change the color of source lines in SEU?
*
* "If you are using client access, go into the keyboard customization.
* Select a key. Change the "ALT" option for the selected key to the
* following: apl XX where XX is equal to:
* 22 = White
* 28 = Red
* 30 = Turquoise
* 32 = Yellow
* 38 = Pink
* 3A = Blue
*
* Then in SEU editing, just press the alt /key before the text that
* you want in color. If you want the entire line, press the alt/key
* in position 5."
*
* Paula Ewald pewald@glazers.com
* August, 2000
*
* ___________________________________________________________________
* 22 = White
* 24 = Underline
* 28 = Red
* 30 = Turquoise
* 32 = Yellow
* 38 = Pink
* 3A = Blue
* white red turquoise yellow pink blue green
FSEUColorsDCf e Workstn
C Dow Not *INKC and Not *INKL
C Exfmt FMT01
C End
C eval *inlr = *on
*
|
The DDS for the screen
A*%%TS SD 20000806 114104 BOOTH REL-V4R4M0 5769-PW1
A*
A*%%EC
A DSPSIZ(24 80 *DS3)
A CHGINPDFT(HI UL)
A ERRSFL
A CF03(03 'Exit')
A CF12(12 'Exit')
A R FMT01
A*%%TS SD 20000806 114104 BOOTH REL-V4R4M0 5769-PW1
A 1 69DATE
A EDTCDE(Y)
A 2 69TIME
A 3 69SYSNAME
A 4 69USER
A PB1 2Y 0B 23 3PSHBTNFLD
A PSHBTNCHC(1 'Exit (F3) ' CF03)
A PSHBTNCHC(2 'Cancel (F12) ' CF12)
A 2 10'__________ __ _____ __ -
A '
A 3 9'/ __/ __/ / / / / ___/ ___ / / -
A ___ ____ ___'
A 4 8'_\ \/ _// /_/ / / /__ / _ \ / / -
A / _ \ / __/ (_ < '
A 5 7'/___/___/\____/ \___/ \___/ /_/ -
A \___/ /_/ /___/'
A 7 2'If you are using client access, go-
A into the keyboard customization.'
A 8 2'Select a key. Change the "ALT" op-
A tion for the selected key to'
A 9 2'the following: apl XX where X-
A X is equal to:'
A 11 5'22 = White '
A COLOR(WHT)
A 12 5'24'
A DSPATR(UL)
A 13 5'28 = Red '
A COLOR(RED)
A 14 5'30 = Turquoise '
A COLOR(TRQ)
A 15 5'32 = Yellow '
A COLOR(YLW)
A 16 5'38 = Pink '
A COLOR(PNK)
A 17 5'3A = Blue '
A COLOR(BLU)
A 17 44'___ ___ __ __ __ ___ '
A COLOR(RED)
A 18 43'/ _ \ / _ | / / / / / / / _ -
A |'
A COLOR(WHT)
A 19 42'/ ___/ / __ | / /_/ / / /__ / __-
A |'
A COLOR(BLU)
A 20 41'/_/ /_/ |_| \____/ /____/ /_/ -
A |_|'
A COLOR(RED)
A 12 10'Underline'
A DSPATR(UL)
A 12 8'='
A 12 41'(if you see column separators then-
A go'
A 13 41' to'
A 13 45'Display'
A DSPATR(RI)
A COLOR(PNK)
A 13 53'then'
A 13 58'Viewing'
A DSPATR(RI)
A COLOR(PNK)
A 13 66'and turn '
A 14 42'Column Separator'
A DSPATR(RI)
A COLOR(PNK)
A 14 59'off.)'
|
|
|
