在JCL里面
一个作业步里
STEP1 EXEC PGM=programname , PARM=‘JCL name’
.............
在COBOL程序里面
数据部
LINKAGE SECTION.
01 JCL-NAME.
05 LEN PIC 9(4) COMP.
05 NAME PIC X(8).
PROCEDURE DIVISION (注意这里不要句点)
USING JCL-NAME.
......................
然后在变量NAME里面就是JCLname 了,至于怎么使用它,那就是你的事了
在执行该程序的JCL 中指定一个parm 将JCL name 送到这个parm 中即可。
1. JCL传递到parm里面,COBOL里面取得。
2.用accept方法