我对在我的COBOL课程中完成的任务中如何创建JCL中的符号变量有些困惑。
例如,我应该“为PARM选项指定一个符号参数,并将TEST和APOST指定为默认值。”
我该如何指定“PARM”选项为符号参数?
编辑:抱歉,我忘了提到我正在运行的操作系统。我在z/OS中编写这个JCL文件。
谢谢!
编辑:
@avisser:
所以,你的意思是我可以直接调用"&PARM='TEST,APOST'",如果我想要在另一个JCL语句中运行此过程时更改该参数,则可以从调用JCL中更改列出的参数?
编辑:
@avisser:
是的,抱歉,我真的需要更加具体地说明... 在我的COBOL JCL中,我调用了COBOL编译器(IGYCRCTL),链接编辑器(HEWL)和程序获取(EXEC PGM=)。
编辑:
也许看一下我的输出会有所帮助。我真的很感谢所有试图帮助我的人。
输出:
------ JES2 JOB STATISTICS ------
37 CARDS READ
61 SYSOUT PRINT RECORDS
0 SYSOUT PUNCH RECORDS
3 SYSOUT SPOOL KBYTES
0.00 MINUTES EXECUTION TIME
!! JES SPOOL文件结束 !!
1 //KC03CEFA JOB ,'MATT R',MSGCLASS=H,TYPRUN=SCAN JOB07731
//*
2 //STEP01 EXEC PGM=IGYCRCTL,®ION=248K,
// &PARM='TEST,APOST'
3 //STEPLIB DD DSN=IGY340.SIGYCOMP,DISP=SHR
/*
4 //SYSLIN DD &DSN=&&OBJSET,UNIT=DISK,SPACE=(TRK,(3,3)),
// &DISP=(NEW,PASS,DELETE)
5 //SYSPRINT DD SYSOUT=*
6 //SYSUT1 DD UNIT=DISK,SPACE=(CYL,(1,1))
7 //SYSUT2 DD UNIT=DISK,SPACE=(CYL,(1,1))
8 //SYSUT3 DD UNIT=DISK,SPACE=(CYL,(1,1))
9 //SYSUT4 DD UNIT=DISK,SPACE=(CYL,(1,1))
10 //SYSUT5 DD UNIT=DISK,SPACE=(CYL,(1,1))
11 //SYSUT6 DD UNIT=DISK,SPACE=(CYL,(1,1))
12 //SYSUT7 DD UNIT=DISK,SPACE=(CYL,(1,1))
//*
//*
13 //STEP02 EXEC PGM=HEWL,&COND=,&REAGION=2048K,
// &PARM=
14 //SYSLIB DD DSN=CEE.SCEELKED,DISP=SHR
15 //SYSLIN DD &DSN=&&OBJSET,&DISP=(OLD,DELETE)
16 //SYSLMOD DD DSN=&&TEMPLIB(PGM6),
// SPACE=(1024,(50,20,1)),UNIT=DISK,
// DISP=(NEW,CATLG,DELETE)
17 //SYSPRINT DD SYSOUT=*
18 //PRINTER DD SYSOUT=*
19 //SYSUT1 DD UNIT=DISK,SPACE=(TRK,(10,10))
//*
//*
20 //STEP01 EXEC PGM=PGM6,&PARM=TERMTHDACT(DUMP)
21 //STEPLIB DD DSN=&&TEMPLIB,DISP=SHR
22 //CEEDUMP
23 //SYSUDUMP
24 //PRINTER DD SYSOUT=*
25 //PRODUCTS DD DSN=KC02322.CSCI465.SP09(DATA1),DISP=SHR
26 //SYSIN DD *
!! JES SPOOL文件结束 !!
STMT NO. MESSAGE
2 IEFC630I 未识别的关键字 ®ION
2 IEFC630I 未识别的关键字 &PARM
4 IEFC630I 未识别的关键字 &DSN
4 IEFC630I 未识别的关键字 &DISP
13 IEFC630I 未识别的关键字 &COND
13 IEFC630I 未识别的关键字 &REAGION
13 IEFC630I 未识别的关键字 &PARM
15 IEFC630I 未识别的关键字 &DSN
15 IEFC630I 未识别的关键字 &DISP
20 IEFC630I 未识别的关键字 &PARM
22 IEFC605I 未识别的操作字段
23 IEFC605I 未识别的操作字段
!! JES SPOOL文件结束