WPALETTE-SET-COLOR
The WPALETTE-SET-COLOR function associates an RGB color to a COBOL color attribute.
Syntax:
 CALL "W$PALETTE" USING WPALETTE-SET-COLOR
                        WPALETTE-DATA
                 GIVING returnCode
Parameters:
WPALETTE-SET-COLOR
Constant
 
WPALETTE-DATA
Group Item
Group item that specifies the COBOL color attribute the function refers and the RGB color that it will be associated to. This group item, defined in ispalette.def, has the following structure:
 
01  wpalette-data.
    03 wpal-color-id            pic x comp-x.
    03 wpal-flags
       redefines wpal-color-id  pic x comp-x.
    03 wpal-red                 pic x comp-x.
    03 wpal-user-color-id
       redefines wpal-red       pic x comp-x.
    03 wpal-green               pic x comp-x.
    03 wpal-blue                pic x comp-x.
 
wpal-color-id
It must be set to the COBOL color attribute before calling the function. It must range from 1 to 16.
 
wpal-flags
Not used.
 
 
wpal-red
Specifies the red component of the color to be associated to the COBOL color attribute. It may range from 0 to 255.
 
wpal-user-color-id
Not used.
 
wpal-green
Specifies the green component of the color to be associated to the COBOL color attribute. It may range from 0 to 255.
 
wpal-blue
Specifies the blue component of the color to be associated to the COBOL color attribute. It may range from 0 to 255.
Return code:
returnCode can be any signed numeric data item and provides additional information:
1
Operation successful.
WPERR-UNSUPPORTED
The W$PALETTE library routine is not supported.
WPERR-BAD-ARG
The function has received incorrect parameters.