INQUIRE PROGRAM

描述

INQUIRE PROGRAM 命令返回有关安装在 CICS® 区域中的特定程序，映射集或分区集的信息。 所有这些资源都是装入模块，因此， CICS 对所有三个资源使用相同的 INQUIRE 命令。 为了避免混淆，单词 module 指的是查询的对象，但在某些情况下，该选项仅适用于可执行程序。

CICS 确定您从资源定义和装入模块 (如果适用) 请求的信息。 如果存在冲突，那么来自模块的信息优先于定义中的信息。 但是，仅当模块已装入并且是当前可供使用的副本时， CICS 才会检查该模块。 CICS 不会对 INQUIRE PROGRAM 命令执行装入，也不会尝试自动安装它没有定义的资源。

如果在针对同一程序发出 SET PROGRAM NEWCOPY 或 SET PROGRAM PHASEIN 命令之后针对程序发出 INQUIRE PROGRAM 命令，但在装入该程序的新副本之前， INQUIRE PROGRAM 命令返回的某些信息项适用于该程序的旧副本 (如果有)。 这适用于与装入模块相关的信息，即 ENTRYPOINT， LENGTH， LIBRARY， LIBRARYDSN和 LOADPOINT 选项。 只有在重新装入完成后 (即下次引用装入模块时) ，才会返回有关装入模块的新副本的信息。 指定装入模块的下一个 LINK， XCTL， LOAD， ENABLE或 BMS 命令将导致重新装入模块。

浏览

您可以在 INQUIRE PROGRAM 命令上使用浏览选项 START ， AT ， NEXT 和 END 来浏览系统中程序，映射集和分区集的定义。 在浏览方式下，将按字母顺序返回定义，如果需要，可以使用 AT 选项指定起始点。 请参阅 浏览资源定义 ，以获取有关浏览的常规信息，包括语法，异常条件和示例。

应用程序的专用资源

定义为安装在平台上的应用程序的一部分的程序是该应用程序的该版本的专用程序。 对于受支持的资源类型 (包括程序) ，如果资源是在作为应用程序捆绑软件的一部分或作为应用程序绑定捆绑软件的一部分打包和安装的 CICS 捆绑软件中定义的，那么该资源是专用资源。 由部署在平台上的应用程序的任务自动安装的程序也是该应用程序版本的专用程序。 由任何其他方法定义的程序公开可用于所有任务，称为公共程序。 请注意，当包含应用程序入口点语句的 CICS 束可用时，声明为应用程序入口点的专用程序将成为公共程序。

您可以使用针对资源类型的 EXEC CICS INQUIRE 系统编程命令来查询或浏览专用资源。 缺省情况下， CICS 将搜索可用于发出 EXEC CICS INQUIRE 命令的程序的资源。 您还可以选择浏览指定应用程序的专用资源。

资源特征符

您可以使用此命令来检索资源签名字段。 您可以使用这些字段来管理资源，方法是捕获资源的定义，安装和上次更改时间的详细信息。 有关更多信息，请参阅 审计资源。 资源签名字段为 BUNDLE ， CHANGEAGENT ， CHANGEAGREL ， CHANGETIME ， CHANGEUSRID ， DEFINESSOURCE ， DEFINETIME ， INSTALLAGENT ， INSTALLTIME 和 INSTALLUSRID。 请参阅 资源签名字段值摘要 ，以获取有关资源签名字段内容的详细信息。

选项

APIST (cvda) (仅限程序)

返回指示已安装程序定义的 API 属性的 CVDA 值。 API 属性用于应用程序， PLT 程序，用户可替换模块和与任务相关的用户出口。 API 属性不用于全局用户出口。

在 ENABLE 命令上指定的任何选项都不会更改与任务相关的用户出口程序的已安装 PROGRAM 资源上的 API 属性。 对于与任务相关的用户出口程序， CICS 始终使用程序资源定义中定义的值返回 CVDA。

不能使用 SPI 修改程序的 API 属性。 只能通过在 CICS PROGRAM 资源定义中或在程序自动安装模型中重新定义程序的 API 选项并重新安装定义来更改 API 属性。 CVDA 值如下：

CICSAPI

