在z/OS中使用JCL启动作业

z/OS是一种操作系统，JCL（Job Control Language）是一种编程语言，用于定义z/OS作业的运行方式。本文将介绍如何在z/OS中使用JCL启动作业。

z/OS JCL编程

在z/OS中，使用JCL编程可以定义作业的执行过程。JCL程序通常由多个语句组成，每个语句都以“//”开头，以换行符结尾。以下是一个简单的JCL程序示例：

//JOBNAME JOB (ACCOUNT INFO),'JOB DESCRIPTION'
//STEP1 EXEC PGM=PROGRAMNAME,PARM='PARAMETER'
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSIN DD *
  COMMAND
/*

• JOBNAME是作业名称，ACCOUNT INFO是作业所属的帐户信息。
• STEP1是作业的一个步骤，PROGRAMNAME是要执行的程序名称，PARAMETER是传递给程序的参数。
• SYSPRINT、SYSOUT和SYSUDUMP是输出数据集的名称，*表示将输出发送到系统输出设备。
• SYSTSIN是输入数据集的名称，COMMAND是要传递给程序的命令。

z/OS如何启动作业

要在z/OS上启动作业，需要使用JOB或TSU命令。以下是启动作业的示例：

//JOBNAME JOB (ACCOUNT INFO),'JOB DESCRIPTION'
//STEP1 EXEC PGM=PROGRAMNAME,PARM='PARAMETER'
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSIN DD *
  COMMAND
/*
// 

将以上JCL保存为一个文本文件，例如job.jcl，然后使用以下命令将其提交到z/OS作业队列中：

//SUBMIT JOB (ACCOUNT INFO),'SUBMIT JOB'
// EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DSN=JOB.JCL,DISP=SHR
//SYSUT2 DD SYSOUT=(A,INTRDR)
//SYSIN DD DUMMY
/*
//

• SUBMIT是作业名称，ACCOUNT INFO是作业所属的帐户信息。
• IEBGENER是一个系统程序，用于将文本数据集转换为另一种数据集。
• SYSUT1是输入数据集的名称，JOB.JCL是包含JCL程序的文本文件。
• SYSUT2是输出数据集的名称，(A,INTRDR)表示将输出发送到内部读取器（INTRDR）。
• SYSIN是输入数据集的名称，DUMMY表示没有输入数据。

提交作业后，可以使用以下命令查看作业状态：

$ squeue -j JOBNAME

z/OS JCL教程

以下是一些常用的JCL语句：

• //：语句的开始。
• JOB：定义作业。
• EXEC：定义作业的一个步骤。
• DD：定义数据集。
• IF：定义条件。
• THEN：条件为真时要执行的语句。
• ELSE：条件为假时要执行的语句。
• ENDIF：结束条件语句。

以下是一个JCL程序示例，该程序从输入数据集中读取数据，并将其写入输出数据集：

//JOBNAME JOB (ACCOUNT INFO),'JOB DESCRIPTION'
//STEP1 EXEC PGM=IFILE,REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSIN DD DSN=INPUT.DATASET,DISP=SHR
//SYSOUT DD DSN=OUTPUT.DATASET,DISP=(NEW,CATLG,DELETE),
//  UNIT=SYSDA,SPACE=(CYL,(50,50),RLSE)
/*

• IFILE是一个程序名称，该程序从输入数据集中读取数据，并将其写入输出数据集。
• REGION是定义步骤的存储区域大小（以兆字节为单位）。
• INPUT.DATASET是输入数据集的名称。
• OUTPUT.DATASET是输出数据集的名称。
• DISP=(NEW,CATLG,DELETE)表示将创建一个新的输出数据集，并将其目录条目添加到系统目录，作业结束时将删除它。
• UNIT=SYSDA是指定磁盘设备。
• SPACE=(CYL,(50,50),RLSE)是定义输出数据集的空间分配，(50,50)表示分配50个柱面的空间。

示例代码

以下是一个JCL程序示例，该程序在z/OS上运行一个简单的COBOL程序：

//MYJOB JOB (ACCT#),'RUN COBOL PROGRAM'
//STEP1 EXEC PGM=MYPROG
//SYSOUT DD SYSOUT=*
//SYSIN DD *
  INPUT DATA
/*

• MYJOB是作业名称，ACCT#是作业所属的帐户信息。
• MYPROG是要执行的COBOL程序名称。
• SYSOUT是输出数据集的名称，*表示将输出发送到系统输出设备。
• SYSIN是输入数据集的名称，INPUT DATA是要传递给程序的数据。

本文介绍了在z/OS中使用JCL启动作业的方法。JCL编程可以定义作业的执行过程，使用JOB或TSU命令启动作业，并使用常用的JCL语句定义数据集和条件。示例代码演示了如何在z/OS上运行COBOL程序。希望这篇文章能够帮助您更好地理解z/OS JCL编程和作业管理。

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