Wayne,

Well, for one thing, you don't have addressability to the SRB.

I've been watching this thread for a while. I would set the purge TCB and then 
locate it using the LCCA.

Tom Harper

----- Original Message -----
From: IBM Mainframe Discussion List <[email protected]>
To: [email protected] <[email protected]>
Sent: Wed Dec 17 10:52:57 2008
Subject: Re: Find TCB address from SRB

PSATOLD points to the currently dispatched TCB.  Since a TCB is not 
dispatched, the value is zero (by definition).  What is so hard about 
    USING PSA,0
    L             R7,PSATOLD
    ST        R7,SRBPTCB

Before the IEAMSCHD?

===============================================
Wayne Driscoll
OMEGAMON XE for DB2 Development/L3 Support
[email protected]
(O) 630 663 0719
(M) 630 247 1632
===============================================



Miklos Szigetvari <[email protected]> 
Sent by: IBM Mainframe Discussion List <[email protected]>
12/17/2008 08:10 AM
Please respond to
IBM Mainframe Discussion List <[email protected]>


To
[email protected]
cc

Subject
Re: Find TCB address from SRB






Hi

I pass actually, but as I need the TCB address,  I'm in a deep call 
chain, it would be simple to use something like PSATOLD .

Rob Scott wrote:

>Miklos,
>
>Why not just pass the TCB address as part of the parameters you pass to 
the SRB ? 
>
>
>Rob Scott
>Rocket Software, Inc
>275 Grove Street
>Newton, MA 02466
>617-614-2305
>[email protected]
>
>
>-----Original Message-----
>From: IBM Mainframe Discussion List [mailto:[email protected]] On 
Behalf Of Miklos Szigetvari
>Sent: 17 December 2008 11:58
>To: [email protected]
>Subject: Find TCB address from SRB
>
>Hi
>
>Try to find out the schedule TCB address in the middle of an SRB started 
via IEAMSCHD.
>I would need something like the PSATOLD
>
>--
>Miklos Szigetvari
>
>Development Team
>ISIS Information Systems Gmbh
>tel: (+43) 2236 27551 570
>Fax: (+43) 2236 21081 
>
>E-mail: [email protected] 
>
>Info: [email protected]
>Hotline: +43-2236-27551-111 
>
>Visit our Website: http://www.isis-papyrus.com
-- 
Miklos Szigetvari



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

Reply via email to