使用 CICSPlex SM API 安装文件定义的示例

您可以使用 CICSPlex ® SM API 从 CSD 或使用 BAS 来安装 CICS® 资源定义。

为了简化此示例，仅包含与任务相关的属性。例如， THREAD 和 RESULT 属性将从 CRITERIA 中省略，而 LENGTH 和 PARMLEN 值将从 PARM 中省略。

使用 BAS 安装文件

此示例显示将单个 CICS 文件定义 filedef_name安装到 CICSplex cicsplex_name中的 CICS 系统 cics_system_name中。

CONNECT CONTEXT(cicsplex_name) SCOPE(cicsplex_name)   1 

GET OBJECT(FILEDEF)
    CRITERIA(NAME=filedef_name AND DEFVER=def_ver.)   2 
    
PERFORM SET ACTION(INSTALL)
        PARM(TARGET(cics_system_name) USAGE(LOCAL).)  3

使用 BAS 安装定制文件

此示例显示了定制单个 CICS 文件定义 filedef_name的已安装属性 (包括名称) 的方法。这可用于利用模板定义或提供特定于区域的属性变体。在此示例中， CICS 文件定义 filedef_name将作为 CICS 文件 cics_file_name和状态 cics_file_status安装到 CICSplex cicsplex_name中的 CICS 系统 cics_system_name中。

CONNECT CONTEXT(cicsplex_name) SCOPE(cicsplex_name) 1 
GET OBJECT(FILEDEF)
     CRITERIA(NAME=filedef_name AND DEFVER=def_ver.) 2 
PERFORM SET ACTION(INSTALL)
     PARM(TARGET(cics_system_name) USAGE(LOCAL) 3 
     OVERRIDE(NAME=cics_file_name,STATUS=cics_file_status) 
     OVERTYPE)TARGET).) 5

3 TARGET 参数指定一个或多个 CICS 系统， BAS 将在这些系统中安装资源。

5 OVERRIDE 参数指定将由资源在安装时使用的 attribute_name=attribute_new_value 配对。 OVERTYPE 参数表示将在其中应用 OVERRIDE 。

从 CSD 安装文件

此示例显示将单个 CICS 文件定义 filedef_name安装到 CSD 组 csd_group_name中的 CICS 系统 cics_system_name中。

CONNECT CONTEXT(cicsplex_name) SCOPE(cicsplex_name)   1 

GET OBJECT(FILEDEF)
    SCOPE(cics_system_name)                           1 
    PARM(CSDGROUP(csd_group_name).)                   4 
    CRITERIA(NAME=filedef_name.)                      2 
    
PERFORM SET ACTION(CSDINSTALL)

1 SCOPE 值不用于 BAS 安装。对于 CSD 安装，活动的 SCOPE 必须是 CICS 系统的名称，从中抽取资源并将定义安装到该系统中。

2 DEFVER 属性指定资源的定义版本，如果您有多个同名的资源，那么这很有用。如果要使用 BAS 安装资源并且有多个同名资源，那么必须同时指定资源名称和定义版本。请勿将 DEFVER 属性与 CSD 中定义的资源配合使用。

3 TARGET 参数指定一个或多个 CICS 系统， BAS 将在这些系统中安装资源。

4 CSDGROUP 参数指定将从与 SCOPE 中的 CICS 系统关联的 CSD 检索资源定义对象。