JOBGROUP

MainframeCoder · New User Joined: 12 Jan 2021 Posts: 5 Location: US

When I submit the following (on JES2):
***************************** Top of Data ********************
//DPEGROUP JOBGROUP
//DPE0JOBA GJOB
//DPE0JOBB GJOB
//DPE0JOBC GJOB
//DPE0JOBD GJOB
//DPE0JOBE GJOB
//*** AFTER NAME=(DPE0JOBA,DPE0JOBB,DPE0JOBC,DPE0JOBD)
// AFTER NAME=DPE0JOBA
// AFTER NAME=DPE0JOBB
// AFTER NAME=DPE0JOBC
// AFTER NAME=DPE0JOBD
//DPEGROUP ENDGROUP
//*+*+*+*+*+*+*+*+*+*+*
//DPEOJOBA JOB DB2PEP,DPE0JOBA,CLASS=T,MSGCLASS=H,REGION=4096K
// SCHEDULE JOBGROUP=DPEGROUP
//COPYFILE EXEC PGM=IEBGENER
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSUT1 DD DSN=APGDB.INA,DISP=SHR
//SYSUT2 DD DSN=APGDB.OUTA,DISP=OLD
//*+*+*+*+*+*+*+*+*+*+*
//DPEOJOBB JOB DB2PEP,DPE0JOBB,CLASS=T,MSGCLASS=H,REGION=4096K
// SCHEDULE JOBGROUP=DPEGROUP
//COPYFILE EXEC PGM=IEBGENER
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSUT1 DD DSN=APGDB.INB,DISP=SHR
//SYSUT2 DD DSN=APGDB.OUTB,DISP=OLD
//*+*+*+*+*+*+*+*+*+*+*
//DPEOJOBC JOB DB2PEP,DPE0JOBC,CLASS=T,MSGCLASS=H,REGION=4096K
// SCHEDULE JOBGROUP=DPEGROUP
//COPYFILE EXEC PGM=IEBGENER
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSUT1 DD DSN=APGDB.INC,DISP=SHR
//SYSUT2 DD DSN=APGDB.OUTC,DISP=OLD
//*+*+*+*+*+*+*+*+*+*+*
//DPEOJOBD JOB DB2PEP,DPE0JOBD,CLASS=T,MSGCLASS=H,REGION=4096K
// SCHEDULE JOBGROUP=DPEGROUP
//COPYFILE EXEC PGM=IEBGENER
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSUT1 DD DSN=APGDB.IND,DISP=SHR
//SYSUT2 DD DSN=APGDB.OUTD,DISP=OLD
//*+*+*+*+*+*+*+*+*+*+*
//DPE0JOBE JOB DB2PEP,DPE0JOBE,CLASS=T,MSGCLASS=H,REGION=4096K
// SCHEDULE JOBGROUP=DPEGROUP
//COPYFILE EXEC PGM=IEBGENER
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSUT1 DD DSN=APGDB.INE,DISP=SHR
//SYSUT2 DD DSN=APGDB.OUTE,DISP=OLD
//*
**************************** Bottom of Data *******************

In SDSF, under JG...
DPEGROUP G0008059 APGDB ACTIVE,INIT

********************************* TOP OF DATA **************** J E S 2 J O B L O G -- S Y S T E M B C S D -- N O D E B C S J E S 2 D
17.22.38 G0008059 ---- MONDAY, 27 SEP 2021 ----
17.22.38 G0008059 IRR010I USERID APGDB IS ASSIGNED TO THIS JOB.
BCSD 17.22.38 JOB08064 $HASP1300 DPE0JOBE registered to job group DPEGROUP
******************************** BOTTOM OF DATA *************

In SDSF, under ST...
JOBNAME JobID Max-RC Owner Prty Queue
DPEOJOBA JOB08060 JCL ERROR APGDB 1 PRINT
DPEOJOBB JOB08061 JCL ERROR APGDB 1 PRINT
DPEOJOBC JOB08062 JCL ERROR APGDB 1 PRINT
DPEOJOBD JOB08063 JCL ERROR APGDB 1 PRINT
DPE0JOBE JOB08064 APGDB 9 SETUP

