CICS - BMS
BMS 称为基本映射支持。应用程序由格式化的屏幕组成,这些屏幕充当终端和 CICS 程序之间的桥梁。为了在终端和 CICS 程序之间进行通信,我们使用 CICS 终端输入/输出服务。我们使用 BMS 创建具有适当位置和属性的屏幕设计。以下是 BMS 的功能 −
BMS 充当终端和 CICS 程序之间的接口。
屏幕的设计和格式与应用程序的逻辑是分开的。
BMS 使应用程序硬件独立。
格式化屏幕
下面显示的屏幕是菜单屏幕,可以使用 BMS 进行设计。其要点如下 −
屏幕可以有标题、日期和任何其他要显示的信息。
选项 1、2 和 3 是未命名字段,它们是屏幕的标题。
在选择字段中,我们需要提供输入。然后,此输入将发送到 CICS 程序进行进一步处理。
在屏幕底部,显示操作键。
所有字段和屏幕本身都使用 BMS 宏定义。当整个映射定义好后,我们就可以使用 JCL 来组装它了。
BMS 基本术语
以下是我们将在接下来的模块中使用的基本术语 −
映射
映射是一种可以使用 BMS 宏设计的单一屏幕格式。它的名称可以包含 1 到 7 个字符。
映射集
映射集是一组映射,它们链接在一起形成一个加载模块。它应该有一个 PPT 条目。它的名称可以包含 1 到 7 个字符。
BMS 宏
BMS 映射是一个用汇编语言编写的程序,用于管理屏幕。用于定义屏幕的三个宏是 DFHMSD、DFHMDI 和 DFHMDF。
DFHMSD
DFHMSD 宏生成 Mapset 定义。它是宏标识符,表明我们正在启动一个映射集。映射集名称是加载模块名称,并且必须存在 PPT 表中的条目。下表显示了可在 DFHMSD 中使用的参数列表 −
Sr.No | 参数和说明 |
---|---|
1 |
TYPE TYPE 用于定义映射类型。如果 TYPE = |
2 |
MODE MODE 用于指示输入/输出操作。如果 MODE = |
3 |
LANG LANG = ASM/COBOL/PL1 |
4 |
STORAGE 如果 STORAGE = |
5 |
CTRL CRTL 用于定义设备控制请求。如果 CTRL = |
6 |
TERM TERM = 类型确保设备独立性,如果使用 3270 以外的终端,则需要。 |
7 |
TIOAPFX TIOAPFX = YES/NO |
示例
以下示例显示如何编写映射集定义 −
MPST01 DFHMSD TYPE = &SYSPARM, X CTRL = (FREEKB,FRSET), X LANG = COBOL, X STORAGE = AUTO, X TIOAPFX = YES, X MODE = INOUT, X TERM = 3270 DFHMSD TYPE = FINAL END
DFHMDI
DFHMDI 宏生成映射定义。它表明我们正在开始一张新映射。Mapname 后面跟着 DFHMDI 宏。Mapname 用于发送或接收映射。下表显示了我们在 DFHMDI 宏中使用的参数 −
Sr.No | 参数和说明 |
---|---|
1 |
SIZE SIZE = (Line,Column) |
2 |
LINE 表示映射的起始行号。 |
3 |
COLUMN 表示映射的起始列号。 |
4 |
JUSTIFY 用于指定整个映射或映射字段是左对齐还是右对齐合理。 |
5 |
CTRL CRTL 用于定义设备控制请求。如果 CTRL = |
6 |
TIOAPFX TIOAPFX = YES/NO YES - 为 BMS 命令保留前缀空间(12 字节)以正确访问 TIOA。 CICS 命令级别所需。 |
示例
以下示例显示如何编写映射定义 −
MAPSTD DFHMDI SIZE = (20,80), X LINE = 01, X COLUMN = 01, X CTRL = (FREEKB,FRSET)
DFHMDF
DFHMDF 宏用于定义字段名称。字段名称是针对 DFHMDF 宏进行编码的。此字段名称在程序内部使用。我们不会针对我们不想在程序内部使用的常量字段编写字段名称。下表显示了可在 DFHMDF 宏中使用的参数列表 −
Sr.No | 参数和说明 |
---|---|
1 | POS 这是字段应在屏幕上出现的位置。字段以其属性字节开头,因此如果您编码 POS = (1,1),则该字段的属性字节位于第 1 行第 1 列,实际数据从第 2 列开始。 |
2 |
LENGTH 这是字段的长度,不包括属性字节。 |
3 | INITIAL 这是输出字段的字符数据。我们使用它来指定屏幕的标签和标题,并使它们独立于程序。例如,对于菜单屏幕中的第一个字段,我们将编码:INITIAL = 'MENU'。 |
4 | JUSTIFY 它用于指定整个映射或映射字段是左对齐还是右对齐。 |
5 | ATTRB ATTRB = (ASKIP/PROT/UNPROT, NUM, BRT/NORM/DRK, IC, FSET) 它描述了字段的属性。 ASKIP - 自动跳过。无法在此字段中输入数据。光标跳至下一个字段。 PROT - 受保护的字段。无法将数据输入到此字段中。如果输入数据,将导致输入禁止状态。 UNPROT - 不受保护的字段。可以输入数据,这适用于所有输入字段。 NUM - 数字字段。只允许数字(0 到 9)和特殊字符("。"和"-")。 BRT - 字段的亮显示(突出显示)。 NORM - 正常显示。 DRK - 暗显示。 IC - 插入光标。光标将定位在此字段中。如果多次指定 IC,则光标将放置在最后一个字段中。 FSET - 字段集。 MDT 设置为开启,这样无论用户是否实际修改了字段,字段数据都会从终端发送到主机。 |
6 |
PICIN PICIN 适用于用作输入的数据字段,如 PICIN = 9(8)。 |
7 |
PICOUT PICIN 适用于用作输出的数据字段,如 PICOUT = Z(8)。 |
示例
以下示例显示如何编写字段定义 −
DFHMDF POS = (01,01), X LENGTH = 7, X INITIAL = ‘SCREEN1’, X ATTRB = (PROT,NORM) STDID DFHMDF POS = (01,70), X LENGTH = 08, X ATTRB = (PROT,NORM)