MONITOR
对用户事件监视点进行编码。
描述
MONITOR 提供有关应用程序事务性能的信息。 它将替换 ENTER TRACEID 的监视方面。
除了在 CICS®中的预定义事件监视点 (EMPs) 收集的监视数据外，用户应用程序还可以向 CICS 监视记录中的用户字段提供数据。 您可以通过使用 MONITOR 命令来调用用户定义的 EMPs 来执行此操作。 在每个用户 EMPs 上，可以在每个性能监视记录中添加或更改您自己的数据的 1-16384 字节。 在这些 16384 字节中，您可以具有以下任意组合:
- 0 到 256 个计数器
- 0 到 256 个时钟
- 单个 8192 字节的字符串
选项
- DATA1 (数据区)
- 指定一个 4 字节变量，其内容取决于正在使用的用户 EMP 的类型:
- 如果用户 EMP 包含 ADDCNT ， SUBCNT ， NACNT ， EXCNT 或 ORCNT 选项，那么 DATA1 变量是由 MCT 用户 EMP 定义定义的区域。
- 如果 MCT 用户 EMP 定义包含 MLTCNT 选项，那么 DATA1 变量是具有一系列相邻全字地址的区域，其中包含要添加到 MCT 用户 EMP 定义中定义的用户计数字段的值。
- 如果 MCT 用户 EMP 定义包含 MOVE 选项，那么 DATA1 变量是具有要移动的字符串地址的区域。
有关用户 EMP 选项的详细信息，请参阅 用户事件监视点-DFHMCT TYPE=EMP 。
- DATA2 (数据区)
- 指定一个 4 字节变量，其内容取决于正在使用的用户 EMP 的类型:
- 如果用户 EMP 包含 ADDCNT ， SUBCNT ， NACNT ， EXCNT 或 ORCNT 选项，那么 DATA2 变量是由 MCT 用户 EMP 定义所使用的区域。
- 如果 MCT 用户 EMP 定义包含 MLTCNT 选项，那么 DATA2 变量是具有要更新的用户计数字段数的区域。 DATA2 中指定的数字将覆盖 MCT 中为操作定义的缺省值。 缺省值取决于您在 EMP 定义中定义的选项。 如果在 DATA2中指定了空值，那么监视将使用 EMP 定义中指定的缺省值。 如果未指定 DATA2 ，那么 MLTCNT 操作会产生 INVREQ 条件，尽管该操作已成功。
- 如果 MCT 用户 EMP 定义包含 MOVE 选项，那么 DATA2 变量是具有要移动的字符串长度的区域。 DATA2 中指定的数字将覆盖 MCT 中为操作定义的缺省值。 缺省值取决于您在 EMP 定义中定义的选项。 如果在 DATA2中指定了空值，那么监视将使用 EMP 定义中指定的缺省值。 如果未指定 DATA2 ，那么 MOVE 操作将产生 INVREQ ，尽管该操作已成功。
调用应用程序命名 EMPs 的示例 提供了如何处理 EMP 的缺省值的示例。
有关用户 EMP 选项的详细信息，请参阅 用户事件监视点-DFHMCT TYPE=EMP 。
- ENTRYNAME (数据区)
- 是限定 POINT 值并在监视控制表 (MCT) 中定义的监视点条目名称。 如果未指定，那么 ENTRYNAME 缺省为 USER。 在数据区中指定应用程序中包含监视点条目名称的 8 字节字段的名称。
- POINT (data-value)
- 指定在 MCT 中定义的监视点标识，范围在 0-255 之间。 但是，请注意，范围在 200 到 255 之间的点标识将保留供 IBM® 程序产品使用。
条件
- 16 INVREQ
- RESP2 值：
- 1
- 您的 POINT 值超出范围 1 到 255。
- 2
- 您的 POINT 值未在 MCT 中定义。
- 3
- 您的 DATA1 值无效。
- 4
- DATA2 值无效。
- 5
- 您未对需要它的 MCT 操作指定 DATA1 。
- 6
- 您未对需要它的 MCT 操作指定 DATA2 。
缺省操作: 异常终止任务。
示例
例如，您可以使用这些用户 EMPs 来计算某个事件发生的次数，或者对两个事件之间的时间间隔进行计时。
图 1 提供了 MONITOR 命令的示例 (以及您需要的 MCT 条目)。
注：
- 示例 1 显示了由标识为 PROG3的应用程序启动的用户时钟。 这是此应用程序中的第 11 个 EMP。 为了避免与另一个应用程序中的第十一个 EMP 混淆，此 EMP 由标记 ENTRY3.11唯一标识。 正在启动的时钟是字符串中的第一个时钟。
- 示例 2 显示了由同一应用程序停止但来自另一 EMP 的同一用户时钟。 EMP 由标记 ENTRY3.12唯一标识。
- 示例 3 显示了要装入到为此目的保留的 32 字节字符串中的一些用户数据。 装入从偏移量 0 开始，数据长度不超过 32 个字节。
1:
EXEC CICS MONITOR
POINT(11)
ENTRYNAME(ENTRY3)
needing: DFHMCT TYPE=EMP,
CLASS=PERFORM,
ID=(ENTRY3.11),
CLOCK=(1,CLOCKA),
PERFORM=SCLOCK(1)
2:
EXEC CICS MONITOR
POINT(12)
ENTRYNAME(ENTRY3)
needing: DFHMCT TYPE=EMP,
CLASS=PERFORM,
ID=(ENTRY3.12),
PERFORM=PCLOCK(1)
3:
EXEC CICS MONITOR
POINT(13)
DATA1(address of data)
DATA2(length of data)
ENTRYNAME(ENTRY3)
needing: DFHMCT TYPE=EMP,
CLASS=PERFORM,
ID=(ENTRY3.13),
PERFORM=MOVE(0,32)