JOBS [A,B,C & D] all show output like this:

J E S 2 J O B L O G -- S Y S T E M B C S D --
N O D E B C S J E S 2 D

17.22.38 JOB08060 ---- MONDAY, 27 SEP 2021 ----
17.22.38 JOB08060 IRR010I USERID APGDB IS ASSIGNED TO THIS JOB.
17.22.38 JOB08060 IEFC452I DPEOJOBA - JOB NOT RUN - JCL ERROR 508
------ JES2 JOB STATISTICS ------
9 CARDS READ
23 SYSOUT PRINT RECORDS
0 SYSOUT PUNCH RECORDS
1 SYSOUT SPOOL KBYTES
0.00 MINUTES EXECUTION TIME
1 //DPEOJOBA JOB DB2PEP,DPE0JOBA,CLASS=T,MSGCLASS=H,REGION=4096K
2 // SCHEDULE JOBGROUP=DPEGROUP
3 //COPYFILE EXEC PGM=IEBGENER
4 //SYSIN DD DUMMY
5 //SYSPRINT DD SYSOUT=*
6 //SYSUDUMP DD SYSOUT=*
7 //SYSUT1 DD DSN=APGDB.INA,DISP=SHR
8 //SYSUT2 DD DSN=APGDB.OUTA,DISP=OLD
//*+*+*+*+*+*+*+*+*+*+*
STMT NO. MESSAGE
2 HASP148 Job not associated with job group
******************************** BOTTOM OF DATA *******

The E job sits there like this:

********************************* TOP OF DATA **************************
J E S 2 J O B L O G -- S Y S T E M B C S D --

17.22.38 JOB08064 ---- MONDAY, 27 SEP 2021 ----
17.22.38 JOB08064 IRR010I USERID APGDB IS ASSIGNED TO THIS JOB.
1 //DPE0JOBE JOB DB2PEP,DPE0JOBE,CLASS=T,MSGCLASS=H,REGION=4096K
2 // SCHEDULE JOBGROUP=DPEGROUP
3 //COPYFILE EXEC PGM=IEBGENER
4 //SYSIN DD DUMMY
5 //SYSPRINT DD SYSOUT=*
6 //SYSUDUMP DD SYSOUT=*
7 //SYSUT1 DD DSN=APGDB.INE,DISP=SHR
8 //SYSUT2 DD DSN=APGDB.OUTE,DISP=OLD
//*
******************************** BOTTOM OF DATA ********

Any thoughts on why the A-D jobs show HASP148 Job not associated with job group?

Joerg.Findeisen · Posted: Tue Sep 28, 2021 7:46 am

Make use of Code Tags when presenting Code/Data.

I assume you want to start DPE0JOBE after all the others have completed. This seems to works in my shop:

MainframeCoder · New User Joined: 12 Jan 2021 Posts: 5 Location: US

I had tried that. As noted above,
//*** AFTER NAME=(DPE0JOBA,DPE0JOBB,DPE0JOBC,DPE0JOBD)
Unfortunately it did not work for me either.

And yes, I want to start DPE0JOBE after all the others have completed.

Joerg.Findeisen · Posted: Tue Sep 28, 2021 10:22 pm

MainframeCoder · New User Joined: 12 Jan 2021 Posts: 5 Location: US

Using the "AFTER NAME: on one line...
//DPEGROUP JOBGROUP
//DPE0JOBA GJOB
//DPE0JOBB GJOB
//DPE0JOBC GJOB
//DPE0JOBD GJOB
//DPE0JOBE GJOB
// AFTER NAME=(DPE0JOBA,DPE0JOBB,DPE0JOBC,DPE0JOBD)
//DPEGROUP ENDGROUP
//*+*+*+*+*+*+*+*+*+*+*

