使用z/OS控制流程的示例代码

这个示例代码展示了如何在IBM z/OS操作系统上使用JCL（Job Control Language）和COBOL程序控制作业流程。涉及到如何定义数据集、提交作业、获取返回代码等操作。

//JOBNAME JOB (ACCT#),'JOB DESCRIPTION',CLASS=A,MSGCLASS=X
//STEP01 EXEC PGM=IEFBR14
//SYSUT1 DD DSN=MY.INPUT.FILE,DISP=SHR
//SYSUT2 DD DSN=MY.OUTPUT.FILE,DISP=(NEW,CATLG,DELETE),...
//STEP02 EXEC PGM=MYCOBOL
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD DSN=MY.COBOL.PROGRAM,DISP=SHR
//SYSDBOUT DD DSN=MY.DB2.TABLE,DISP=(NEW,CATLG,DELETE),...
//STEP03 EXEC PGM=IEFBR14
//SYSUT1 DD DSN=MY.OUTPUT.FILE,DISP=SHR
//SYSUT2 DD DSN=MY.RETURN.CODE.FILE,DISP=(NEW,DELETE),...

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