Hello,

I have a slightly off topic question. I am running a rexx within USS as a
subtask (thread) of a java process. The thread has been started with a
different user (ie from the parent task). This all works fine. I am now in
the rexx and tried establishing the userid under which I am running using
the REXX function USERID(). The function returns the userid of the parent
task and not the user of the thread I am running under. 

I received the following suggestion from the TSO-REXX listserv:

ascbstor = storage(c2x(storage(224,4)),140)
asxbstor = storage(c2x(substr(ascbstor,109,4)),8)
@tcb = c2x(substr(asxbstor,5))
@jscb = c2x(right(storage(@tcb,x2d(b4)+4),4))
@ssib = c2x(right(storage(@jscb,x2d(13c)+4),4))
@sjb  = c2x(right(storage(@ssib,x2d(20)+4),4))
@jct  = c2x(right(storage(@sjb,x2d(24)+4),4))
parse value(storage(@jct,x2d(2c0))) with 289 jobid 297 443 acid 451

Unfortunate ACID does not contain the required value.

The value I am trying to find corresponds (for example) to the user shown in
the system 
log when a RACF access error occurs.

Now my question - does anyone know where or how I can find the user of the
subtask? The solution could be
either in rexx or assembler.

Many thanks.
Jon

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