该程序限制为仅使用 CICS 允许的应用程序编程接口。 如果使用 CONCURRENCY (QUASIRENT) 定义程序，那么它始终在准重入 (QR) 上运行 TCB。 如果将程序定义为 CONCURRENCY (THREADSAFE) ，那么它将在确定为合适的时间在 CICS 正在使用的任何 TCB 上运行。 如果程序定义为 CONCURRENCY (REQUIRED) ，那么它始终在 L8 开放式 TCB 上运行。

OpenAPI

程序不限于 CICS 允许的应用程序编程接口。 根据 EXECKEY 设置， CICS 在其自己的 L8 或 L9 方式开放式 TCB 上运行程序。 如果在运行 CICS 命令时， CICS 需要切换到 QR TCB ，那么它将返回到开放式 TCB ，然后再将控制权交还给应用程序。

OPENAPI 要求将程序编码为线程安全标准，并使用 CONCURRENCY (THREADSAFE) 或 CONCURRENCY (REQUIRED) 进行定义。 首选选项是将 CONCURRENCY (REQUIRED) 与 OPENAPI 配合使用，尽管允许 CONCURRENCY (THREADSAFE) 与先前发行版兼容。

应用程序 (数据区)

指定或返回应用程序上下文的应用程序名称元素。 应用程序名称的长度最多可以为 64 个字符。

要浏览在平台上部署的应用程序的专用资源，请将 APPLICATION ， APPLMAJORVER ， APPLMINORVER ， APPLMICROVER 和 PLATFORM 选项与浏览命令 START 配合使用，以指定要浏览其资源的应用程序的平台，应用程序名称和完整版本号。

对于公共 PROGRAM 资源的查询， APPLICATION ， APPLMAJORVER ， APPLMINORVER ， APPLMICROVER 和 PLATFORM 选项返回将程序定义为应用程序入口点的应用程序的名称，版本号和平台。 OPERATION 选项返回应用程序中相关操作的名称。 如果程序未定义为应用程序入口点，那么 APPLICATION 将返回 64 个空白。

APPLMAJORVER (数据区域)

以全字二进制格式指定或返回应用程序上下文的应用程序主版本元素。 对于公共程序资源的查询，如果程序未定义为应用程序入口，则APPLMAJORVER返回 -1。

APPLMINORVER (数据区)

以全字二进制格式指定或返回应用程序上下文的应用程序次版本元素。 对于公共程序资源的查询，如果程序未定义为应用程序入口，则APPLMINORVER返回 -1。

APPLMICROVER (数据区域)

以全字二进制格式指定或返回应用程序上下文的应用程序微版本元素。 对于公共程序资源的查询，如果程序未定义为应用程序入口，APPLMICROVER将返回 -1。

CEDFSTATUS (cvda) (仅限程序)

返回一个 CVDA 值，该值指示在 EDF 下运行此模块时执行诊断设施 (EDF) 事务所执行的操作。 CVDA 值如下：

CEDF

将显示 EDF 诊断屏幕。 如果程序是使用 EDF 选项转换的，那么将显示所有 EDF 屏幕。 如果程序是使用 NOEDF 翻译的，那么仅显示程序启动和终止屏幕。

NOCEDF

未显示任何 EDF 屏幕。

NOTAPPLIC

EDF 不适用，因为模块是远程程序，映射集或分区集。

CHANGEAGENT (cvda)

返回用于标识上次对资源定义进行更改的代理程序的 CVDA 值。 可能的值如下所示：

自动安装

资源已自动安装。

CREATESPI

上次由 EXEC CICS CREATE 命令更改资源定义。

CSDAPI

上次由 CEDA 事务或 DFHEDAP 的可编程接口更改资源定义。

CSDBATCH

DFHCSDUP 作业上次更改资源定义。

DREPAPI

资源定义上次由 CICSPlex ® SM BAS API 命令更改。

DYNAMIC

资源定义上次由 "链接至 Liberty" 应用程序进行更改。

OVERRIDE

资源定义上次由资源覆盖文件中的覆盖规则的应用程序更改。

SYSTEM

上次由 CICS 或 CICSPlex 系统更改资源定义。

CHANGEAGREL (data-area)

返回上次更改资源定义时正在运行的 CICS 发行版的 4 数字。

CHANGETIME (data-area)

返回表示上次更改资源定义时的时间戳记的 ABSTIME 值。 有关 ABSTIME 值的格式的更多信息，请参阅 FORMATTIME。

CHANGEUSRID (data-area)

返回运行更改代理程序的 8 字符用户标识。

COBOLTYPE (cvda) (仅限程序)

