首先介绍一下如何创建数据集。
1. 在ISPF面板的“Option"命令行上输入"3.2"。
2.在"Data Set Utility”面板的"Option”命令行上输入"A”， 并照下图填写，创建一个数据集：BENSON1.COBOL.LIB(其中BENSON1为自己的USERID)。
3.按下图填写各项属性，按下回车后右上角出现"Data set allocated"。
4. 按"F3"退回到上一菜单，命令行输入"3.4"。
5.在"Dsname Level"上输入你的USERID。
6.你的DATA SET已经建立好了。
7. 因为建立的是一个分区文件，所以我们需要在里面创建MEMBER，类似WIN里面先建立一个文件夹，然后在建立一个记事本文件
命令行输入"START 2” 另开一个分屏。照下图填写。
8. 成功创建MEMBER：HELLO，以后的程序都在这里写了。
我们已经建立好了data set和member后便可输入程序了。
9.因为COBOL程序的写法是有区域的，在"Command ===>"下的列号区输入"COLS"，按回车，使出现列号
10.列号区输入"I6"，意思是插入6行，当然，I或I1就是插入一行。
11.输入下列源代码:
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.
ENVIRONMENT DIVISION.
DATA DIVISION.
PROCEDURE DIVISION.
DISPLAY 'HELLO WORLD!!!'.
STOP RUN.
12. 因为要生成module，所以需要用上述方法（步骤1~3）建立一个Record format为U的DATA SET:BENSON1.LOAD.LIB存放，步骤如下列图所示：
13.再用上述方法建立一个Record format为FB的DATA SET--"BENSON.JCL.LIB"
14.在"ENSON.JCL.LIB”创建一个名为"HELLO”的member，并输入以下源代码（注意将BENSON1替换成你自己的USERID）。在Command ===> 中输入"SUB"提交。
//BENSON1A JOB CLASS=A,MSGCLASS=H,MSGLEVEL=(1,1),
// NOTIFY=&SYSUID
//STEP010 EXEC PROC=IGYWCL
//COBOL.SYSIN DD DSN=BENSON1.COBOL.LIB(HELLO),DISP=SHR
//LKED.SYSLMOD DD DSN=BENSON1.LOAD.LIB(HELLO),DISP=SHR
//STEP020 EXEC PGM=HELLO
//STEPLIB DD DSN=BENSON1.LOAD.LIB(HELLO),DISP=SHR
//SYSOUT DD SYSOUT=*
//
返回MAXCC=0，成功！
15.用TSO SDSF H去查看LOG
16.在JOBNAME前打上一个"?"
17.在SYSOUT前打"S"查看log
18.可以看到结果了！
