DISCARD PROGRAM
移除程序、映射集或分区集的定义。
语法
警告系统命令功能强大，可提供有关系统状态的信息，并允许对系统进行更改。 系统命令只能由授权应用程序和用户使用。
通过指定 XCMD 系统初始化参数并确保事务的命令安全检查处于激活状态（在 TRANSACTION 资源定义中指定 CMDSEC(YES) 或在 CMDSEC 系统初始化参数中指定 ALWAYS），激活命令安全检查。
条件: INVREQ ， NOTAUTH 和 PGMIDERR
NOHANDLE、RESP 和 RESP2是常用选项，可添加到所有 EXEC CICS 命令中以处理错误条件。 命令语法图和选项说明中没有明确包含这些选项。 有关这些常用选项和 EXEC CICS 命令语法的信息，请参阅 EXEC CICS 命令格式和编程注意事项.
此命令是线程安全的。
描述
DISCARD PROGRAM 命令从本地 CICS® 系统中除去程序，映射集或分区集 (装入模块资源) 的定义，以便系统不再具有对该资源的访问权。 它将撤销先前安装的同名 PROGRAM ， MAPSET 或 PARTITIONSET 定义。
不能废弃正在执行的模块或由任务以其他方式使用的模块。 由 CICS 提供的定义 (其名称以 DFH 开头的模块) 和定义为用户可替换的模块 (例如自动安装程序) 也不合格。
不能废弃由 BUNDLE 资源创建的 PROGRAM 资源。 要废弃程序，必须禁用并废弃 BUNDLE 资源。 请参阅 BUNDLE 资源 以获取更多信息。
有关废弃的常规信息，请参阅 废弃资源定义 。
选项
- 程序 (data-value)
- 指定要除去的程序，映射集或分区集的 8 字符名称。
条件
- INVREQ
- RESP2 值：
- 1
- 无法废弃该资源，因为其名称以 DFH 开头。
- 11
- 资源定义当前正在使用中。
- 15
- 无法废弃资源，因为它是用户可替换的模块。
- 300
- 无法废弃该资源，因为它是由 BUNDLE 资源安装的。
- 301
- 您指定的操作对于已从 CICS 束定义的 LIBRARY 装入的 PROGRAM 无效。
- NOTAUTH
- RESP2 值：
- 100
- 未授权与发出任务关联的用户使用此命令。
- 101
- 未授权与发出任务关联的用户以此命令所需的方式访问此特定资源。
- PGMIDERR
- RESP2 值：
- 7
- 找不到资源定义。