文档库 最新最全的文档下载
当前位置:文档库 › COBOL编程环境攻略

COBOL编程环境攻略

COBOL编程环境攻略

1、连接主机

客户机采用普通PC机,通过3270仿真程序:PERSONAL COMMUNICATON(简称PCOM)软件,以仿真终端的方式直接访问主机。

配置:点击新建会话再进入链路参数,输入IP地址:219.***.***.**,即可以进入zos 界面。

2、登录

如图输入命令LOGON 以及账号,回车确认。

输入登录密码,第一次登录别忘记必须修改密码。

成功登录的欢迎画面,需要回车确认。

3、创建数据集

在菜单界面(如下)的Option处输入3.2(也可以依次输入3、2并回车)。

接下来会进入数据集工具(如下),要求输入数据集名称和所在卷标,然后回车。

上述操作表明:数据名为自己账号.TEMP, 存放在USER01盘卷上。

根据数据集的命名规则,用户名会作为数据集名的第一节自动加到输入的数据集名前。该窗口用于定义数据集的基本属性,如所在的磁盘卷,分配单位,组织形式,记录格式等。

Command==>回车随即建好数据集。

4、查找数据集

创建好自己的数据集后,你可能很想看到它,那么连续F3 即可回到主菜单,再在otpion中输入3.4。输入要查看的数据集名字或部分名字,将会列出符合条件的所有数据集,每个账户只有权查看以自己账号开头的数据集。

回车

6、创建COBOL源代码成员

进入你自己的数据集后,在下面的command行敲入“s”+你的源程序的成员名(比如myprog),如图1-15 就可以在数据集里增加一个叫myprog的新成员,该成员将用于编辑自己的cobol源程序(每个源程序对应一个成员)。

回车后你将进入如图1-16的屏幕,就可以输入成员的内容,这里你要输入cobol代码。在左边“00000*”的序号中输入i命令后回车可增加代码行数。在任何屏幕中,如果有多屏内容需要翻屏,可以按F7 上翻,F8 下翻。

编辑完源代码后在command行键入“save”即可保存源程序,也可以直接按F3,在退出编辑画面时会自动保存。

7、编译、运行cobol 程序。

源程序编辑好后,在用compiler(JCL)成员编译并运行该源程序之前你要修改一下compiler(JCL)成员。进入编辑屏幕的方法是在compiler(JCL)成员前输入“e”并

回车。

首先要修改的是上图第一行的红框处,一定要改成你的用户名。其次你要修改后面的数据集及成员名,下图红色方框处,改成你的数据集,圆括号中改成你要编译的源程序的成员名(比如myprog)。

保存并提交修改了compiler,即可启动编译、运行cobol程序,只要在command行敲入“sub”即可。

8、查看程序编译运行的结果。

连续按F3 回到主菜单,在option里输入“m;5;st”。

回车即可进入你的作业消息查看画面,如图1-22,假如最后一行画红线的作业消息就是你刚才提交compile后的作业消息,那么在前面输入“S”(表示Seclect,请一定与NP 列对齐, 如果只想显示该作业信息里的COBOL相关信息,那么可在前面加“?”,而不用“S”)。也可以在命令行键入形如pre stu300*的命令筛查stu300打头的作业名的作业。

回车

很多信息是compile的信息,你可以不关注,直接F7往下翻,到了上图位置。你看到红色方框处RC列下面的三个值如果全为0,则表示你的程序已经编译、连接并运行成功,没有错误,否则只要有一个值不为0,那么就表示在编译、连接或者运行时有警告或者错误,你按F7 在后面将可以查找到原因说明。

如果程序编译并运行成功,你按F7翻到尾部,将看到程序的输出信息,如下图显示的程

序输出是“I did it”。

①首先编写的还是最简单的hello world程序,(注:con01是账号名,可对应修改为

自己的账号)

CON01.COBOL.SOURCE(HELLOCOB):

IDENTIFICATION DIVISION.

PROGRAM-ID. SAMPLE1.

AUTHOR LQH.

DATE-WRITTEN 7-20.

ENVIRONMENT DIVISION.

DATA DIVISION.

PROCEDURE DIVISION.

DISPLAY "HELLO WORLD".

STOP RUN.

②然后编写一个编译链接执行的JCL程序,可通用提交cobol源程序,只需修改相应的参数即可。

CON01.COBOL.SOURCE(COMPILE):

//CON01 JOB ACCT#,CON01,MSGLEVEL=(1,1),NOTIFY=CON01

//STEP1 EXEC PROC=IGYWCLG

//COBOL.SYSIN DD DSN=CON01.COBOL.SOURCE(HELLOCOB),DISP=SHR

//LKED.SYSLMOD DD DSNAME=CON01.TEST.LOAD(HELLOCOB)

相应的参数:

“COBOL.SYSIN DD DSN=”用来指定待编译的源文件;

“LKED.SYSLMOD DD DSNAME=”用来指定存放可执行文件的PDS。

③提交(sub)成功,就可以在CON01.TEST.LOAD执行(call)HELLOCOB,就可以

看到输出结果:

④若相关的参数为:

https://www.wendangku.net/doc/824348070.html,B 存放我们的cobol源代码以及运行COBOL程序所需的JCL

STXXX.COBOL.LOADLIB 用于存放编译链接后的可执行代码(相当于pc机上的EXE 文件)

则在STXXX.COBOL.LOADLIB执行(call)。

-----------------------本文收集于网络资料,仅作学习参考之用---------------------------

相关文档