CICS实验jspcobolzos.docx

CICS实验jspcobolzos.docx

《CICS实验jspcobolzos.docx》由会员分享，可在线阅读，更多相关《CICS实验jspcobolzos.docx（10页珍藏版）》请在冰豆网上搜索。

CICS实验jspcobolzos

CICS实验,jspcobolzos

————————————————————————————————作者：

————————————————————————————————日期：

CICS实验1（HelloWorld）

1.实验目的：

通过该实验掌握CICS源程序（COBOL）编译链接过程，掌握在CICS环境下定义、安装PROGRAM和TRANSACTION的过程。

2.实验内容：

CICS源程序编写，CICS环境下定义、安装PROGRAM和TRANSACTION，通过TRANID实现和调试交易。

3.实验步骤：

（1）在TSO环境下新建分区数据集STXXX.CICS.SOURCE，将CICS的源程序放在分区数据集中。

同理创建分区数据集STXXX.CICS.JCL和STXXX.CICS.LOAD分别用于存放JCL作业和CICS编译运行生成的加载库。

（2）在该分区数据集中新建一个member，命名为lab1，在内部编写代码如下：

（3）在STXXX.CICS.JCL数据集中新建一个member，命名为CMPCICS，在内部编写代码如下：

注意：

程序名必须写成NAMEST***01（以后其它的CICS程序依次命名为02、03、04等）

（4）编译程序，SUB提交

（5）再另打开一个3270终端，在登陆命令行敲入LCICS，回车

（6）进入CICS界面

（7）按PAUSE键清屏

（8）在指针处敲入CEDA命令，进行CICS资源定义，首先安装PROGRAM。

输入cedadefprog（ST***01）group（ST***GP），然后按ctrl，确认

好了程序定义成功。

（9）下一步安装TRANSACTION（交易）。

按F3退出上次定义和按PAUSE清屏。

键入cedadeftran（XXX1）group（ST***GP）prog（ST***01）

回车再回车

这样交易LGY1定义成功

（10）安装交易和程序。

按F3退出上次定义和按PAUSE清屏。

键入Cedadisgroup（st***gp）

回车

回车

这样交易和程序安装成功

（11）运行交易。

按F3退出上次定义和按PAUSE清屏，输入交易号XXX1

回车

（12）删除安装资源

（13）退出CICS