IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

JOBGROUP


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
MainframeCoder

New User


Joined: 12 Jan 2021
Posts: 5
Location: US

PostPosted: Tue Sep 28, 2021 4:06 am
Reply with quote

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?
Back to top
View user's profile Send private message
Joerg.Findeisen

Active Member


Joined: 15 Aug 2015
Posts: 623
Location: Bamberg, Germany

PostPosted: Tue Sep 28, 2021 7:46 am
Reply with quote

Make use of Code Tags when presenting Code/Data. icon_exclaim.gif

I assume you want to start DPE0JOBE after all the others have completed. This seems to works in my shop:
Code:
//DPEGROUP JOBGROUP                                 
//DPE0JOBA GJOB                                     
//DPE0JOBB GJOB                                     
//DPE0JOBC GJOB                                     
//DPE0JOBD GJOB                                     
//DPE0JOBE GJOB                                     
// AFTER NAME=(DPE0JOBA,DPE0JOBB,DPE0JOBC,DPE0JOBD) 
//DPEGROUP ENDGROUP
Back to top
View user's profile Send private message
MainframeCoder

New User


Joined: 12 Jan 2021
Posts: 5
Location: US

PostPosted: Tue Sep 28, 2021 8:31 pm
Reply with quote

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.
Back to top
View user's profile Send private message
Joerg.Findeisen

Active Member


Joined: 15 Aug 2015
Posts: 623
Location: Bamberg, Germany

PostPosted: Tue Sep 28, 2021 10:22 pm
Reply with quote

MainframeCoder wrote:
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.

What error messages have you seen in doing so?
Back to top
View user's profile Send private message
MainframeCoder

New User


Joined: 12 Jan 2021
Posts: 5
Location: US

PostPosted: Tue Sep 28, 2021 10:47 pm
Reply with quote

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
//*
Back to top
View user's profile Send private message
Joerg.Findeisen

Active Member


Joined: 15 Aug 2015
Posts: 623
Location: Bamberg, Germany

PostPosted: Tue Sep 28, 2021 10:59 pm
Reply with quote

The JCL errors are Ok, the JG Definition is having problems on your site. When I submit this:
Code:
****** **************************** Datenanfang *********************
000001 //DPE0JOBY JOBGROUP (<act>),ME                 
000002 //DPE0JOBA GJOB                                               
000003 //DPE0JOBB GJOB                                               
000004 //DPE0JOBC GJOB                                               
000005 //DPE0JOBD GJOB                                               
000006 //DPE0JOBE GJOB                                               
000007 //         AFTER NAME=(DPE0JOBA,DPE0JOBB,DPE0JOBC,DPE0JOBD)   
000008 //DPE0JOBY ENDGROUP                                           
****** **************************** Datenende ***********************

I successfully see this registered JG:
Code:
//DPE0JOBY JOBGROUP (<act>),ME               
//DPE0JOBA GJOB                                             
//DPE0JOBB GJOB                                             
//DPE0JOBC GJOB                                             
//DPE0JOBD GJOB                                             
//DPE0JOBE GJOB                                             
//         AFTER NAME=(DPE0JOBA,DPE0JOBB,DPE0JOBC,DPE0JOBD)
//DPE0JOBY ENDGROUP                                         
HASP1111 JOBGROUP is valid
Back to top
View user's profile Send private message
dneufarth

Active User


Joined: 27 Apr 2005
Posts: 336
Location: Inside the SPEW (Cincinnati OH USA)

PostPosted: Wed Sep 29, 2021 12:27 am
Reply with quote

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
Back to top
View user's profile Send private message
Joerg.Findeisen

Active Member


Joined: 15 Aug 2015
Posts: 623
Location: Bamberg, Germany

PostPosted: Wed Sep 29, 2021 12:43 am
Reply with quote

dneufarth wrote:
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

Looks Ok to me, but if the TS would use Code Tags we could see better.
Back to top
View user's profile Send private message
dneufarth

Active User


Joined: 27 Apr 2005
Posts: 336
Location: Inside the SPEW (Cincinnati OH USA)

PostPosted: Wed Sep 29, 2021 1:08 am
Reply with quote

Noticed it here

Code:

********************************* 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

...................^
Back to top
View user's profile Send private message
MainframeCoder

New User


Joined: 12 Jan 2021
Posts: 5
Location: US

PostPosted: Wed Sep 29, 2021 3:12 am
Reply with quote

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!
Back to top
View user's profile Send private message
jon-evo

New User


Joined: 08 Aug 2021
Posts: 1
Location: UK

PostPosted: Wed Sep 29, 2021 4:35 am
Reply with quote

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.
Back to top
View user's profile Send private message
Joerg.Findeisen

Active Member


Joined: 15 Aug 2015
Posts: 623
Location: Bamberg, Germany

PostPosted: Wed Sep 29, 2021 11:39 am
Reply with quote

dneufarth wrote:
Noticed it here

Code:

********************************* 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

...................^

Well spotted, thanks for your support!
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Convert a JOBGROUP into an OPC (TWS/I... JCL & VSAM 0
Search our Forums:

Back to Top