返回一个 CVDA 值，该值指示在其中写入模块的 COBOL 类型 (如果是 COBOL 程序)。 通过检查装入模块来确定类型。 CVDA 值如下：

COBOL

该模块是一个 OS/VS COBOL 程序。 (OS/VS COBOL 程序无法在此 CICS Transaction Server 版本下运行。)

COBOLII

该模块是使用 VS COBOL II 或更新的 COBOL 编译器编译的 COBOL 程序。

NOTAPPLIC

模块已装入并且不是 COBOL 程序，或者模块尚未装入并且未定义为 COBOL 程序。

NOTINIT

该模块定义为 COBOL 程序，但由于尚未装入该模块，因此无法确定类型。

CONCURRENCY

返回 CVDA 值，该值指示已安装程序定义的并行属性。 CVDA 值如下所示：

准西伦特

该程序定义为拟重入程序，并且只能在 CICS QR TCB 下运行。

线程安全

该程序被定义为线程安全的程序，当该程序被授予控制权时，该程序可以在其用户任务正在使用的任何 TCB 下运行。 这可以是开放式 TCB 或 CICS QR TCB。

必需

程序定义为线程安全程序，并且必须在开放式 TCB 上运行。 使用的开放式 TCB 类型取决于 API 设置。

备注信息：

1. 如果程序尚未装入，或者正在等待 NEWCOPY 或 PHASEIN 请求后重新装入，那么并行属性派生自已安装的程序资源定义。 请注意，程序定义的缺省值为 QUASIRENT。 但是，在符合 Language Environment ® 的程序中，可以在稍后装入程序时覆盖最初定义的并行。 如果 CICS 发现程序本身包含由 Language Environment 运行时选项定义的 CONCURRENCY 值，那么已安装的程序资源定义将由 Language Environment 运行时选项更新。
2. FORCEQR 系统初始化参数不会更改已安装的程序资源定义上的 CONCURRENCY 属性。 对于线程安全定义的程序， CICS 返回 THREADSAFE 的 CVDA ，即使指定了 FORCEQR=YES 也是如此。
3. 在 ENABLE 命令上指定的任何选项都不会更改与任务相关的用户出口程序的已安装程序资源定义上的 CONCURRENCY 属性。 对于与任务相关的用户出口程序， CICS 始终使用程序资源定义中定义的值返回 CVDA。

   不能使用 SPI 修改程序的并行属性; EXEC CICS SET PROGRAM 命令不支持 CONCURRENCY 选项。 只能通过在 CICS 程序资源定义或程序自动安装模型中重新定义程序的 CONCURRENCY 选项，然后重新安装定义来更改并行性。

COPY (cvda)

返回一个 CVDA 值，该值指示是否需要模块的新副本以使其可供使用。 在 CICS 尝试装入模块而找不到模块之后，会发生此需求，因为 CICS 会将其标记为 不可装入 ，以避免进一步装入尝试的开销。 要使模块再次可用，请发出 SET PROGRAM COPY 命令或其 CEMT 等效命令。 在执行此操作之前，请确保该程序存在于 DFHRPL 或动态 LIBRARY 并置中的其中一个库中。 CVDA 值如下：

NOTREQUIRED

不需要新的副本。 对于在 JVM 中运行的 Java™ 程序，将始终返回此 CVDA 值。

必需

需要新的副本。

DATALOCATION (cvda) (仅限程序)

返回一个 CVDA 值，该值指示此模块是否可以接受高于 16 MB 的数据地址。 CVDA 值如下：

任何

程序可以接受高于 16 MB 的地址。

下面

程序要求从 CICS 返回给它的任何数据地址小于 16 MB。

NOTAPPLIC

此选项不适用，因为模块是远程程序，映射集或分区集。

DEFINESOURCE (数据区域)

返回资源定义的 8 字符源。 DEFINESOURCE 值取决于 CHANGEAGENT 值。 有关更多信息，请参阅 资源签名字段值的摘要。

DEFINETIME (数据区)

返回 ABSTIME 值，该值表示创建资源定义时的时间戳记。

DYNAMSTATUS (cvda) (仅限程序)

返回一个 CVDA 值，该值指示如果程序是程序链接请求的主题，那么是否可以动态路由该请求。 CVDA 值如下：

DYNAMIC

