使用z/OS中的JCL编译和运行COBOL程序

本示例展示了如何使用z/OS中的JCL（作业控制语言）编译和运行COBOL程序，并通过输出结果确认程序是否正确执行。JCL是z/OS中的一种控制作业流程的语言。COBOL是一种常用的商业应用程序设计语言。

//COBOLJCL JOB (ACCT),'COBOL',CLASS=A
//COMPILE  EXEC PGM=IGYCRCTL
//SYSOUT   DD SYSOUT=*
//SYSIN    DD DSN=YOUR.COBOL.SOURCE,DISP=SHR
//OBJ      DD DSN=YOUR.COBOL.OBJ,DISP=(NEW,CATLG),
//            UNIT=SYSDA,SPACE=(CYL,(10,1)),
//            DCB=RECFM=FB,LRECL=80,BLKSIZE=0
//LKED     EXEC PGM=IEWL,PARM='XREF,LET,LIST,NCAL',
//            COND=(0,NE,COMPILE),
//            REGION=0M
//SYSLMOD  DD DSN=YOUR.LOADLIB,DISP=SHR
SYSLIN   DD DSN=YOUR.COBOL.OBJ,DISP=SHR
SYSUT1   DD UNIT=SYSDA,SPACE=(CYL,(1,1))
SYSMAP   DD SYSOUT=*
//RUNJOB   EXEC PGM=YOUR.PROGRAM,PARM='PARAMETERS'
//SYSOUT   DD SYSOUT=*
//SYSIN    DD *
    YOUR.JCL(INPUT DATA)
/*

免责申明：文章和图片全部来源于公开网络，如有侵权，请通知删除 server@dude6.com