通过使用 CICSConnection 可配置服务来配置 IBM Integration Bus 与 CICS Transaction Server for z/OS 的连接,并在目标 CICS 区域上设置 FILEA 以设置“CICS Transaction Server for z/OS 连接”样本。
必须先使用 CICSConnection 可配置服务来配置 IBM Integration Bus 与 CICS 的连接,然后才能导入并部署“CICS Transaction Server for z/OS 连接”样本。
运行 CICS Transaction Server for z/OS 连接样本之前,必须在目标 CICS 区域上设置 FILEA:
以下步骤描述了导入并部署该样本所需的最低配置:
mqsisetdbparms IB9NODE -n cics::<ID name> -u <username> -p <password>
使用以下样本为在 mycicsregion.com 端口 12345 运行的 CICS 实例创建 CICSConnection 可配置服务。 Integration 节点由 APPLID BRKApp 和限定词 BRKQual 标识。
如果不需要登录来连接到 CICS 区域,那么运行此命令:
mqsicreateconfigurableservice IB9NODE -c CICSConnection -o
CICSSampleConnectionService -n cicsServer,clientApplid,clientQualifier
-v tcp://mycicsregion.com:12345,BRKApp,BRKQual
如果确实需要登录来连接到 CICS 区域,请运行以下命令,并将 <ID name> 替换为登录。
mqsicreateconfigurableservice IB9NODE -c CICSConnection -o
CICSSampleConnectionService -n cicsServer,clientApplid,clientQualifier,securityIdentity
-v tcp://mycicsregion.com:12345,BRKApp,BRKQual,<ID name>
mqsistop IB9NODE
mqsistart IB9NODE
要了解有关创建 CICSRequest 节点或消息流在运行时引用以获取连接信息的可配置服务的更多信息,以及要查看可用的 CICSConnection 可配置服务属性,请参阅 IBM Integration Bus 文档中的更改 CICSRequest 节点的连接信息和可配置服务属性。
mqsistop IB9NODE
mqsistart IB9NODE
要了解有关使用 IBM Integration 资源管理器来创建 CICSRequest 节点或消息流在运行时引用的可配置服务的更多信息,请参阅 IBM Integration Bus 文档中的创建新的可配置服务。要查看可用的 CICSConnection 可配置服务属性,请参阅 IBM Integration Bus 文档中的可配置服务属性。
现在可以导入并部署该样本。有关更多信息,请参阅CICS Transaction Server for z/OS 连接样本。
导入该样本后,可能会在“CICS 连接消息流”项目和 CICSConnectivity.esql 文件上看到以下警告消息:
无法解析的消息字段引用“InputBody.data.file”
无法解析的消息字段引用“InputBody.data.record”
可以忽略这些消息,因为数据文件夹不包含在 XML 模式中。
完成以下步骤以在目标 CICS 区域上设置 FILEA:
已对 CICS 区域进行初始定义时,作为安装流程的一部分创建了 FILEA 样本数据集,可以在 mydsindex.myCICSregion.FILEA中找到 FELEA 样本数据集。 如果此数据集不可用,那么使用以下“作业控制语言”(JCL) 脚本来重新创建该数据集:
//HCREFILA JOB … card details …
//CREFILEA EXEC PGM=IDCAMS,REGION=6144K
//SYSPRINT DD SYSOUT=A
//AMSDUMP DD SYSOUT=A
//SYSIN DD *
DEFINE CLUSTER ( -
NAME( hlq4filea.FILEA ) -
CYL(2,1) -
VOLUME(SYSDAV) -
KEYS( 6 1 ) -
INDEXED -
RECORDSIZE( 80 80 ) -
FREESPACE( 5 5 ) -
SHAREOPTIONS( 2 ) -
) -
INDEX ( -
NAME( hlq4filea.FILEA.INDEX ) -
) -
DATA ( -
NAME( hlq4filea.FILEA.DATA ) -
)
/*
//
//HINIFILA JOB … card details …
//* ====================
//* LOAD VSAM DATA FILE
//* ====================
//INIFILEA EXEC PGM=DFH£LDSP
//STEPLIB DD DSN=hlq4cics.SDFHLOAD,DISP=SHR
//FILEA DD DISP=SHR,DSN=hlq4filea.FILEA
//SYSOUT DD SYSOUT=*
//SYSIN DD DISP=SHR,DSN=hlq4cics.SDFHSAMP(DFH£FAIN)
//*
//
通过使用 CICS 提供的 CEDA 事务来定义 FILEA 资源。该资源可基于组 DFH£FILA 中的 CSD 命令样本 FILEA 定义,并且必须引用在之前的步骤中定义的数据集。
可以通过使用以下命令来安装 CICS 提供的样本程序 DFH$AXCS:
CEDA INSTALL PROG(DFH$AXCS) GROUP(DFH$EXCI)
现在可以运行 CICS Transaction for z/OS 连接样本,请参阅Running the CICS Transaction for z/OS 连接样本。