如果程序是程序链接请求的主体，那么将调用 CICS 动态路由程序。 如果在 LINK 命令的 SYSID 选项上未显式指定远程服务器区域，那么路由程序可以将请求路由到要运行该程序的区域。

不动态

如果程序是程序链接请求的主题，那么不会调用动态路由程序。

对于分布式程序链接 (DPL) 请求，必须在 PROGRAM 定义的 REMOTESYSTEM 选项或 LINK 命令的 SYSID 选项上显式指定要运行程序的服务器区域; 否则，它缺省为本地区域。

有关 DPL 请求的动态路由的信息，请参阅 动态路由 DPL 请求。

ENTRYPOINT (ptr-ref)

返回模块的入口点 (如果已装入)。 CICS 程序装入服务根据装入模块的寻址方式设置入口点:

• AMODE (24): 位 0 为 0 ，位 31 为 0。
• AMODE (31): 位 0 是 1 ，位 31 是 0。
• AMODE (64): 位 0 为 0 ，位 31 为 1。

如果模块未装入，是远程程序，或者是在 JVM 中运行的 Java 程序，那么将返回空指针 (X'FF000000')。

EXECKEY (cvda) (仅限程序)

返回一个 CVDA 值，该值指示模块的存储密钥 (如果它是可执行程序)。 存储键可限制程序可访问的存储区域，具体取决于其他变量。 请参阅 INQUIRE TASK 和 INQUIRE TRANSACTION 命令的 ISOLATEST 选项， INQUIRE SYSTEM 命令的 STOREPROTECT 和 TRANISOLATION 选项以及有关 CICS 存储保护和事务隔离中的存储保护的常规讨论。 CVDA 值如下：

CICSEXECKEY

程序在 CICS 键中运行。

NOTAPPLIC

模块是远程程序，映射集或分区集。

用户 XECKEY

程序在用户密钥中运行。

EXECUTIONSET (cvda) (仅程序)

返回一个 CVDA 值，该值指示模块是否仅限于 CICS API 的分布式程序链接子集。 EXECUTIONSET 选项仅适用于可执行程序，并且仅在本地调用程序时管理 API。 当远程调用它时，即在分布式程序链接调用的程序级别或更低级别执行时，程序始终限于此子集。 CVDA 值如下：

DPLSUBSET

程序始终受限。

FULLAPI

除非远程调用，否则程序不受限制。

NOTAPPLIC

EXECUTIONSET 不适用，因为模块是远程程序，映射集或分区集。

HOLDSTATUS (cvda)

返回一个 CVDA 值，该值指示当前是否使用 HOLD 选项装入了模块的副本。 CVDA 值如下：

挂起

当前正在使用 HOLD 选项装入副本。

无

当前未使用 HOLD 选项装入任何副本。

NOTAPPLIC

模块当前未装入，或者是远程程序。

INSTALLAGENT (cvda)

返回用于标识安装资源的代理程序的 CVDA 值。 可能的值如下所示：

自动安装

资源已自动安装。

BUNDLE

资源是由捆绑软件部署安装的。

CREATESPI

资源是通过 EXEC CICS CREATE 命令安装的。

CSDAPI

该资源是由 CEDA 事务或 DFHEDAP 的可编程接口安装的。

DYNAMIC

资源定义上次由 "链接到 Liberty" 应用程序安装。

GRPLIST

该资源已由 GRPLIST INSTALL安装。

SYSTEM

该资源是由 CICS 或 CICSPlex SM 系统安装的。

INSTALLTIME (数据区)

返回表示安装资源时的时间戳记的 ABSTIME 值。

INSTALLUSRID (数据区)

返回安装资源的 8 字符用户标识。

JVMCLASS (data-area) (仅限 Java 程序)

返回要由 JVM 提供控制的 Java 程序中主类的名称 (以 255 个字符计) ，如程序定义中所指定。

JVMPROFILE (data-area) (仅限 Java 程序)

返回要用于运行此 Java 程序的合用 JVM 的 JVM 概要文件的名称。 该名称的最大长度为 8 个字符。

JVMSERVER (data-area) (仅限 Java 程序)

返回运行此 Java 程序的 JVM 服务器的名称。 该名称的最大长度为 8 个字符。

LANGINDEED (cvda) (仅限程序)

返回用于指示已装入模块的语言的 CVDA 值。 如果尚未装入模块，那么 CICS 无法推断语言。 在这种情况下， CVDA 值指示从资源定义中获取的已定义语言。 CVDA 值如下：

