View previous topic :: View next topic
|
Author |
Message |
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10872 Location: italy
|
|
|
|
Quote: |
I completly disagree with above statement, Try to execute programs which is in JOBLIB and SYSTEM Default Library by having diffrent version. Try to find whether JCL has pick up which version ie either from JOBLIB or SYSTEM Default Library(Have STEPLIB, JOBLIB in JCL)..(I have tested this).. :o) |
it took me just a couple of minutes to run a test
- it took me longer to write the post
steps... done to test the joblib steplib issue
allocate a dataset to be used as joblib
allocate a dataset to be used as steplib
assemble and link into the joblib dataset
a simple program to issue a wto..
Code: |
TEST CSECT
BAKR 14,0
BASR 12,0
USING *,12
WTO 'TEST - JUST A STUPID WTO'
PR
LTORG
END
|
submitted the job
Code: |
//jobname JOB .....
//*
//JOBLIB DD DISP=SHR,DSN=joblib_dataset
//G EXEC PGM=TEST
//STEPLIB DD DISP=SHR,DSN=steplib_dataset
|
as expected ended with an abend s806 load module not found
which means that... guess what:
... the manual is right
so You might disagree, but You are just
... plain wrong ....
so it would be wiser to get a better grasp of the manuals in order
to review your understanding of the joblib/steplib behavior
and also to review Your testing methodology
to convince you that I am not cheating and carried on the tests properly
here are the SDSF XDC of the two jobs
abended job
Code: |
1 J E S 2 J O B L O G -- S Y S T E M S Y S 1 -- N O D E N 1
0
18.06.53 JOB00051 ---- THURSDAY, 20 NOV 2008 ----
18.06.53 JOB00051 IRR010I USERID zosuser IS ASSIGNED TO THIS JOB.
18.06.53 JOB00051 ICH70001I zosuser LAST ACCESS AT 18:06:40 ON THURSDAY, NOVEMBER 20, 2008
18.06.53 JOB00051 $HASP373 zosuserB STARTED - INIT 1 - CLASS A - SYS SYS1
18.06.53 JOB00051 IEF403I zosuserB - STARTED - TIME=18.06.53
18.06.53 JOB00051 CSV003I REQUESTED MODULE TEST NOT FOUND
18.06.53 JOB00051 CSV028I ABEND806-04 JOBNAME=zosuserB STEPNAME=TEST
18.06.53 JOB00051 IEA995I SYMPTOM DUMP OUTPUT 874
874 SYSTEM COMPLETION CODE=806 REASON CODE=00000004
874 TIME=18.06.53 SEQ=00022 CPU=0000 ASID=001A
874 PSW AT TIME OF ERROR 070C1000 811B5A78 ILC 2 INTC 0D
874 NO ACTIVE MODULE FOUND
874 NAME=UNKNOWN
874 DATA AT PSW 011B5A72 - 8400181E 0A0D18FB 180C181D
874 AR/GR 0: 9196DFDE/00001E00 1: 00000000/84806000
874 2: 00000000/00FDDD68 3: 00000000/00000000
874 4: 00000000/00000000 5: 00000000/008FF548
874 6: 00000000/000000FF 7: 00000000/00000000
874 8: 00000000/008C1250 9: 00000000/011B5F4C
874 A: 00000000/00000000 B: 00000000/00000004
874 C: 00000000/00000000 D: 00000000/008C1250
874 E: 00000000/84806000 F: 00000002/00000004
874 END OF SYMPTOM DUMP
18.06.53 JOB00051 IEF450I zosuserB TEST - ABEND=S806 U0000 REASON=00000004 875
875 TIME=18.06.53
18.06.53 JOB00051 IEF404I zosuserB - ENDED - TIME=18.06.53
18.06.53 JOB00051 $HASP395 zosuserB ENDED
0------ JES2 JOB STATISTICS ------
- 20 NOV 2008 JOB EXECUTION DATE
- 7 CARDS READ
- 75 SYSOUT PRINT RECORDS
- 0 SYSOUT PUNCH RECORDS
- 4 SYSOUT SPOOL KBYTES
- 0.00 MINUTES EXECUTION TIME
1 //zosuserB JOB (ACCT#),'TEST',NOTIFY=&SYSUID, JOB00051
// CLASS=A,MSGCLASS=X,MSGLEVEL=(1,1)
//* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
//*
IEFC653I SUBSTITUTION JCL - (ACCT#),'TEST',NOTIFY=zosuser,CLASS=A,MSGCLASS=X,MSGLEVEL=(1,1)
2 //JOBLIB DD DISP=SHR,DSN=zosuser.TEST.JOBLIBB
3 //TEST EXEC PGM=TEST
4 //STEPLIB DD DISP=SHR,DSN=zosuser.TEST.STEPLIB
ICH70001I zosuser LAST ACCESS AT 18:06:40 ON THURSDAY, NOVEMBER 20, 2008
IEF236I ALLOC. FOR zosuserB TEST
IEF237I 0A83 ALLOCATED TO JOBLIB
IEF237I 0A83 ALLOCATED TO STEPLIB
CSV003I REQUESTED MODULE TEST NOT FOUND
CSV028I ABEND806-04 JOBNAME=zosuserB STEPNAME=TEST
IEA995I SYMPTOM DUMP OUTPUT
SYSTEM COMPLETION CODE=806 REASON CODE=00000004
TIME=18.06.53 SEQ=00022 CPU=0000 ASID=001A
PSW AT TIME OF ERROR 070C1000 811B5A78 ILC 2 INTC 0D
NO ACTIVE MODULE FOUND
NAME=UNKNOWN
DATA AT PSW 011B5A72 - 8400181E 0A0D18FB 180C181D
AR/GR 0: 9196DFDE/00001E00 1: 00000000/84806000
2: 00000000/00FDDD68 3: 00000000/00000000
4: 00000000/00000000 5: 00000000/008FF548
6: 00000000/000000FF 7: 00000000/00000000
8: 00000000/008C1250 9: 00000000/011B5F4C
A: 00000000/00000000 B: 00000000/00000004
C: 00000000/00000000 D: 00000000/008C1250
E: 00000000/84806000 F: 00000002/00000004
END OF SYMPTOM DUMP
IEF472I zosuserB TEST - COMPLETION CODE - SYSTEM=806 USER=0000 REASON=00000004
IEF285I zosuser.TEST.STEPLIB KEPT
IEF285I VOL SER NOS= Z9SYS1.
IEF373I STEP/TEST /START 2008325.1806
IEF374I STEP/TEST /STOP 2008325.1806 CPU 0MIN 00.05SEC SRB 0MIN 00.00SEC VIRT 4K SYS 256K EXT 0K SYS 10600K
IEF285I zosuser.TEST.JOBLIBB KEPT
IEF285I VOL SER NOS= Z9SYS1.
IEF375I JOB/zosuserB/START 2008325.1806
IEF376I JOB/zosuserB/STOP 2008325.1806 CPU 0MIN 00.05SEC SRB 0MIN 00.00SEC
|
Code: |
1 J E S 2 J O B L O G -- S Y S T E M S Y S 1 -- N O D E N 1
0
18.26.48 JOB00052 ---- THURSDAY, 20 NOV 2008 ----
18.26.48 JOB00052 IRR010I USERID zosuser IS ASSIGNED TO THIS JOB.
18.26.48 JOB00052 ICH70001I zosuser LAST ACCESS AT 18:06:53 ON THURSDAY, NOVEMBER 20, 2008
18.26.48 JOB00052 $HASP373 zosuserB STARTED - INIT 1 - CLASS A - SYS SYS1
18.26.48 JOB00052 IEF403I zosuserB - STARTED - TIME=18.26.48
18.26.48 JOB00052 +TEST - JUST A STUPID WTO
18.26.48 JOB00052 IEF404I zosuserB - ENDED - TIME=18.26.48
18.26.48 JOB00052 $HASP395 zosuserB ENDED
0------ JES2 JOB STATISTICS ------
- 20 NOV 2008 JOB EXECUTION DATE
- 7 CARDS READ
- 36 SYSOUT PRINT RECORDS
- 0 SYSOUT PUNCH RECORDS
- 2 SYSOUT SPOOL KBYTES
- 0.00 MINUTES EXECUTION TIME
1 //zosuserB JOB (ACCT#),'TEST',NOTIFY=&SYSUID, JOB00052
// CLASS=A,MSGCLASS=X,MSGLEVEL=(1,1)
//* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
//*
IEFC653I SUBSTITUTION JCL - (ACCT#),'TEST',NOTIFY=zosuser,CLASS=A,MSGCLASS=X,MSGLEVEL=(1,1)
2 //JOBLIB DD DISP=SHR,DSN=zosuser.TEST.JOBLIBB
3 //TEST EXEC PGM=TEST
//*TEPLIB DD DISP=SHR,DSN=zosuser.TEST.STEPLIB
ICH70001I zosuser LAST ACCESS AT 18:06:53 ON THURSDAY, NOVEMBER 20, 2008
IEF236I ALLOC. FOR zosuserB TEST
IEF237I 0A83 ALLOCATED TO JOBLIB
TEST - JUST A STUPID WTO
IEF142I zosuserB TEST - STEP WAS EXECUTED - COND CODE 0000
IEF373I STEP/TEST /START 2008325.1826
IEF374I STEP/TEST /STOP 2008325.1826 CPU 0MIN 00.02SEC SRB 0MIN 00.00SEC VIRT 8K SYS 248K EXT 0K SYS 10564K
IEF285I zosuser.TEST.JOBLIBB KEPT
IEF285I VOL SER NOS= Z9SYS1.
IEF375I JOB/zosuserB/START 2008325.1826
IEF376I JOB/zosuserB/STOP 2008325.1826 CPU 0MIN 00.02SEC SRB 0MIN 00.00SEC
|
|
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8696 Location: Dubuque, Iowa, USA
|
|
|
|
Enrico -- I have to agree with you; revel is wrong in thinking the JOBLIB is searched if there's a STEPLIB. I've seen too many cases where the JOBLIB is ignored when a STEPLIB is included to think the manual is wrong here. |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
Devil's Advocate here. . . .
What are the odds that there is some exit/add-on (purchased or "own-code") that traps the 806 when there is a steplib and uses the joblib if there is one?
My experience from many, many systems is as Enrico, Robert, and the manual have said - when there is a steplib, joblib is ignored for that step. |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
Hi,
Was reading just other Manual:
Quote: |
The STEPLIB DD statement is used to identify a program library to search first when attempting to locate programs executed during the job step. The STEPLIB can be placed anywhere in the step's JCL. More than one program library can be concatenated after the first one on a STEPLIB.
If a STEPLIB DD is specified in a job that also has a JOBLIB, the STEPLIB takes precedence when searching for a program. |
Revel,
You need to prove this
Quote: |
I completly disagree with above statement, Try to execute programs which is in JOBLIB and SYSTEM Default Library by having diffrent version. Try to find whether JCL has pick up which version ie either from JOBLIB or SYSTEM Default Library(Have STEPLIB, JOBLIB in JCL)..(I have tested this).. :o) |
post something like Enrico did, we are not against you - at times we were called as "tough public" though. |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
Hello again,
The program search order for MVS uses the following program libraries in the order given:
1. JOB Pack Area (already loaded programs)
2. Private task library, if specified.
3. STEPLIB library, if specified.
4. JOBLIB library, if specified, AND no STEPLIB is specified
5. Link Pack Area (PLPA)
6. System Link List (i.e., SYS1.LINKLIB and the data sets concatenated to it). |
|
Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006 Posts: 1702 Location: Australia
|
|
|
|
Hi,
for what it's worth, my findings are exactly the same as Enrico (tested)
Gerry |
|
Back to top |
|
|
Simon Jia
New User
Joined: 21 Nov 2008 Posts: 5 Location: China
|
|
|
|
step lib is used only for search priority.
for example, you have PGM1 in steplib and another same named PGM1 in the system lib, if you specify the step lib PGM1 in step lib gets run, if you do not specify the step lib the PGM1 in the system lib gets run. |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
What you say is true, but how does it apply/relate to the discussion about joblib versus steplib? |
|
Back to top |
|
|
revel
Active User
Joined: 05 Apr 2005 Posts: 135 Location: Bangalore/Chennai-INDIA
|
|
|
|
Hi All,
Then What this link says ??
www.ibmmainframes.com/about8374.html
Check it please..
Any how i am checking out above scenario, It will take couple of time, i will get back to you soon with answer ... :o) |
|
Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10872 Location: italy
|
|
|
|
if You can read, the majority of the posters on the link says exactly what I/more of us say,
quoting even the same paragraph of the manual,
You have there only one supporter that misread as You did the manual
but probably Your ethics tells to stand by the minorities |
|
Back to top |
|
|
revel
Active User
Joined: 05 Apr 2005 Posts: 135 Location: Bangalore/Chennai-INDIA
|
|
|
|
Enrico,
Thank you for wards, I will get back to you with answers... |
|
Back to top |
|
|
revel
Active User
Joined: 05 Apr 2005 Posts: 135 Location: Bangalore/Chennai-INDIA
|
|
|
|
Sorry Guys
For misundrestanding the concept and for misleading you people, I am really very sorry for this !!!!!! :O)
True It only check in STEPLIB Library then goes to SYS1.LINKLIB not in JOBLIB Library in case JCL has STEPLIB & JOBLIB..
Sorryyy..... |
|
Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10872 Location: italy
|
|
|
|
Hi Raghu!
what punishment do You prefer..
a good spanking
or that
all Your bytes lose their parity
|
|
Back to top |
|
|
revel
Active User
Joined: 05 Apr 2005 Posts: 135 Location: Bangalore/Chennai-INDIA
|
|
|
|
Enrico |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
enrico-sorichetti wrote: |
all Your bytes lose their parity |
In this Digital world..mercy amen..! |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
Quote: |
I am really very sorry for this |
Not to worry
These topics keep us on our toes, but we can be a tough crowd though. . .
d |
|
Back to top |
|
|
|