FOREGROUND-COLOR and BACKGROUND-COLOR Phrases

{FOREGROUND-COLOR } IS fg-color
{FOREGROUND-COLOUR}

{BACKGROUND-COLOR } IS bg-color
{BACKGROUND-COLOUR}

1. These phrases allow the specification of the foreground or background color. The color is a literal value taken from the following table:

   Value	Color
   0	Black
   1	Blue
   2	Green
   3	Cyan
   4	Red
   5	Magenta
   6	Brown
   7	White
   8	Dark-Gray
   9	Bright-Blue
   10	Bright-Green
   11	Bright-Cyan
   12	Bright-Red
   13	Bright-Magenta
   14	Yellow

   Note: The values in this table are not the same as the Background Color and Foreground Color values in the acucobol.def file.
2. fg-color and bg-color can also be used to set a control's colors. They specify both foreground and background colors in the same manner as they do for textual screen fields.

   Each control type determines the allowable set of colors and the interpretation of foreground color and background color. If either the foreground color or background color is omitted (or its particular value is not meaningful), then default colors are used. Each control class defines its own method of assigning default colors. Note that many host systems limit the ability to define a control's colors. The colors used will be as close to the requested colors as the host system allows.

3. If both the COLOR phrase and the FOREGROUND-COLOR or BACKGROUND-COLOR phrase appear in the statement, the COLOR phrase takes precedence.
4. These phrases are provided for compatibility with other COBOL systems. Note that the color value must be an integer literal or a numeric data item, and it may be an arithmetic expression. Also note that the color number is one less than the corresponding color value in the COLOR phrase (this is done to maintain compatibility with other COBOLs). For a method of assigning colors that can be variable, see the COLOR phrase above.
   Note: The -Vi compiler option changes the behavior of a Screen Section ERASE (and BLANK) phrase with respect to color handling. See Video Options for more information.