Assembler

语言是汇编程序。

C

语言为 C 或 C++。

COBOL

语言为 COBOL。

JAVA

语言为 Java。

LE370

该模块 (无论其语言如何) 已编译为与 Language Environment 一起运行。

NOTAPPLIC

LANGUAGE 不适用，因为模块是远程程序，映射集或分区集。

未定义

未在资源定义中指定语言，并且尚未装入语言。

PLI 或 PL1

语言是 PL/I。

LANGUAGE (cvda) (仅限程序)

返回指示程序语言的 CVDA 值。 CICS 程序管理器推断正确的语言，但在没有 DFHEAI 或 DFHEAG 存根的情况下以汇编程序编写的程序除外。 在这种情况下，程序定义的 LANGUAGE 属性用于返回值。 CVDA 值如下：

Assembler

语言是汇编程序。

C

语言为 C。

COBOL

语言为 COBOL

LE370

该模块 (无论其语言如何) 利用多语言支持，或者使用符合语言环境的编译器进行编译。

NOTAPPLIC

LANGUAGE 不适用，因为模块是远程程序，映射集或分区集。

未定义

未在资源定义中指定语言。

PLI 或 PL1

语言是 PL/I。

LENGTH (数据区)

返回一个全字二进制字段，该字段给出模块的长度 (以字节计)。 如果尚未在当前 CICS 会话中装入模块，那么将返回值 0。 如果远程程序或Java程序在JVM中运行，则返回值-1。

LIBRARY (数据区)

返回从中装入此程序的库资源的 8 字符名称。 如果未装入程序，或者 LPASTATUS 为 LPA ，那么此数据区为空白，指示已从 LPA 装入程序。

注：

• 如果程序是从已安装的库装入的，那么将返回 LIBRARY 和 LIBRARYDSN 名称。
• 如果程序是从已禁用的库装入的，那么将返回 LIBRARY 名称，但 LIBRARYDSN 为空。
• 如果程序是从已废弃的库装入的，那么 LIBRARY 和 LIBRARYDSN 名称都为空白。

LIBRARYDSN (数据区)

返回从中装入程序的数据集的 44 个字符的名称。 如果未装入程序，或者 LPASTATUS 为 LPA ，那么此数据区为空白，指示已从 LPA 装入程序。

• 如果程序是从已安装的库装入的，那么将返回 LIBRARY 和 LIBRARYDSN 名称。
• 如果程序是从已禁用的库装入的，那么将返回 LIBRARY 名称，但 LIBRARYDSN 为空。
• 如果程序是从已废弃的库装入的，那么 LIBRARY 和 LIBRARYDSN 名称都为空白。

LOADPOINT (ptr-ref)

返回模块的装入地址。 如果当前未装入该文件，或者如果该程序是在 JVM 中运行的 Java 程序，那么将返回空指针 (X'FF000000')。

LPASTATUS (cvda)

返回一个 CVDA 值，该值指示上次使用该模块时该模块是否位于链接装配区域中。 CVDA 值如下：

LPA

使用的副本位于链接装配区域 (LPA) 或扩展链接装配区域 (ELPA) 中。

NOTAPPLIC

模块尚未使用，是远程程序或 Java 程序。

无 TLPA

使用的副本位于 CICS 动态存储器中。

操作 (data-value)

在 64 个字符的区域中，返回将此程序定义为入口点的应用程序操作的名称。 如果未将程序定义为应用程序入口点，那么 OPERATION 将返回 64 个空白。

PLATFORM (数据区)

指定或返回应用程序上下文的平台名称元素。 平台名称的长度最多可以为 64 个字符。 对于公共 PROGRAM 资源的查询，如果该资源未定义为应用程序入口点，那么 PLATFORM 将返回 64 个空白。

程序 (data-value)

指定要查询的程序，映射集或分区集的名称。 该名称的最大长度为 8 个字符。

进步类型 (cvda)

返回指示模块类型的 CVDA 值。 CVDA 值如下：

MAPSET

模块是映射集。 (MAP 仍然是 MAPSET 的同义词，但 MAPSET 是首选 CVDA 值。)

PARTITIONSET

模块是分区集。

PROGRAM

模块是一个可执行程序。

REMOTENAME (data-area) (仅程序)

