第9章-应用CTG实现J2EE应用与CICS互连的案例分析.pptVIP

VSAM数据集TJD0211.CTG.ACCOUNT的定义及数据导入(2) VSAM数据集TJD0211.CTG.USERINFO的定义及数据导入(1) VSAM数据集TJD0211.CTG.USERINFO的定义及数据导入(2) 29.在DITTO中查看VSAM数据集TJD0211.CTG.ACCOUNT的内容。用TJD0211登录z/OS后，在ISPF主菜单输入M.7，然后选择：1. Browse data–〉3. VSAM data，如下图9-25所示： 30.在Data set name处输入要查看的VSAM数据集的名称，CI access用缺省的NO，如下图9-26所示： 图9-25 查看VSAM数据集的内容(1) 图9-26 查看VSAM数据集的内容(2) 31.按回车，可以看到VSAM数据集TJD0211.CTG.ACCOUNT的内容如下图9-27所示： 32.查看VSAM数据集TJD0211.CTG.USERINFO内容的方法和前面TJD0211.CTG.ACCOUNT的相同，故略。 自此，主程序中要用到的两个VSAM数据集都建立起来并导入了数据。 图9-27 查看VSAM数据集的内容(3) 33.在CICS服务端定义VSAM FILE ACT211。 在CICS Region里输入如下命令： CEDA DEF FILE(ACT211) G(TJD0211) 定义好以后，需要修改VSAM FILE ACT211的部分属性，如下所示，其中粗体的表示必填项。 34.在CICS Region里安装VSAM FILE ACT211。 在CICS Region里输入如下命令： CEDA INS FILE(ACT211) G(TJD0211) 35.在CICS Region里运行如下命令将ACT211打开： CEMT I FILE(ACT211) 结果如下： 将Clo替换成Ope，回车，将VSAM数据集ACT211打开。 36.在CICS服务端定义VSAM FILE USR211。 在CICS Region里输入如下命令： CEDA DEF FILE(USR211) G(TJD0211) 定义好以后，需要修改VSAM FILE USR211的部分属性，如下所示，其中粗体的表示必填项。 37.在CICS Region里安装VSAM FILE USR211。 在CICS Region里输入如下命令： CEDA INS FILE(USR211) G(TJD0211) 38.在CICS Region里运行如下命令将USR211打开： CEMT I FILE(USR211) 结果如下： 将Clo替换成Ope，回车，将VSAM FILE USR211打开。 39.上述两个VSAM FILE定义好之后，还需要做一件重要的工作。因为CICS 没有访问上述两个VSAM数据集的权限，也即CICS 内部用户START2对TJD0211.CTG.ACCOUNT 和TJD0211.CTG.USERINFO只有NONE权限而没有UPDATE权限，需要对上述两个VSAM数据集（此处用Generic数据集的形式如：TJD0211.**）赋予权限。 授权方法如下： 用管理员P390用户登录z/OS，在ISPF主菜单输入6，进入ISPF Command Shell界面，提交如下语句进行上述授权： 授权以后，在ISPF Command Shell界面输入：LD DA(TJD0211.**) ALL 查看授权的情况。 自此，CICS Region里的两个VSAM FILE建立、安装好并授予了权限。 40.下一步需要在主机端编写C程序TJD0211.CICS.SOURCE(VSAM211)。该程序由C+CICS+VSAM组成，实现了查询账户余额、向账户中存款、到账户中取款三大功能，由主函数、查询余额函数、存款函数和取款函数四个函数组成。 TJD0211.CICS.SOURCE(VSAM211)的代码如右所示(1)： TJD0211.CICS.SOURCE(VSAM211)的代码如右所示(2)： TJD0211.CICS.SOURCE(VSAM211)的代码如右所示(3)： TJD0211.CICS.SOURCE(VSAM211)的代码如右所示(4)： TJD0211.CICS.SOURCE(VSAM211)的代码如右所示(5)： TJD0211.CICS.SOURCE(VSAM211)的代码如右所示(6)： TJD0211.CICS.SOURCE(VSAM211)的代码如右所示(7)： TJD0211.CICS.SOURCE(VSAM211)的代码如右所示(8)： 注意： （1）