使用 CICSPlex SM API 安装 CICS 连接定义的示例

您可以使用 CICSPlex ® SM API 从 CSD 或使用 BAS 从 CICSPlex SM 数据存储库安装 CICS® 连接定义。

CICS 连接定义的安装与其他 CICS 资源的安装不同，因为它们必须与至少一个关联的会话定义一起安装。在 BAS 中，通过使用资源分配 (RASGNDEF) 来实现 CICS 连接定义的安装。在 CSD 中，通过从组安装连接和会话来实现 CICS 连接定义的安装。

使用 BAS 安装连接定义

此示例显示将 CICS 连接定义 conndef_name安装到 CICSplex cicsplex_name中的 CICS 系统 cics_system_name中。

CONNECT CONTEXT(cicsplex_name) SCOPE(cicsplex_name)

GET OBJECT(CONNDEF)
    CRITERIA(NAME=conndef_name AND DEFVER=def_ver.)) 
    
PERFORM SET ACTION(INSTALL)
        PARM(TARGET(cics_system_name) 
             USAGE(LOCAL)
             REFASSIGN(rasgndef_name).)              1

从 CSD 安装连接定义

此示例显示将定义到 CSD 组 csd_group_name的 CICS 连接定义 condef_name安装到 CICS 系统 cics_system_name中。

CONNECT CONTEXT(cicsplex_name) SCOPE(cicsplex_name)

GET OBJECT(CSDGROUP)                                 2 
    SCOPE(cics_system_name)
    CRITERIA(NAME=csd_group_name.)
    
PERFORM SET ACTION(CSDINSTALL)                       3

1 CONNDEF 安装需要 REFASSIGN 参数。该值是 "资源分配" (RASGNDEF) ，用于标识要随连接定义一起安装的资源组 (RESGROUP) 中的一个或多个会话定义。

2 必须使用 CSDGROUP， CSDINGRP， CSDINLST或 CSDLIST 之一从 CSD 安装连接定义，并且必须在要安装的结果集中至少包含一个连接和会话对。

3 CSDINSTALL 操作不需要任何参数，因为 OBJECT 是仅供 CSD 使用的资源。