JES2 exit 20 on z/OS 1.8 - question.

2007-09-04 Thread McKown, John 
I have a JES2 exit 20 on z/OS 1.6. What is does is look at the
submitting user and set a job selection priority for certain jobs, but
only if submitted by CA7. It does this by chaining from the DCT to the
ASCB and checking the STC name. This doesn't work on 1.8 because the DCT
not longer contains a pointer to the "owning" ASCB. However, it appears
that the XPL points to a new control block called the JRW. This control
block contains a field called the JRWSJNAM. However, I don't really know
that this is the jobname of the job(stc) which owns the DCT. Does
anybody out there know if this field contains the owner or not?

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: JES2 exit 20 on z/OS 1.8 - question.

2007-09-04 Thread Tom Schmidt 
On Tue, 4 Sep 2007 13:46:33 -0500, McKown, John wrote:

>I have a JES2 exit 20 on z/OS 1.6. What is does is look at the
>submitting user and set a job selection priority for certain jobs, but
>only if submitted by CA7. It does this by chaining from the DCT to the
>ASCB and checking the STC name. This doesn't work on 1.8 because the DCT
>not longer contains a pointer to the "owning" ASCB. However, it appears
>that the XPL points to a new control block called the JRW. This control
>block contains a field called the JRWSJNAM. However, I don't really know
>that this is the jobname of the job(stc) which owns the DCT. Does
>anybody out there know if this field contains the owner or not?
 
Look at JES2 exit 50 instead of exit 20 for your purpose.  (50 is used when the 
input source is the internal reader.)  JRWSJNAM looks good in that context 
(although you might also just be able to jump to the ASCB directly from 
PSAAOLD in the exit 50 environment's case).  
 
-- 
Tom Schmidt 
Madison, WI

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html