On Thu, 27 May 2010 14:40:38 -0400, zMan <[email protected]> wrote:
>How do I determine what userid I'm running under from an assembler >application in z/OS batch? The Rexx USERID() function works, but I'd rather >not call a Rexx program just to fetch me the userid. > >Some Googling hasn't turned anything up, but it's a pretty generic request, >lots of (useless) hits. >-- I get it from the ACEE. ASCB --> ASXB --> ACEE Have a look at the data areas manuals, or you can have a look at this rexx example to see the offsets: /* 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://home.flash.net/~mzelden/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
