To write portable color and font definitions directly from the current color and font tables, use the PUT–KEY–VALUE statement with the COLOR or FONT option. For example, if you allow the user to change color 8 during a session through the color common dialog (SYSTEM–DIALOG COLOR statement), you can save the new color definition in the current environment using this statement:
PUT-KEY-VALUE COLOR 8.
You can save all current color definitions from the color table using this statement:
PUT-KEY-VALUE COLOR ALL.
For more information on these statements, see OpenEdge Development: ABL Reference.