CICS命令参考

CICS/TXSeries安装说明

1. 有关CICS的系统软件安装

1.1 C环境, ifor

C环境:

先安装bos.adt.*

设置指令：/usr/ibmcxx/bin/replaceCSET

ifor: (安装在/var/ifor下)(可能要修改/etc/inittab重启动)

i4cfg –stop

i4cfg进入，选择第二个选项:NodeLock Server，退出时选择保存

i4cfg -start(启动)

i4blt 选菜单: product/enroll->import:/usr/ibmcxx/*->cxx36_cn.lic (Ｃ++与CICS冲突时，将/etc/rc.ncs文件中“startsrc -s glbd”注释掉；这样，CICS 可用，Ｃ++不能用。)

chmod -R 777 /var/ifor

1.2DB, SDK

1.3 系统参数(建议适当扩大)

[AIX]:

●系统语言环境为en_US

●检查网络配置：hostname, smitty tcpip, vi /etc/hosts

●修改AIX的cics用户的限制数值(在/etc/security/limits文件)

fsize = -1

fsize_hard = -1

core = -1

cpu = -1

data = -1

rss = -1

stack = -1

nofiles = -1

#注：可以使用命令

chuser “nofiles=3000” cics

[Solaris]:

TXSeries需要的系统参数(修改/etc/system文件，需要重新启动)：设置单进程的共享内存最大为50M (参考RegionPool和TaskSharedPool的设置)

set shmsys:shminfo_shmmax=52428800

设置单进程句柄硬限制为(软限制例：“ulimit -n 1024”)

set rlim_fd_max = 8192

set rlim_fd_cur = 4096

CTG需要的系统参数：

set msgsys:msginfo_msgmax = 65535

Maximum size of System V message.

set msgsys:msginfo_msgmnb = 65535

Maximum number of bytes that can be on any one message queue.

set msgsys:msginfo_msgssz = 32

Specifies size of chunks system uses to manage space for message buffers. Obsolete since the Solaris 8 release.

set msgsys:msginfo_msgseg = 16384

Number of msginfo_msgssz segments the system uses as a pool for available message memory. Total memory available for messages is msginfo_msgseg * msginfo_msgssz. Obsolete since the Solaris 8 release.

set semsys:seminfo_semmni = 4096

Maximum number of semaphore identifiers.

set msgsys:msginfo_msgtql = 10000

The maximum number of queue entries that can be in the system at the same time. A low value can adversely affect system performance, or cause the client to freeze. IBM recommends that you set this value to the maximum (10000), or at least double the maximum number of concurrent requests. Stress load your system, and then use the ipcs -qa command to determine the setting.

[HP]:

use “sam”

maxfiles=1024

maxswapchunks=512

max_thread_proc=1024 //即max_thread_proc=8 + (10 x MaxServers)。此参数不足时系统报ccreatethread失败

maxuprc=256

maxusers=256

nflocks=256

ninode=8192

nkthread=((nproc*7/4)+16) //nproc=(20 + 8 * maxusers)即nkthread= 64 + 33 x MaxServers。可用4096

npty=128

semmnu=64

semume=32

shmmax=0x10000000 //256 MB

shmmni=200

shmseg=120

#CTG需要的系统参数：

msgmnb=65535

msgmax=65535

msgssz=32

msgseg=16384

msgmni=500

#注：在多于60个client并发访问时，ECI返回-9。通过glance/F5发现内核参数msgmni(Number of Message Queue Identifiers)不够，调整50->500后恢复。

nkthread= 56+ (8+ (10*MaxServers)) + (23*MaxServers) = 64+ 33*MaxServers

例如：64+ (33*5) =229

例如：64+ (33*50) =1714

max_thread_proc= 8+ (10*MaxServers)

例如：8+ (10*5) =58

例如：8+ (10*50) =508

2. 设置用户、组

2.1 组：

[AIX]:

smitty mkgroup

Group NAME cics

USER list root

ADMINISTRATOR list root

Group NAME cicsterm

USER list root

ADMINISTRATOR list root

[HP]:

ln -s /etc/group /etc/logingroup

[nonAIX]:

groupadd cics

groupadd cicsterm

2.2用户：

[AIX]:

smitty mkuser

User NAME cics

Primary GROUP cics

Group SET cicsterm

User NAME SFS_SERV

Home Dir /var/cics_servers/SSD/cics/sfs/$ServerId

Primary GROUP cics

Group SET cicsterm

[AIX]:

mkuser pgrp=cics home=/var/cics_servers/SSD/cics/sfs/$ServerId SFS_SERV

[HP]:

useradd -g cics -s /bin/ksh -m -d /home/cics cics

useradd -g cics -s /bin/ksh -m -d /home/SFS_SERV SFS_SERV

[Solaris]:

useradd -g cics -s /bin/ksh -m -d /export/home/cics cics

useradd -g cics -s /bin/ksh -m -d /export/home/SFS_SERV SFS_SERV

注意：后面将数据库用户加入cics组；一般$ServerId即$HOSTNAME，请参照$CICS_SFS_SERVER；SFS用户名，一般即SFS的short name(缺省为SFS_SERV)，注意与上述的$ServerId含义不同。

检查/etc/passwd和/etc/group文件，root,cics,SFS_SERV(还有数据库用户)属于cics 和cicsterm组。

注意：将root, cics和db加入cics, cicsterm和DB组。

3. 创建日志文件系统和逻辑卷

3.1 JFS:

[AIX]:

smitty crjfs

选择'Add a Standard Journaled File System'和相应得卷组(vg)：

SIZE of file system 40000(20 mega bytes)(单位：0.5K)

MOUNT POINT /var/cics_servers

Mount AUTOMATICALLY at system restart? Yes

SIZE of file system 80000(40 mega bytes,根据实际交易量)

MOUNT POINT /var/cics_regions

Mount AUTOMATICALLY at system restart? Yes

注：在/usr/lpp/cics(AIX)或/opt/cics(nonAIX)需要150M

[Solaris]:

use “format”

[HP]:

use “sam”

mount /var/cics_servers

mount /var/cics_regions

[ALL]:

如果仅在/var下建立目录，请考虑安全属性。例：chmod 755 cics_*

mkdir /var/cics_regions

mkdir /var/cics_servers

chown -R cics:cics /var/cics*

3.2LV:

[AIX]:

smitty mklv

用F4键选择相应的卷组(vg)。(用smit删除重名卷组，删不掉重启动) Logical volume NAME sfs_SFS_SERV

Number of LOGICAL PARTITIONS 16(64 mega bytes)(单位：4M) Logical volume NAME log_SFS_SERV

Number of LOGICAL PARTITIONS 16(64 mega bytes) [Solaris]:

use “format”

[HP]:

use “sam”

[AIX]:

假设SFS短名(%S)为SFS_SERV

cd /dev //log_SFS_SERV, sfs_SFS_SERV, rlog_SFS_SERV, rsfs_SFS_SERV

chown SFS_SERV:cics *SFS* //有四个设备会被授权SFS_SERV用户

chmod 777 *SFS* //有四个设备会被授权SFS_SERV用户[Solaris]:

(假设SFS短名(%S)为SFS_SERV，假设硬盘c0t2d0的第0/1分区分别用于逻辑卷log_SFS_SERV/sfs_SFS_SERV)

cd /dev/dsk

ln -s c0t2d0s0 log_SFS_SERV

ln -s c0t2d0s1 sfs_SFS_SERV

cd /dev/rdsk

ln -s c0t2d0s0 log_SFS_SERV

ln -s c0t2d0s1 sfs_SFS_SERV

chown SFS_SERV:cics /dev/dsk/*SFS*

chown SFS_SERV:cics /dev/rdsk/*SFS*

chmod 777 /dev/dsk/*SFS*

chmod 777 /dev/rdsk/*SFS*

[HP]:

建立SFS逻辑卷(可以在cicscp create sfs_server时自动创建)

使用sam创建逻辑卷：假设SFS短名(%S)为SFS_SERV，假设逻辑卷

log_SFS_SERV/sfs_SFS_SERV在卷组VG00。

#注：SFS用户名缺省为SFS_SERV，广义的说，卷名为：sfs_%S和log_%S

chown SFS_SERV:cics /dev/VG00/log_SFS_SERV

chown SFS_SERV:cics /dev/VG00/sfs_SFS_SERV

chown SFS_SERV:cics /dev/VG00/rlog_SFS_SERV

chown SFS_SERV:cics /dev/VG00/rsfs_SFS_SERV

chmod 640 /dev/VG00/log_SFS_SERV

chmod 640 /dev/VG00/log_SFS_SERV

chmod 640 /dev/VG00/rlog_SFS_SERV

chmod 640 /dev/VG00/rsfs_SFS_SERV

4. 设置环境变量并初始化

4.1编辑"/etc/environment"等

使用/etc/profile需要export，RS6K最好使用/etc/environment文件，某些可以加入文件："/var/cics_regions/$CICSREGION/environment"，注意在environment文件中不能用宏($)。某些环境变量(如XA使用的)在AIX系统必须加入environment文件。

PATH中加入"/usr/lpp/cics/bin:/usr/lpp/encina/bin:/usr/lpp/dce/bin:/usr/lpp/encina/etc"，同时检查数据库"bin"路径是否设置

PATH=$PATH:/usr/ibmcxx/bin:/usr/lpp/cics/bin:/usr/lpp/encina/bin:/usr/lpp/dce/bin:/usr/lpp/encina/e tc

PATH=$PATH:/opt/cics/bin:/opt/encina/bin:/opt/dcelocal/bin:/opt/dcelocal/etc//HP PATH=$PATH:/usr/local/bin:/usr/ucb:/opt/cics/bin:/opt/dcelocal/bin:/opt/encina/bin //Solaris LANG=en_US (environment文件)

LANG=en_US.iso88591或zh_CN.hp15CN或C (HP)

LANG=en_US或zh_CN或zh_CN.GB18030或C (Solaris)

CICSPATH=/usr/lpp/cics

CICSPATH=/opt/cics (non AIX)

DCE_USE_WCHAR_NAMES=1

ENCINA_BINDING_FILE=/var/cics_servers/server_bindings

RPC_SUPPORTED_PROTSEQS=ncadg_ip_udp (HP:不能设置此，妨害swinstall命令)(影响各种RPC应用，限制其协议类型)(可设置在region的environment文件中)(TX6.1不可用)

RPC_UNSUPPORTED_NETIFS=if_0:if_1//en0|en1|tr0|fddi0，注意HP DCE使用RPC_SUPPORTED_NETIFS

RPC_UNSUPPORTED_NETADDRS=ipaddress:ipaddress，注意HP DCE使用RPC_SUPPORTED_NETADDRS

(把不在"server_bindings"文件中用到的网卡加入，冒号间隔，可用"netstat -in"观察) CICSREGION=defaul_region_name

CICS_SFS_SERVER=/.:/cics/sfs/$HOSTNAME

ENCINA_SFS_SERVER=/.:/cics/sfs/$HOSTNAME

NLSPATH=/usr/lib/nls/msg/%L/%N:/usr/lib/nls/msg/en_US/%N:/usr/lpp/dce/lib/nls/msg/%L/%N NLSPATH=/opt/cics/msg/%L/%N:/opt/cics/msg/C/%N:/opt/dcelocal/nls/msg/%L/%N:/opt/encina/ms

g/%L/%N:/opt/encina/msg/C/%N //Solaris

NLSPATH=/usr/lib/nls/msg/%L/%N:/usr/lib/nls/msg/C/%N:/opt/cics/msg/%L/%N:/opt/cics/msg/C/

%N:/opt/dcelocal/nls/msg/%L/%N:/opt/encina/msg/%L/%N:/opt/encina/msg/C/%N //HP NLSPATH=C:\IBMDebug\msg\%%L\%%N;C:\IFOR\LS\MSG\%%L\%%N;c:\DCE\dcelocal\nls\ms

g\%%L\%%N;c:\DCE\dcelocal\nls\msg\enus437\%%N;C:\opt\encina\MSG\zh_CN\@N;C:\opt\encina \cborb\msg\%%N;C:\opt\cics\MSG\zh_CN\@N; //Windows

CICS_HOSTS=’$HOSTNAME1 $HOSTNAME2 $HOSTNAME3’

CICS_SFS_VG=rootvg //卷组名

CICS_SFS_VG=VG00 //HP: 卷组名

CICS_SFS_SIZE=128 //cicscp使用，缺省为64，单位:MB

CLASSPATH=.:/usr/lpp/cics/classes/dfjcics.jar:/usr/lpp/cics/lib/somojor.zip:/usr/lpp/cics/lib/somojij.zi p:/usr/lpp/cics/lib/somshcl.zip:/usr/lpp/cics/lib/somshor.zip:/usr/lpp/cics/classes:/var/cics_regions/$CI CSREGION/classes:/home/db2inst1/sqllib/java/db2java.zip (environment)

LIBPATH=/usr/lib:/lib:/usr/lpp/cics/lib:/usr/lpp/ctg/bin:/home/db2inst1/sqllib/lib

LD_LIBRARY_PATH=$LD_LIBRARY_PATH:/opt/cics/lib:/opt/dcelocal/lib:/opt/encina/lib

//Solaris

SHLIB_PATH=$SHLIB_PATH:/opt/cics/lib:/opt/dcelocal/lib:/opt/encina/lib //HP

CICS_JAVA_OPTIONS=-Dfile.encoding=GBK

CICS_XP_RECV_TIMEOUT=300 //对应CICS 4.3 RD/XPRecvTimeout

export PATH LANG CICSPATH ENCINA_BINDING_FILE CICSREGION CICS_SFS_SERVER ENCINA_SFS_SERVER NLSPATH … //non AIX

DB2INSTANCE=db2inst1

注意：cics用户拥有程序的执行权限

4.2编辑-"/etc/services"

加入"sfs_port 8888/udp" (找一未被使用的口(port))

4.3 创建-"/var/cics_servers/server_bindings"

加入"/.:/cics/sfs/$HOSTNAME ncadg_ip_udp:$host_ip[$sfs_port]"

$host_ip可省略，尤其是对多IP的情况下。

例：

/.:/cics/sfs/xantip05 ncadg_ip_udp:[8888]

chmod 777 /var/cics_servers/server_bindings

4.4 其它

ln -s /usr/lpp/cics/msg/en_US/cics.cat /usr/lib/nls/msg/C/cics.cat

5. 安装CICS

5.1 安装DCE及初始化

[AIX]:

"logout" 并以root 用户"login"，使环境变量生效。安装dce及fix(对DCE2.1 for AIX: 找到cics_prereq.tar, 用 "tar -xvf cics_prereq.tar"将其解开"smit install"

安装其中的所有软件)。

lsdce

rmdce all

rmdce -F -o local all

重启动机器，至少”refresh -s inetd”

去掉DCE CDS和security server配置：

unconfig.dce -config_type local -depend cds_srv cds_second

unconfig.dce -config_type local -depend cds_cl

unconfig.dce -config_type local -depend sec_srv sec_rep

unconfig.dce -config_type local -depend sec_cl

[Solaris]:

安装DCE及相关补丁(不装DCE SERVER)

cd /cdrom/cdrom0

./dcesetup install

#或：./dcesetup install -component client appdev -dir /cdrom/dce3.2

/etc/init.d/dce stop

/opt/dce/etc/dcesetup unconfig -force

[HP]:

安装HP Application CD上的DCE及相关补丁(不装DCE SERVER)，见HP_PATCH_LIST.txt

/opt/dce/bin/dce_config //选择remove

5.2 安装Encina/CICS

[AIX]:

"smitty install"

"Install and Update Software"

"Install and Update from LATEST Available Software"

选择相应的设备

SOFTWARE to install (用F4选择安装介质)

用F7选择下面的软件:

cics.base, cics.client, cics.server, cics.msg.locale, encina.client, encina.server, encina.PPCexec, encina.SFS, encina.msg.locale

注意：1、首先安装GSK(v5.x)；2、ACCEPT new license agreements [Solaris]:

txproductlicense.sh -accept

使用admintool或：

# pkgadd -d /cdrom/TXSeries-CICS

# pkgadd -d /cdrom/TXSeries-Encina

txproductlicense.sh -accept

mount cdrom (见附录)

使用”swinstall”，分别安装/cdrom/Encina.depot和/cdrom/CICS.depot。[ALL]:

?执行”umask 022”"cicsdefaultservers" (产生各种模板，创建sfs定义文件)(在删除cics_servers目录中的内容后，用cicsdefaultservers建立的新目录的属主为root而不是cics，可使用“chown –R cics:cics *”和“chmod –R 777 *”指令修复，或“su - cics”再执行cicsdefaultservers。)

?执行"cicssetupclients -m -v" (设置CICS Client环境，被cicsterm组成员使用) 对AIX：ln -s /usr/lpp/cics/etc/3270keys /etc/3270.keys

对非AIX：ln -s /opt/cics/etc/3270keys /etc/3270.keys

5.3 安装Encina/CICS的补丁

先安装Encina补丁，再安装CICS补丁。在R6K上注意使用slibclean。

6. 配置生成DCE/SFS/CICS REGION

6.1配置DCE：

[ALL]:

cicscp -v create dce -R

cicscp -v start dce

[AIX]:

"mkdce -o local -n $HOSTNAME rpc" (建立一个DCE Client)

(“cicscp -v create dce -R”)

注意：DCE用135口(port),所以当发现135被其它应用(如AIX C Network License Servide)占用时，必需停止它。

"stopsrc -s netlsd"

"stopsrc -s glbd"

"stopsrc -s llbd"

“stopsrc -s rpc.lockd”

修改/etc/inittab文件：去掉“i4ls”行。注意：启动i4ls的指令为：

/var/ifor/i4cfg -start –nopause

6.2生成SFS文件系统：

"smitty cics", "Manage Filesystem", "Manage Encina SFS Servers",

"Define Encina SFS Servers", "Create"

?Model SFS Server Identifier ""

?SFS Server Identifier "/.:/cics/sfs/$HOSTNAME"

?Are you using DCE servers "NO"

?Name Service for advertising server "NONE"

注意：如果采用了不同于SFS_SERV的SFS短名，须在ShortName项填入此名称。

或使用以下命令：serverId(节点名)为主机名，shortName为SFS_SERV，sfsUsr同shortName，其它属性参见SSD。

[ALL]:

cicssfscreate -S /.:/cics/sfs/serverId ShortName=shortName [UserID= sfsUsr]

或(在HACMP备机)：cicssrccreate -s shortName -n /.:/cics/sfs/serverId -u sfsUsr

Cold start：

生成SFS可执行冷启动，以后就用Auto start

cicssfscold /.:/cics/sfs/$HOSTNAME //或用SMIT //AIX

cicssfs /.:/cics/sfs/$HOSTNAME StartType=cold //nonAIX

系统将查找并建立archive目录。

可查看"/var/cics_servers/SSD/cics/sfs/$HOSTNAME/msg"启动情况。

如在定义SFS 时，系统报告该SFS 已存在时，并用"smitty cics"及”cicscp destroy sfs_server /.:/cics/sfs/serverId -f”无法删除时可用：”cicssrcdestroy -s SFS_SERV”。

注意修改server_bindings文件，/var/cics_servers/SSD/SSD.stanza文件，以及删除

/var/cics_servers/SSD/cics/sfs下相应之与SFS节点同名的目录。

注意：要在执行cicscp删除之后，如在cicslssrc中还看到子系统，再用cicssrcdestroy命令删除。

6.3生成CICS REGION：

[AIX]:

"smitty cics" "Manage CICS Regions" "Create (Import) a CICS Region"

Name of Region to be created "CICS01"

Force use or no-use of DCE servers? "do not use DCE servers"

(如在定义REGION时，系统报告该REGION已存在，用"smitty cics"删除之，不行可用："cicssrcdestroy -r CICS01"，再不行就到/var/cics_regions中删除"CICS01"目录。)

[ALL]:

cicsdefault -r CICS01 -S

或(在HACMP备机)：cicssrccreate -r CICS01

配置CICS资源到SFS：

cicsupdate -c rd -r CICS01 DefaultFileServer=/.:/cics/sfs/$HOSTNAME

cicssfsconf -I -R wc CICS01 DefaultFileServer=/.:/cics/sfs/$HOSTNAME

(或者选择："smitty cics" "Manage CICS Regions"“configure CICS resource on a file server”"Configure CICS Resources on an Encina SFS Server""Configure an Encina SFS Server")

7. 配置XA(注意：AIX:相关的环境变量必须加入environment文

件)

7.1生成1 Phase DB2 XA：

1). 配置环境变量使得root和cics用户可以存取DB2：

"vi /etc/profile", 加入". /home/db2inst1/sqllib/db2profile"

"vi /var/cics_regions/$CICSREGION/environment"，加入

"DB2INSTANCE=db2inst1"

2). 编译Switch Load File，进入Switch Load File编译程序所在的目录，执行make –f db21pc.mk //UNIX

nmake –f db21pc.mk //WIN

将产生的Switch Load File拷贝到region的bin目录

3). 加入XAD

cicsadd -c xad -r CICS01 Db2Xa SwitchLoadFile="db21pc" XAOpen=“sample,db2inst1,db2inst1"

XAOpen="cicstest,db2inst1,db2inst1"

7.2生成2 Phase DB2 XA：

7.2.1 配置环境变量使得root和cics用户可以存取DB2：

"vi /etc/profile", 加入". /home/db2inst1/sqllib/db2profile"

"vi /var/cics_regions/$CICSREGION/environment"，加入"DB2INSTANCE=db2inst1"

7.2.2 编译Switch Load File，进入Switch Load File编译程序所在的目录，执行

7.2.2A 1 phase

make -f db21pc.mk //UNIX

nmake -f db21pc.mk //WIN

将产生的Switch Load File拷贝到region的bin目录

#注：如果使用了超过8个字符的用户名或数据库名，应该修改“db21pc.sqc”源文件。修改user定义和sscanf代码。

7.2.2B 2 phase

make -f db2xa.mk //UNIX

nmake -f db2xa.mk //WIN

将产生的Switch Load File拷贝到region的bin目录

7.2.3 定义XAD

7.2.3A 1 phase xad

cicsadd -c xad -r CICSNT01 DB21PC SwitchLoadFile="db21pc.dll"

XAOpen="sample,ad,password" //WIN

cicsadd -c xad -r CICS01 Db21PC SwitchLoadFile="db21pc"

XAOpen="sample,db2inst1,db2inst1" //UNIX

7.2.3B 2 phase xad

1) 方法一: CICS + DB2 v7/8:

cicsadd -c xad -r CICSNT01 DB2XA SwitchLoadFile="db2xa.dll"

XAOpen="tpm=cics,db=sample,uid=ad,pwd=password,toc=p "

2) 方法二: CICS + DB2 v7/8:

db2 update dbm cfg using TP_MON_NAME libEncServer.dll

cicsadd -c xad -r CICSNT01 DB2XA SwitchLoadFile="db2xa.dll"

XAOpen="db=sample,uid=ad,pwd=password,toc=p "

7.3配置1/2 Phase XA与informix数据库的连接：

7.3.0 数据库的日志方式必须要设成unbuffered log，不可用其它方式或者关闭，否则CICS启动失败

"ontape -U database"

7.3.1 配置环境使得root和cics用户可以存取Informix

7.3.1.1 vi /etc/profile, 加入"PATH=$PATH:/informix/informix/bin"

7.3.1.2 vi /var/cics_regions/$CICSREGION/environment 加入

INFORMIXDIR=/home/informix //安装路径，其下之etc目录有sqlhosts文件INFORMIXSERVER=host1 //Informix服务器名，用于通信，相当于在XAOpen的库名称后添加“@”。

ONCONFIG=onconfig.host1

中文环境需要很多环境变量(诸如DBLANG, CLIENT_LOCALE, DB_LOCALE)。#注：环境变量“INFORMIXSERVER”的作用相当于在XAD/OpenString后加上“@<连接串>”。

7.3.1.3 如果跨机器，要做系统用户信任，对Windows的访问，使用SYSTEM用户。

7.3.1.4 授权

grant resource to cics;

(或：grant dba to cics;)

7.3.2 生成Switch Load File

7.3.2.1 进入Switch Load File编译程序所在的目录

7.3.2.2 修改make文件中相应的环境变量

例："INFORMIXDIR=/informix/informix"

7.3.2.3 编译生成Switch Load File

make -f informix1pc.mk

make -f informix_xa.mk

把生成的Switch Load File复制到region的bin目录下。

7.3.3 定义XA

cicsadd -c xad -r CICS01 InformXa SwitchLoadFile="informxa" XAOpen="dbname" //UNIX

7.4配置2 Phase XA与Sybase数据库的连接：

"isql -Usa -Ppwd", "grant all on spt_committab to probe", "go"

生成连接程序(Switch Load File)

"cd /usr/lpp/cics/src/examples/xa/"

修改sybasexa.mk文件中相应的Sybase 环境变量

"make -f sybasexa.mk" 生成sybasexa

"mv sybasexa /var/cics_regions/$CICSREGION/bin/"

配置XA

"smitty cics" "Manage CICS Regions" "Define CICS Resources"

"XA Configure" "New"

Identifier: "sample"

Switch Load File Path Name "sybasexa"

Resource Manager Initialization String: "-Nconn_1 -U user -P pw

-L/tmp/sybasexa.log"

配置环境变量使得root和cics用户可以存取Sybase

"cd $SYBASE/scripts" "vi xa_load" ". /xa_load"

"vi /home/sybase/xa_config" 加入

"[xa]

lrm=conn_1

server=SYBASE"

7.5配置1 Phase XA与Sybase数据库的连接：

7.5.1 配置环境

7.5.1.1 修改环境变量

在"/var/cics_regions/$CICSREGION/environment"加入(使用su - sybase观察) DSQUERY=SYBASE //Sybase Server名

SYBASE=/home/Sybase //Sybase home路径

7.5.1.2 将sybase用户加入cics组中

7.5.1.3 Sybase解库:

su - sybase

cd lib

ar -x libcomn_dce.so.a

ar -x libcs_r.so.a

ar -x libct_r.so.a

ar -x libintl_r.so.a

7.5.2 生成Switch Load File

"cd syb1pc"

"cpre -V CS_VERSION_120 sybase1pc.cpre"

"vi sybase1pc.c"加入网络包配置(参照packetsize)

"make" 生成 sybase1pc

7.6 配置XA与Oracle数据库的连接：

7.6.1 设置环境：

7.6.1.1 设置环境变量：

观察oracle用户的环境变量(su - oracle)，注意设置环境变量到environment文件：

ORACLE_SID=ORCL

ORACLE_HOME=/home/oracle/product/9.2.0.2

NLS_DATE_FORMAT='yyyy-mm-dd hh24:mi:ss'

NLS_LANG=AMERICAN_AMERICA.ZHS16GBK

LIBPATH=...

注：如果在Windows上没有发现上述的环境变量，可以在注册表的

HKEY_LOCAL_MACHINE/SOFTWARE/ORACLE中查找，并设置到操作系统。CICS必须的环境变量是ORACLE_SID和ORACLE_HOME。

7.6.1.2 设置符号链接

ln $ORACLE_HOME/lib/libclntsh.a /usr/lib/libclntsh.a

7.6.1.3 数据库设置：

如果用XA(2PC)，对Oracle v8：

sqlplus sys

GRANT SELECT ON DBA_PENDING_TRANSACTIONS TO scott; //scott是cics要使用的用户7.6.2 编译Oracle XA Switch Load File

7.6.2.1 编译静态的Oracle 1 Phase XA文件

make -f oracle1pc.mk

7.6.2.2 编译静态的Oracle 2 Phase XA文件

make -f oraclexa_sta.mk oracle

7.6.3 定义XAD

cicsadd -c xad -r CICS01 OraXA SwitchLoadFile="oracle1pc" XAOpen="OraXA+Acc=P/scott/tiger" 或：

cicsadd -c xad -r CICS01 OraXA SwitchLoadFile="oracle1pc"

XAOpen="OraXA+Acc=P/scott@connstr/tiger"

或：

cicsadd -c xad -r CICSNT01 OraXA SwitchLoadFile="oracle1pc.dll"

XAOpen="OraXA+Acc=P/system/manager"

# 2 Phase XAOpen例：

Oracle_XA+Acc=P/scott/tiger+SesTm=35+LogDir=/tmp+DbgFl=1

OraXA+Acc=P/system/password+SesTm=95+LogDir=c:\temp+DbgFl=1+MaxCur=100+SqlNet=con nstr

8. CICS Region的其它配置

8.1 定义Listener：

*命令行方式：

cicsdelete -c ld -r CICS01 LI1

cicsadd -c ld -r CICS01 LI1 Protocol=TCP TCPAddress="88.2.11.101" TCPService="cics1435"

注意多域必须采用不同的Listener，且要使用不同的TCP服务名(在/etc/services文件设

置对应的端口号：cics14351435/tcp)

8.2 定义User

*命令行方式：

cicsdelete -c ud -r CICS01 TEST

cicsadd -c ud -r CICS01 TEST CICSPassword=TEST

8.3 定义Program

*命令行方式：

cicsdelete -c pd -r CICS01 TELECOM

cicsadd -c pd -r CICS01 TELECOM PathName=… RSLKey=public

9. CICS日常维护

9.1 启动CICS

启动DCE:

cicscp -v start dce

或: rc.dce

或: /sbin/init.d/Rpcd start

启动SFS:

cicscp –v start sfs_server /.:/cics/sfs/serverId

或: cicscp –v start sfs_server serverId

或: cicssfslock -u /.:/cics/sfs/serverId; cicssfs /.:/cics/sfs/serverId

或: cicssfs serverId

或: cicscp –v start sfs_server /.:/cics/sfs/serverId StartType=cold

或: cicssfscold /.:/cics/sfs/serverId//AIX: 比cicscp更快

或: 用SMIT;

启动Region:

cicscp -v start region $CICSREGION StartType=cold

或: startsrc -s cics.$CICSREGION -a StartType=cold

或: cicsrlck –r $CICSREGION; cicsstart –c $CICSREGION //nonAIX 或: 用SMIT

9.2 终止CICS

停止Region:

cicscp -v stop region $CICSREGION –f

或: cicsstop –k $CICSREGION)

或: stopsrc -s cics.$CICSREGION

或: stopsrc -fs cics.$CICSREGION

释放Region资源:

cicsnotify -s cics.$CICSREGION

停止SFS:

cicscp -v stop sfs_server serverId

或: cicscp -v stop sfs_server serverId -f

或: cicssfsshut /.:/cics/sfs/sfsServerName

停止DCE:

cicscp -v stop dce

或: dce.clean

或: /sbin/init.d/Rpcd stop

9.3 观察CICS状态

cicstail -r $CICSREGION

cicslssrc –a | grep cics

10. Corba/JAVA

10.1 CICS安装

●安装：CICS server v4.3 for AIX

●注意安装：encina: gskrf301组件(SSL support)

●对非北美但使用LANG=en_US者：

ar -t libgskwsee.a (含有：gskwseeex_shr.o)

ar –x libgskwsee.a (解出：gskwseeex_shr.o)

mv gskwseeex_shr.o gskwseeus_shr.o

ar –q libgskwsee.a gskwseeus_shr.o

10.2 修改CICS资源

●注意CLASSPATH设置(profile或environment文件设置)

●CICS IIOP listener definition:(v4.3允许直接写端口号)

cicsadd -c ld -r CICS01 -P CICSIIOP Protocol=IIOP TCPService="1050"

TCPAddress="9.185.60.161"

●启动region，拷贝IOR文件到client程序目录：

cp /var/cics_regions/CICS01/*.ior .

10.3编译程序

●编写IDL文件(Test.idl)，分服务器和客户机两目录。

●服务器：初步编译IDL：idlc(生成Test目录/JAVA包)

●服务器：编写实现：Test/_DoImpl.java

●服务器：完整编译IDL (make clean；make；make install)

●客户机：完整编译IDL (make clean；make) (生成Test目录/JAVA包) ●客户机：编写/编译客户程序：javac TestClient.java

●客户机：拷贝IOR文件，执行之：java TestClient

11. Client安装

11.1 以root用户登入安装

●uncompress /tmp/cics-302.tar.Z

●tar xvf /tmp/cics-302.tar

ksh mkcicscli

ksh mkclimsgs us

11.2修改CICSCLI.INI

"cd /usr/lpp/cicscli/bin","vi CICSCLI.INI" 加入以下内容：

Server = CICS01(建议与REGION名相同)

Description = TCP/IP Server

Protocol = TCPIP

NetName = IP地址

Port = 1435

注意：修改CICSCLI.INI文件后应重启动CICS Client。

11.3 运行

终止：cicscli –x=SYSTEMNAME或cicscli –i

运行：cicscli –s=SYSTEMNAME(应在ksh中)

或：或编辑/etc/rc.d/0/sysinit文件加入

ksh -c "cicscli /S= SYSTEMNAME "

查看状态：cicscli -l

拆除设置：mkcicscli -u

附录：

1. HP-UX: /etc/profile片段

#for CICS:

export LANG=C.iso88591

export PATH=$PATH:/opt/cics/bin:/opt/encina/bin:/opt/dcelocal/bin:/opt/dcelocal/etc export SHLIB_PATH=$SHLIB_PATH:/opt/cics/lib:/opt/encina/lib:/opt/dcelocal/lib export

NLSPATH=$NLSPATH:/opt/cics/msg/%L/%N:/opt/cics/msg/C/%N:/opt/dcelocal/nls/msg/%L/%N:/o pt/dcelocal/nls/msg/en_US.ASCII/%N:/opt/encina/msg/%L/%N:/opt/encina/msg/C/%N

export ENCINA_BINDING_FILE=/var/cics_servers/server_bindings

export CICS_SFS_VG=vg00

export ENCINA_SFS_SERVER=/.:/cics/sfs/sdun2

export CICS_SFS_SERVER=/.:/cics/sfs/sdun2

export CICSREGION=telecom

export CICSPATH=/opt/cics

#export RPC_SUPPORTED_PROTSEQS=ncadg_ip_udp

export CICS_HOSTS='sdun2 sdun1'

#for Oracle:

ORACLE_HOME=/oracle/app/oracle/product/8.1.5;export ORACLE_HOME

ORA_NLS33=$ORACLE_HOME/ocommon/nls/admin/data;export ORA_NLS33

TMPDIR=/oracle/tmp;export TMPDIR

TMP=/oracle/tmp;export TMP

PATH=$PATH:$ORACLE_HOME/bin:/oracle/app/oracle/product/8.1.5/network/public:.

LD_LIBRARY_PATH=$LD_LIBRARY_PATH:$ORACLE_HOME/lib;export

LD_LIBRARY_PATH

SHLIB_PATH=$SHLIB_PATH:$ORACLE_HOME/lib:$ORACLE_HOME/lib64;export

SHLIB_PATH

DBCA_RAW_CONFIG=/oracle/dbca.config;export DBCA_RAW_CONFIG

ORACLE_SID=yy2;export ORACLE_SID

NLS_LANG=american_america.zhs16cgb231280;export NLS_LANG

ORACLE_SERVER=yy;export ORACLE_SERVER

2. 其它环境变量：

CICSECIMAXLUW=80

3. 编译器

vc: mspdb60.dll

4. HP-CDROM

/usr/sbin/pfs_mountd &

/usr/sbin/pfsd &

/usr/sbin/pfs_mount -v -t rrip /dev/dsk/c0t2d0 /cdrom

查找disk信息：

ioscan -kfnC disk | more

用完后务必卸载：

/usr/sbin/pfs_mount /cdrom

5. DB2

db2 import from auto10a_list.ixf of ixf [modified by forcein] create into auto10a_list