大型主机（z/OS系统）编译运行第一个COBOL语言hello world(解决编译时返回码为12问题)

1、创建一个分区数据集**.COBOL.SOURCE存放COBOL源程序，创建时的参数如下所示：

注意事项：Record format=FB  Record length=80 Data set name type=PDS

2、然后在创建的SOURCE数据集中新建一个member存放COBOL的源代码：

注意事项：COBOL代码的每一行都从第8列开始写，每一行结尾和每个标识符都以英文

句号结束。

3、创建一个分区数据集**.COBOL.LOAD存放编译生成的可执行模块（Load Model），参数如下：

注意事项：Record format=U, Data set name type=LIBRARY,如果Data set name type= PDS，那么在编译时会发生错误，返回码为12……

4、创建一个分区数据集**.COBOL.COMPLINK存放编译和执行的jcl代码,参数如下：

 然后在这个数据集中创建一个名字为complie的成员，在这个成员中

写如下的jcl语句：

然后保存完了之后，在命令行上输入sub提交 ，会返回(maxcc=0000)，标识

执行正确。此时会在.LOAD数据集中生成一个名字为hello的成员，为我们的COBOL

源代码编译生成的可执行模块。打开后会发现时这样的，根本看不懂，不过没关系，

只要返回0000就证明执行没有问题。

然后在我们的.COMPLIK数据集中新建一个名字是run的成员，存放执行我们的程序的jcl语句：

 

 完事之后提交（sub）,返回maxcc=0000，证明执行成功。

最后，返回这个界面

 

输入sd.st,查看作业状态，找到我们最后提交的这个作业。在前面打上一个？,，会

进入这个界面：

 

 

再在sysout前面打上一个s，即可查看到我们要输出的hello World!