On Thu, 15 Dec 2011 08:40:08 -0600, Ron Thomas <[email protected]> wrote:
>Hi.
>
>How to find the security group my id resides from TSO?
>
>Regards
>Ron
If RACF, you should be able to list your own USERID - "TSO LU userid"
Or run this exec:
/* REXX */
ASCB = C2d(Storage(224,4)) /* point to ASCB */
ASXB = C2d(Storage(D2x(ASCB+108),4)) /* point to ASXB */
ACEE = C2d(Storage(D2x(ASXB+200),4)) /* point to ACEE */
USER = Storage(D2x(ACEE+21),8) /* point to USERID */
GROUP = Storage(D2x(ACEE+30),8) /* point to GROUP */
Say 'The USERID in the ACEE is:' USER
Say 'The GROUP in the ACEE is:' GROUP
Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS
mailto:[email protected]
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html
Systems Programming expert at http://expertanswercenter.techtarget.com/
----------------------------------------------------------------------
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
