CICS EDF 构建参数

在 EDF 调用上,调用程序的 RSA 的寄存器 1 中包含的地址指向 UEPEDFRM DSECT。

DSECT 包含以下字段:
UEPEDFR1
应用程序的 R1 参数列表的地址。
UEPEDFFI
输入标志字节。 当 EDF 调用与任务相关的用户出口时, UEPEDFFI 可以采用以下一个或多个位设置:
UEPEDFRQ
(X'80 ') "关于执行" 调用。
UEPEDFRS
(X'40 ') "命令执行完成" 调用。
UEPEDFRA
(X'20 ') 即将向 EDF 显示命令。
UEPEDFRC
(X'10 ') 已向 EDF 显示命令。
UEPEDFSC
(X'08 ') EDF 用户已更改屏幕。
UEPEDFWS
(X'04 ') EDF 用户已更改工作存储器。
UEPEDFNO
(X'01 ') EDF 用户已请求 NOOP。
UEPEDFFO
输出标志字节。 如果与任务相关的用户出口需要,那么它可以设置 UEPEDFFO 标志字节,以向 EDF 指示与任务相关的用户出口希望 EDF 执行的操作。 它可以具有以下值:
UEPEDFDF
(X'80 ') 执行缺省 CICS® 操作。 (EDF 屏幕包含未解释的调用者的 R1 参数列表。)
UEPEDFND
(X'40 ') 不向 EDF 显示命令。
UEPEDFRD
(X'20 ') 将命令重新显示到 EDF。
UEPEDFDL
EDF 屏幕属性。 这些仅供参考: 与任务相关的用户出口程序无法更改这些字段。
UEPEDFPS (半字二进制)
页面大小 (行数)。
UEPEDFLS (半字二进制)
行大小。
UEPEDFMP (半字二进制)
最大页数。
UEPEDFPA
由任务相关用户出口提供的 EDF 显示数据参数列表的地址。 显示数据参数列表由属性-字节地址和数据-字段地址的交替对组成。 属性字节指的是由 data-field 地址指向的显示数据行。 数据字段的大小必须与 UEPEDFLS 中指定的值相同。 显示数据的格式如 图 1所示。
图 1。 显示数据参数列表
图为代表显示数据参数列表的矩形。 标记为 UEPEDFPA 的箭头指向参数列表的顶部。 参数列表本身由一系列成对字段组成: 每个对中的第一个字段是属性字节的地址; 第二个字段是数据字段的地址。
注:
  1. CICS 提供了您可能要使用的指定标准属性字节的列表。 这些标准属性字节包含在 DFHBMSCA 中,必须将其复制到程序中。 有关编程信息 (包括属性字节及其含义的列表) ,请参阅 与 BMS 相关的常量
  2. 高位位必须在最后一个地址中设置 ,以向 EDF 指示这是最后一个地址。