Figure 291 shows how to specify the WDWBORDER keyword.
Figure 291. Specifying the WDWBORDER Keyword
|...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 A 01 WDWBORDER((*COLOR PNK) + A (*DSPATR BL)) A R RECORD1 WINDOW(6 15 9 30) A N01 WDWBORDER((*COLOR GRN)) A 01 WDWBORDER((*COLOR RED)) A FIELD1 5A B 2 2 A FIELD2 20A B 8 5 A R RECORD2 WINDOW(8 20 9 30) A WDWBORDER((*COLOR YLW) + A (*DSPATR RI)) A FIELD3 5A B 2 2 A FIELD4 20A B 8 5 A LINE 2S 0P A POS 2S 0P A R RECORD3 WINDOW(&LINE &POS 9 30) A WDWBORDER((*CHAR + A 02 '+-+||+-+')) A FIELD3 5A B 2 2 A FIELD4 20A B 8 5 A LINE 2S 0P A POS 3S 0P A
If the window defined by RECORD1 is written to the display with indicator 01 set off, it has a green border constructed of colons for the vertical borders and periods for the horizontal borders. If indicator 01 is set on, the window has a blinking red border.
When the window defined by RECORD2 is written to the display, it has a yellow border displayed in reverse image constructed of the default border characters.
When the window defined by RECORD3 is written to the display, the following appears:
(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.