COBOL/CICS Development and Section 508

Techniques

Using the extended attributes involves two assembler commands and three basic mapping support (BMS) macros. The three macros required are:

• DFHMSD—provides values that apply to the entire mapset.
• DFHMDI—provides values that apply to one mapset.
• DFHMDF—for each screen field provides position, length, and attributes.

This coding example² shows how to provide for extended color and highlight attributes in both the physical and symbolic mapsets, which, through the use of BMS, define the screens used by the COBOL program and manage terminal input and output.

TTRSET1 DFHMSD TYPE=&SYSPARM,
			LANG=COBOL,
			MODE=INOUT,
			TERM=3270-2,
			CTRL=FREEKB,
			STORAGE=AUTO,
			TIOAPFX=YES,
			DSATTS=(COLOR,HILIGHT),
			MAPATTS=(COLOR,HILIGHT)

DSATTS specifies which extended attributes are supported in the symbolic maps; MAPATTS, which are supported in the physical map. In the example, both color and highlighting extended attributes will be supported by programs using this map set. In this code, DSATTS and MAPATTS apply to a single map.

MNTMAP1 DFHMDI	SIZE(24,80),
			LINE=1,
			COLUMN=1,
			DSATTS=(COLOR,HILIGHT),
			MAPATTS=(COLOR,HILIGHT)

The attribute in the DFHMDF macro for field color can be set to blue, red, pink, green, turquoise, yellow, or white, e.g. COLOR=YELLOW. Also in the DFHMDF, the field highlight attribute can be set to blinking, reverse video, or underlining, e.g., HILIGHT=REVERSE.

² The CICS Programmer’s Desk Reference, Second Edition, Doug Lowe, 1992.

Select the Return button to return to the Module Introduction.