EXTRACT EXIT
获取全局工作区的地址和长度。
语法
警告系统命令功能强大，可提供有关系统状态的信息，并允许对系统进行更改。 系统命令只能由授权应用程序和用户使用。
通过指定 XCMD 系统初始化参数并确保事务的命令安全检查处于激活状态（在 TRANSACTION 资源定义中指定 CMDSEC(YES) 或在 CMDSEC 系统初始化参数中指定 ALWAYS），激活命令安全检查。
条件: INVEXITREQ 和 NOTAUTH
NOHANDLE、RESP 和 RESP2是常用选项，可添加到所有 EXEC CICS 命令中以处理错误条件。 命令语法图和选项说明中没有明确包含这些选项。 有关这些常用选项和 EXEC CICS 命令语法的信息，请参阅 EXEC CICS 命令格式和编程注意事项.
描述
EXTRACT EXIT 命令获取用户出口所拥有或共享的全局工作区的地址和长度。
注: 要允许使用为 EXTRACT EXIT 命令上指定 DSNCEXT1 或 DSN2EXT1 的较早发行版编写的应用程序来查询 CICS®-Db2® 接口的状态， CICS 会自动替换正确的名称 DFHD2EX1。 CICS 通过在参数列表中设置自变量 1 来实现此目的，以寻址新名称，并且不会改变应用程序存储器。 这允许现有应用程序正常工作。
选项
- ENTRYNAME (data-value)
- 指定要获取其全局工作区信息的全局或与任务相关的用户出口的 8 字符名称。 如果省略 ENTRYNAME ，那么 CICS 假定出口的名称与 PROGRAM 选项中给定的装入模块的名称相同。 因此，必须使用定义出口的 ENABLE PROGRAM 命令上指定的 ENTRYNAME 和 PROGRAM 值的相同组合。
- GAL思 (数据区)
- 以半字二进制格式返回全局工作区的长度 (以字节为单位)。注: 如果定义了大于 32767 的GAL思 (请参阅 GAL思 FOR ENABLE PROGRAM 以获取详细信息) ，那么此命令的响应反映的值越高，如下所示:
- 如果在终端上发出了 EXTRACT EXIT 命令，那么响应将显示GAL思的负值。
- 如果从程序发出了 EXTRACT EXIT 命令，那么将设置GAL思的响应的高阶位。 在决定对返回的值执行下一个操作时，必须允许此可能性。
- GASET (ptr-ref)
- 返回全局工作区的地址。 全局工作区可以位于 31 位存储器 (高于 16 MB) 或 24 位存储器 (低于 16 MB) 中，具体取决于在定义了出口的 ENABLE PROGRAM 命令上使用 GALOCATION 选项指定的位置。
- 程序 (data-value)
- 指定包含出口入口点的装入模块的名称。 当未指定 ENTRYNAME 时，此名称也用作出口的名称; 请参阅 ENTRYNAME 选项。
条件
- INVEXITREQ
- EXTRACT EXIT 命令的 INVEXITREQ 条件由 EIBRCODE 的第一个字节中的 X'80 ' 指示。 可以通过检查 EIBRCODE 的第二个和第三个字节来确定错误的确切原因。 有关 EIBRCODE 的更多信息，请参阅 EXEC 接口块 (EIB) 响应和函数代码。
- X'800200 '
- 未启用出口。
- X'800400 '
- 出口没有全局工作区。
- X'808000 '
- PROGRAM 选项中指定的装入模块与启用 ENTRYNAME 选项中指定的出口时使用的装入模块不同。
- NOTAUTH
- RESP2 值：
- 100
- 未授权与发出任务关联的用户使用此命令。
- 101
- 未授权与发出任务关联的用户以此命令所需的方式访问此特定资源。