AS400 Mid Range/RPG Comment Text in Color

Advertisement


Yunus wrote at 2014-08-20 18:53:18
Hope this will help to answer your question on how to change the colour in your source code.

Basically you can us any test editor even DBU if you have it.

Apply the Hex value indicated below.



     *****************************************************************-----

     *  Color  Decimal   Hex

     *  Code    Value   Value  Description

     *  -----  -------  -----  --------------------------------------------

   š *  'B '     58      3A    BLUE

   › *  'BR'     59      3B    BLUE      REVERSE

   ž *  'BU'     62      3E    BLUE          UNDERLINE

   € *  'G '     32      20    GREEN

    *  'GR'     33      21    GREEN     REVERSE

   „ *  'GU'     36      24    GREEN          UNDERLINE

   

*  'G2'     37      25    GREEN     REVERSE UNDERLINE

   ˜ *  'P '     56      38    PINK

   ™ *  'PR'     57      39    PINK      REVERSE

    *  'PU'     60      3C    PINK          UNDERLINE

    *  'P2'     61      3D    PINK      REVERSE UNDERLINE

   ˆ *  'R '     40      28    RED

   ‰ *  'RR'     41      29    RED       REVERSE

   Š *  'R3'     42      2A    RED          BLINK

   ‹ *  'R4'     43      2B    RED       REVERSE          BLINK

   Œ *  'RU'     44      2C    RED          UNDERLINE

    *  'R2'     45      2D    RED       REVERSE UNDERLINE

    *  'R5'     46      2E    RED          UNDERLINE BLINK

    *  'T '     48      30    TURQUOISE          COLSEP

   ‘ *  'TR'     49      31    TURQUOISE REVERSE          COLSEP

   ” *  'TU'     52      34    TURQUOISE         UNDERLINE

   • *  'T2'     53      35    TURQUOISE REVERSE UNDERLINE

   ‚ *  'W '     34      22    WHITE

   ƒ *  'WR'     35      23    WHITE     REVERSE

    *  'WU'     38      26    WHITE          UNDERLINE

    *  'Y '     50      32    YELLOW          COLSEP

   “ *  'YR'     51      33    YELLOW    REVERSE          COLSEP

   – *  'YU'     54      36    YELLOW          UNDERLINE

     *  'ZW'     39      27    NOT ASSIGNED

     *  'ZX'     47      2F    NOT ASSIGNED

     *  'ZY'     55      37    NOT ASSIGNED

     *  'ZZ'     63      3F    NOT ASSIGNED

     *---------------------------------------------------------------------

    ‚**********************************************************************

    ‚* ˆPROGRAM NOTES

    ‚* ˆ-------------

    *  Hex 21 - Reverse Image          01

    ‚*  Hex 22 - Highlight          02

    ƒ*  Hex 23 - Highlight/Reverse Image          03

    „*  Hex 24 - Underline          04

    

*  Hex 25 - Underline/Reverse Image          05

    *  Hex 26 - Highlight/Underline          06

     *  Hex 27 - NonDisplay (I would not use this one)          07

    ˆ*  Hex 28 - Color Red          08

    ‰*  Hex 29 - Color Red/Reverse Image          09

    *  Hex 30 - Color Blue/Column Sep.          10

    ‘*  Hex 31 - Color Blue/Column Sep./Reverse Image          11

    *  Hex 32 - Color Yellow/Column Sep.          12

    “*  Hex 33 - Color Yellow/Column Sep./Reverse Image          13

    ”*  Hex 34 - Color Blue/Underline          14

    •*  Hex 35 - Color Blue/Underline/Reverse Image          15

    –*  Hex 36 - Color Yellow/Underline          16

     *  Hex 37 - Column Sep./NonDisplay - I would not use this one)      17

    ˜*  Hex 38 - Color Purple          18

    ™*  Hex 39 - Color Purple/Reverse Image          19

    š*  Hex 3A - Color Blue          20

    Œ*  Hex 2C - Color Red/Underline          21

    *  Hex 2D - Color Red/Underline/Reverse Image          22

    ›*  Hex 3B - Color Blue/Reverse Image          23

    *  Hex 3C - Color Pink/Underline          24

    *  Hex 3D - Color Pink/Underline/Reverse Image          25

    ž*  Hex 3E - Color Blue/Underline          26  


AS400 Mid Range

All Answers


Answers by Expert:


Ask Experts

Volunteer


Michael Corbo

Expertise

I have been in the computer field working on the AS/400 and it`s predessor the System/38 for the past 20 years. I am currently the IT Manager for a mid-size auto parts manufacturer where I manage all aspects of midrange computer hardware, software and data and voice telecommunications. I spent most of my career as a programmer, but am also an expert in AS/400 configuration, networking and PC Connectivity. I am proficient in all versions of RPG (3,4 ILE), CL, DDS, SDA, and most other utilities on the AS/400. I can answer hardware questions and PC questions related to the AS/400.

©2016 About.com. All rights reserved.