Question

我有一个要求，我必须提交10个JCL＆＃39; s。每个JCL都被编码为在完成良好时给出MAXXCC = 0。

我想从主JCL调用所有JCL，以便我不必手动提交所有JCL。

如果通过内部阅读器无法做到这一点，请建议任何其他解决方法。

这就是我现在如何编码：

//*************************************************************
//* STEP 1: Run job 2
//*************************************************************
//*                                                            
//STEP02   EXEC PGM=IEBGENER                                   
//SYSUT1   DD   DISP=SHR,DSN=HLQ.MYPDS(JCL2)   
//SYSUT2   DD   SYSOUT=(,INTRDR)                               
//SYSPRINT DD   SYSOUT=*                                       
//SYSIN    DD   DUMMY                                          
//*                                                            
//*************************************************************
//* STEP 3: Run job 3
//*************************************************************
//*                                                            
//STEP03   EXEC PGM=IEBGENER,COND=(0,EQ,STEP0)                                   
//SYSUT1   DD   DISP=SHR,DSN=HLQ.MYPDS(JCL3)   
//SYSUT2   DD   SYSOUT=(,INTRDR)                               
//SYSPRINT DD   SYSOUT=*                                       
//SYSIN    DD   DUMMY                                          
//*

Answer 1

调度系统

正如其他建议使用调度系统，我会认为所有的主机系统会有某种调度程序。按顺序运行Jobs是有面包和黄油的调度系统。

您需要了解scheduling systems，越快越好。 在工作中询问!!!

确实存在其他选项

JCL Chaining - 每份工作都提交下一份工作

基本上你可以让每个工作提交下一份工作 e.g。

工作1：

// --- Job 1 JCL
//*
// --- JCL to submit Job 2

工作2：

// --- Job 2 JCL
//*
// --- JCL to submit Job 3

如果你使用这个方法，我会创建一个JCL proc（比如说SUBNEXT）

// --- Job 1 JCL
//*
//   EXEC SUBNEXT,NEXT=JOB2

您可以使用JCLLIB 声明使用您自己的PROCLIB（存储SUBNEXT的PDS）。要使用JCLLIB：

//MYJOB1   JOB     ...
//MYLIBS1  JCLLIB  ORDER=MY.PROCS.JCL

Jes 3 schedule

如果使用Jes-3;有内置的工作控制。只用这个选项如果你知道你在做什么，那么操作人员会感到不安。基本上要确保使用刷新选项

基于上一步的RC {来自内部读者}，从主JCL提交另一个JCL作为步骤

1 个答案:

调度系统

JCL Chaining - 每份工作都提交下一份工作

Jes 3 schedule