| Title: | VAX/DEC COBOL |
| Notice: | Kit,doc,performance talk info-->DIR/KEY=KIT or DOC or PERF_TALK |
| Moderator: | PACKED::BRAFFITT |
| Created: | Mon Feb 03 1986 |
| Last Modified: | Fri Jun 06 1997 |
| Last Successful Update: | Fri Jun 06 1997 |
| Number of topics: | 3250 |
| Total number of notes: | 13077 |
Hi all, A customer has the following question: When will Cobol support colors? Many thanks Paul
| T.R | Title | User | Personal Name | Date | Lines |
|---|---|---|---|---|---|
| 3224.1 | X/Open SCREEN SECTION - FOREGROUND/BACKGROUND-COLOR | PACKED::BRAFFITT | Mon Apr 07 1997 06:41 | 78 | |
>A customer has the following question: When will Cobol support
>colors?
DEC COBOL supports X/Open SCREEN SECTION on
OpenVMS Alpha
DIGITAL UNIX
This includes some support for
> [ FOREGROUND-COLOR IS color-num-1 ]
> [ BACKGROUND-COLOR IS color-num-2 ]
See the DEC COBOL Reference Manual (Data Division - Screen Section) and
User Manual (chapter on ACCEPT/DISPLAY) for more details.
COBOL
DATA_DIVISION
ss_screen-description-entry
3format_elementary
Format 3 - Elementary Screen Item
level-number [ screen-name ]
[ FILLER ]
[ BLANK { LINE } ]
[ { SCREEN } ]
[ BELL ]
[ BLINK ]
[ ERASE { EOL } ]
[ { EOS } ]
[ HIGHLIGHT ]
[ LOWLIGHT ]
[ REVERSE-VIDEO ]
[ UNDERLINE ]
[ NUMBER IS [ PLUS ] { identifier-1 } ]
[ { integer-1 } ]
[ NUMBER IS [ PLUS ] { identifier-2 } ]
[ { integer-2 } ]
[ FOREGROUND-COLOR IS color-num-1 ]
[ BACKGROUND-COLOR IS color-num-2 ]
{ USING identifier-3 }
{ PICTURE } IS picture-string-1 { {| FROM { identifier-4 } |} }
{ PIC } { {| { literal-1 } |} }
{ {| TO identiier-5 |} }
[ [ USAGE IS ] DISPLAY ]
[ BLANK WHEN ZERO ]
[ { JUSTIFIED } RIGHT ]
[ { JUST } ]
[ [ SIGN IS ] { LEADING } [ SEPARATE CHARACTER ] ]
[ { TRAILING } ]
[ AUTO ]
[ SECURE ]
[ REQUIRED ]
[ FULL ] .
| |||||
| 3224.2 | ANSI Standard color sequences | PACKED::BRAFFITT | Wed Apr 09 1997 08:20 | 6 | |
Also note that FOREGROUND-COLOR and BACKGROUND-COLOR are implemented
using ANSI Standard color sequences. Some workstations and terminals
support these sequences. The VT100/200/300/400 series terminals do NOT
support these sequences.
See the DEC COBOL Reference Manual pp. 5-48 and 5-67.
| |||||