使用 CICSPlex SM API 删除 CSD 组的示例

您可以使用 CICSPlex ® SM API 从 CSD 中删除 CSD 组。

删除 CSD 组

此示例显示删除 CSD 组 csd_group_name，该组中的所有 CICS 资源定义以及对 CICS 系统所使用的 CSD 中 CSD 列表中组的所有引用 cics_system_name。

CONNECT CONTEXT(cicsplex_name)    
        SCOPE(cics_system_name)         1 

GET OBJECT(CSDGROUP)               
    CRITERIA(NAME=csd_group_name.)
          RESULT(result_set_token)

FETCH INTO(csdgroup_record_buffer)
      LENGTH(csdgroup_record_length)
      RESULT(result_set_token)    

REMOVE OBJECT(CSDGROUP)
       FROM(csdgroup_record_buffer)
       LENGTH(csdgroup_record_length)
       PARM(LISTREMOVE.)

1 GET 和 REMOVE 命令的 SCOPE 参数值必须是正在使用 CSD 的 CICS ® 系统的名称。

2 LISTREMOVE 参数从 CSD 中的所有列表中除去 CSD 组。如果未指定此参数，那么将删除 CSD 组，但对该组的引用将保留在它所属的任何 CSD 列表中。