返回在其 PROGRAM 定义的 REMOTESYSTEM 选项中指定的 CICS 区域中用于识别模块的 8 字符名称。 REMOTENAME 选项仅适用于程序，并且仅适用于定义为远程的程序; 对于本地程序，映射集和分区集，返回的值为空白。

REMOTESYSTEM (data-area) (仅程序)

返回定义模块的 CICS 区域的 4 字符名称 (来自 PROGRAM 定义中的 REMOTESYSTEM 值)。 它仅适用于程序，并且仅适用于定义为远程的程序; 对于本地程序，映射集和分区集，返回的值为空白。

REPLICATION (cvda)

返回指示程序是否为复制器的 CVDA 值。 CVDA 值如下所示：

复制器

该程序是一个复制程序，具有对 AVAILABILITY 状态为 RREPL 的 VSAM 数据集的完全访问权。

NOREPLICATOR

该程序不是复制程序，仅具有对 AVAILABILITY 状态为 RREPL 的 VSAM 数据集的读访问权。

RESCOUNT (数据区)

返回一个全字二进制字段，该字段提供在此查询时对此模块进行的单独使用的次数。 如果模块是远程程序或在JVM中运行的Java程序，则返回值-1。

驻留 (cvda) (仅限程序)

返回一个 CVDA 值，该值指示程序的驻留属性。 CVDA 值如下所示：

RESIDENT

该计划是永久居民。 它定义为RES为准 (YES)。

非居民

程序已定义为RES决议 (NO)。

RUNTIME (cvda)

返回一个 CVDA 值，该值指示程序的运行时环境。 CVDA 值如下：

JVM

该程序是在 Java 虚拟机 (JVM) 中运行的 Java 程序。

LE370

该程序将在 Language Environment 运行时支持下运行。

NONLE370

该程序将在特定于语言的运行时环境中运行。

NOTAPPLIC

RUNTIME 不适用，因为模块是映射集或分区集。

UNKNOWN

程序运行时环境未知，因为 CICS尚未装入该程序，因此未推断其源语言，这指示要使用的运行时环境。

XPLINK

该程序是使用 XPLINK 选项编译的 C 或 C++ 程序。

SHARESTATUS (cvda)

返回一个 CVDA 值，该值指示下次需要新副本时 CICS 获取模块的位置。 CVDA 值如下：

NOTAPPLIC

SHARESTATUS 不适用，因为模块是在 JVM 中运行的远程程序或 Java 程序。

私有

从 DFHRPL 或动态 LIBRARY 并置中的其中一个库装入模块。

共享

要使用 LPA 副本 (如果有)。 如果不是，那么将装入模块，就像 SHARESTATUS 是 PRIVATE 一样。

状态 (cvda)

返回用于指示模块是否可供使用的 CVDA 值。 CVDA 值如下：

DISABLED

该模块不可用。

ENABLED

该模块可供使用。

TRANSID (data-area) (仅程序)

返回此模块 (必须是程序) 以远程方式运行的事务的 4 字符名称; 即，远程区域分配给在其中创建的任务以在本地区域中的任务链接到该任务时执行该任务的事务标识。 此值来自 PROGRAM 定义中的 TRANSID 选项值，仅适用于定义为远程的程序。 对于本地程序，映射集和分区集，如果没有为远程程序指定 TRANSID ，那么返回的值为空白。

用户计数 (数据区)

返回一个全字二进制字段，该字段提供自当前 CICS 会话启动以来使用模块的总次数。 为包括 Java 程序在内的所有模块 (远程程序除外) 提供了使用计数。 如果程序是远程的，则返回 -1。

最大值为 2147483647。 达到此值后，不会更改使用计数。

条件

APPNOTFOUND

RESP2 值：

1

已发出 START 命令，指定应用程序上下文。 找不到指定的应用程序。

END

RESP2 值：

2

没有更多此类型的资源定义。

ILLOGIC

RESP2 值：

1

当浏览此资源类型时，您已发出 START 命令，或者当浏览此资源类型时，您已发出 NEXT 或 END 命令。

NOTAUTH

RESP2 值：

100

未授权与发出任务关联的用户使用此命令。

101

未授权与发出任务关联的用户以此命令所需的方式访问此特定资源。

PGMIDERR

RESP2 值：

1

找不到程序。 如果在 INQUIRE PROGRAM NEXT 命令上发生此错误，那么先前的编目错误已使 PROGRAM ， MAPSET 或 PARTITIONSET 定义不可用，并且必须废弃并重新安装该定义。