cobol中如何取得job中的jcl name

通过cobol取得执行该程序的jcl中的jcl name

在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 了，至于怎么使用它，那就是你的事了

1. JCL传递到parm里面,COBOL里面取得。 2.用accept方法

exec=main001m，parm=**** 上面是在jcl中定义的parm参数，在程序main001m中使用linkage section 01 parm. 03 ********. procedure division using parm. 过程部要using一下。然后在程序中直接使用就可以了