********************************* TOP OF DATA *******
J E S 2 J O B L O G -- S Y S T E M B C S D
-- N O D E B C S J E S 2 D
12.06.30 G0008372 ---- TUESDAY, 28 SEP 2021 ----
12.06.30 G0008372 IRR010I USERID APGDB IS ASSIGNED TO THIS JOB.
BCSD 12.06.30 JOB08377 $HASP1300 DPE0JOBE registered to job group DPEGROUP
******************************** BOTTOM OF DATA *****

DPEOJOBA JOB08373 JCL ERROR
DPEOJOBB JOB08374 JCL ERROR
DPEOJOBC JOB08375 JCL ERROR
DPEOJOBD JOB08376 JCL ERROR
DPE0JOBE JOB08377 APGDB 9 SETUP

The A/B/C/D jobs show output like the following (the JCL error # changes
from 174/178/182/186, for the A/B/C/D jobs respectively) :
J E S 2 J O B L O G -- S Y S T E M B C S D --

12.06.30 JOB08373 ---- TUESDAY, 28 SEP 2021 ----
12.06.30 JOB08373 IRR010I USERID APGDB IS ASSIGNED TO THIS JOB.
12.06.30 JOB08373 IEFC452I DPEOJOBA - JOB NOT RUN - JCL ERROR 174
------ JES2 JOB STATISTICS ------
9 CARDS READ
23 SYSOUT PRINT RECORDS
0 SYSOUT PUNCH RECORDS
1 SYSOUT SPOOL KBYTES
0.00 MINUTES EXECUTION TIME
1 //DPEOJOBA JOB DB2PEP,DPE0JOBA,CLASS=T,MSGCLASS=H,REGION=4096K
2 // SCHEDULE JOBGROUP=DPEGROUP
3 //COPYFILE EXEC PGM=IEBGENER
4 //SYSIN DD DUMMY
5 //SYSPRINT DD SYSOUT=*
6 //SYSUDUMP DD SYSOUT=*
7 //SYSUT1 DD DSN=APGDB.INA,DISP=SHR
8 //SYSUT2 DD DSN=APGDB.OUTA,DISP=OLD
//*+*+*+*+*+*+*+*+*+*+*
STMT NO. MESSAGE
2 HASP148 Job not associated with job group

And for the "E" job
J E S 2 J O B L O G -- S Y S T E M B C S D --
12.06.30 JOB08377 ---- TUESDAY, 28 SEP 2021 ----
12.06.30 JOB08377 IRR010I USERID APGDB IS ASSIGNED TO THIS JOB.
1 //DPE0JOBE JOB DB2PEP,DPE0JOBE,CLASS=T,MSGCLASS=H,REGION=4096K
2 // SCHEDULE JOBGROUP=DPEGROUP
3 //COPYFILE EXEC PGM=IEBGENER
4 //SYSIN DD DUMMY
5 //SYSPRINT DD SYSOUT=*
6 //SYSUDUMP DD SYSOUT=*
7 //SYSUT1 DD DSN=APGDB.INE,DISP=SHR
8 //SYSUT2 DD DSN=APGDB.OUTE,DISP=OLD
//*

Joerg.Findeisen · Posted: Tue Sep 28, 2021 10:59 pm

The JCL errors are Ok, the JG Definition is having problems on your site. When I submit this:

dneufarth · Posted: Wed Sep 29, 2021 12:27 am

Perhaps I'm off, but it looks JOB0... vs JOBO... naming issue.

Letter "O" vs number "0" on Jobs A thru D and Job E

Joerg.Findeisen · Posted: Wed Sep 29, 2021 12:43 am

dneufarth · Posted: Wed Sep 29, 2021 1:08 am

Noticed it here

MainframeCoder · New User Joined: 12 Jan 2021 Posts: 5 Location: US

It was an issue with Letter "O" vs number "0"

If only I could go back 3000 years or so. I would try to convince
the person that came up with them, that using Letter "O" vs number "0" is not the best idea ever!

Thanks for your help!

jon-evo · New User Joined: 08 Aug 2021 Posts: 1 Location: UK

You've not tried configuring your terminal emulator to use a 'coder' font? There are usually a number available that distinguish a zero with a slash or dot.

Joerg.Findeisen · Posted: Wed Sep 29, 2021 11:39 am