在 z/OS 中，我可以在 CICS MCT（监控控制表）中定义一个用户 EMP（事件监控点）。例如，一个 EMP 可以启动 CPU 时钟/定时器，而另一个 EMP 可以停止 CPU 时钟。然后，我可以在运行程序的 TASK 期间从我的 COBOL 程序中“执行”每个 EMP。执行 EMP "no.1" 将启动时钟，执行 EMP "no.2" 将停止时钟。
我知道 CPU 时钟的最终值将保存为 SMF 110 记录的一部分，该记录是在 TASK 完成后写入的。
我的问题是，可以在 TASK 仍在执行的同时在 COBOL 程序中检索 CPU 时钟的当前值吗？
如果是这样，哪个 CICS 语句会这样做？时钟将被检索到哪个结构/布局和字段中？
我想知道的原因是因为我想测量程序执行某个进程所需的 CPU 时间。同一进程可能在一个 TASK 中执行多次，我想使用相同的 CPU 时钟来测量每次执行该进程的时间。
非常感谢，
丹尼
【问题讨论】：
EXEC CICS COLLECT STATISTICS MONITOR(EIBTASKN) SET (ADDRESS OF DFHMNTDS) 可用于检索正在运行的任务监控字段 - 正如 Danny 在下面的评论中指出的那样。
带有 PERFORM=DELIVER 的 DFHMCT TYPE=EMP 宏可能适合您的目的。它导致为此任务累积的性能类数据传递到监视缓冲区。请参阅 CICS 文档： https://www.ibm.com/support/knowledgecenter/SSGMCP_5.5.0/reference/resources/macros/mct/emp.html
如果您使用的是 CICS TS V5.4 或更高版本，您可能会考虑将重复运行的进程分离到一个事务中。然后使用“EXEC CICS RUN TRANSID CHILD”从当前 COBOL 程序/任务启动事务，这将作为子任务启动进程，并为其测量 CPU。您可以使用“EXEC CICS FETCH CHILD”从子任务中获取响应。
这两个API的使用详情请看CICS开发者中心的文章：https://developer.ibm.com/cics/category/asynchronous-api/
感谢和亲切的问候， Jenny（CICS 开发，IBM Hursley 实验室）
【讨论】：