精通COBOL－－16.5.2 使用XCTL命令进行程序调用

　　使用XCTL命令调用程序时，两程序仍然处于同一个任务之下。并且，同样也可通过COMMAREA在两程序间传递参数。以下为在程序PGMC中，通过XCTL调用程序PGMD的部分代码：
IDENTIFICATION DIVISION.
PROGRAM-ID. PGMC.
……
PROCEDURE DIVISION.
……
EXEC CICS LINK PROGRAM(‘PGMD’)
COMMAREA(COMSTART)
LENGTH(20)
END-EXEC
……
同时需要注意的是，此时被调用程序PGMD通过RETURN命令将直接返回到CICS系统中。也就是说，使用XCTL命令调用程序时，将不改变CICS当前执行的逻辑层次。图为XCTL命令下CICS的逻辑层次关系。