CICS - BMS

BMS 称为基本映射支持。应用程序由格式化的屏幕组成,这些屏幕充当终端和 CICS 程序之间的桥梁。为了在终端和 CICS 程序之间进行通信,我们使用 CICS 终端输入/输出服务。我们使用 BMS 创建具有适当位置和属性的屏幕设计。以下是 BMS 的功能 −

  • BMS 充当终端和 CICS 程序之间的接口。

  • 屏幕的设计和格式与应用程序的逻辑是分开的。

  • BMS 使应用程序硬件独立。

格式化屏幕

下面显示的屏幕是菜单屏幕,可以使用 BMS 进行设计。其要点如下 −

  • 屏幕可以有标题、日期和任何其他要显示的信息。

  • 选项 1、2 和 3 是未命名字段,它们是屏幕的标题。

  • 在选择字段中,我们需要提供输入。然后,此输入将发送到 CICS 程序进行进一步处理。

  • 在屏幕底部,显示操作键。

  • 所有字段和屏幕本身都使用 BMS 宏定义。当整个映射定义好后,我们就可以使用 JCL 来组装它了。

CICS Screen

BMS 基本术语

以下是我们将在接下来的模块中使用的基本术语 −

映射

映射是一种可以使用 BMS 宏设计的单一屏幕格式。它的名称可以包含 1 到 7 个字符。

映射集

映射集是一组映射,它们链接在一起形成一个加载模块。它应该有一个 PPT 条目。它的名称可以包含 1 到 7 个字符。

BMS 宏

BMS 映射是一个用汇编语言编写的程序,用于管理屏幕。用于定义屏幕的三个宏是 DFHMSD、DFHMDI 和 DFHMDF。

DFHMSD

DFHMSD 宏生成 Mapset 定义。它是宏标识符,表明我们正在启动一个映射集。映射集名称是加载模块名称,并且必须存在 PPT 表中的条目。下表显示了可在 DFHMSD 中使用的参数列表 −

Sr.No 参数和说明
1

TYPE

TYPE 用于定义映射类型。如果 TYPE =
MAP - 创建物理映射
DSECT - 创建符号映射
&&SYSPARM - 物理和符号,两者都创建
FINAL - 指示映射集编码的结束。

2

MODE

MODE 用于指示输入/输出操作。如果 MODE =
IN - 仅适用于输入映射
OUT - 仅适用于输出映射
INOUT 适用于输入和输出映射

3

LANG

LANG = ASM/COBOL/PL1
它决定 DSECT 结构的语言,用于复制到应用程序中。

4

STORAGE

如果 STORAGE =
AUTO - 为每个映射集获取单独的符号映射区域
BASE - 为来自多个映射集的符号映射使用相同的存储基础

5

CTRL

CRTL 用于定义设备控制请求。如果 CTRL =
FREEKB - 解锁键盘
FRSET - 将 MDT 重置为零状态
ALARM - 在屏幕显示时设置警报
PRINT - 指示要发送到打印机的映射集。

6

TERM

TERM = 类型确保设备独立性,如果使用 3270 以外的终端,则需要。

7

TIOAPFX

TIOAPFX = YES/NO
YES - 为 BMS 命令保留前缀空间(12 字节),以便正确访问 TIOA。 CICS 命令级别所需。

示例

以下示例显示如何编写映射集定义 −

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)
此参数给出映射的大小。 BMS 允许我们使用多张映射构建屏幕,当我们在单个映射集中使用多张映射时,此参数非常重要。

2

LINE

表示映射的起始行号。

3

COLUMN

表示映射的起始列号。

4

JUSTIFY

用于指定整个映射或映射字段是左对齐还是右对齐合理。

5

CTRL

CRTL 用于定义设备控制请求。如果 CTRL =
FREEKB - 解锁键盘
FRSET - 将 MDT 重置为零状态
ALARM - 在屏幕显示时设置警报
PRINT - 指示要发送到打印机的映射

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)