如何在z/OS上使用JCL运行COBOL程序

本文介绍如何在z/OS系统上通过JCL（Job Control Language）运行COBOL程序，包括JCL语法和COBOL编译链接操作，并提供示例代码。

//JOBNAME JOB (ACCTINFO),'JOBDESC',MSGCLASS=X,MSGLEVEL=(1,1),
// CLASS=CLASS,NOTIFY=&SYSUID
//STEP1 EXEC PGM=IGYCRCTL,REGION=0M
//COBOL.SYSIN DD *
 IDENTIFICATION DIVISION.
 PROGRAM-ID. HELLO-WORLD.
 PROCEDURE DIVISION.
     DISPLAY 'HELLO, WORLD!'.
     STOP RUN.
/*
//STEP2 EXEC PGM=IEWL,PARM='LIST,XREF,LET,RENT,NCAL',
// PARM.SYMDEF=SYS1.COBC.SDF
//SYSPRINT DD SYSOUT=*
//SYSLMOD DD DISP=(NEW,CATLG,DELETE),DSN=HLQ.LOAD(HELLO)
//SYSLIN DD *
 INCLUDE OBJ(MACRFDS)
 NAME HELLO(R)
/*
运行该JCL将编译链接名为HELLO的COBOL程序，并生成可执行模块并保存在指定数据集中。运行该模块可在终端显示“HELLO, WORLD！”。

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