cics - 微焦点 cics xctl commarea

Question

在微焦点中：

PROG100 使用此命令传输到 PROG200。

它是通过工作存储领域。

EXEC CICS XCTL 程序（'PROG200'）COMMAREA（工作-存储-字段）长度 (199) END-EXEC。

PROG200 在 DFHCOMMAREA 中接收垃圾。

任何想法如何解决这一问题？也许是指令？

Answer 1

假设您的 WORKING-STORAGE-FIELD 有效且已正确初始化，则接收程序 DFHCOMMAREA 应该具有正确的值。请记住，DFHCOMMAREA 位于链接部分中的 DFHEIBLK 定义之后。