从JCL向PROGRAM传递参数

2019-04-15 15:19发布

从JCL向程序传递参数有两种方式 1. 通过EXEC语句 //STEP1 EXEC PGM=ABC,PARM=('F1') 针对这种方式,程序ABC需要于COBOL的LINKAGE SECTION做如下定义 01 LINK-AREA       05 LINK-LEN        PIC S9(04)       BINARY       05 LINK-FCN        PIC  X(02)

2.通过SYSIN语句指定输入数据流 //STEP1 EXEC PGM=ABC //SYSIN DD * F1001 //* 在这种方式下,程序ABC需要于WORKING-STORAGE节定义接受变量
01 WK-ACCEPT-AREA       05 WK-ACCEPT-FCN PIC X(02)       05 WK-ACCEPT-SEQ        PIC 9(03)