Date:         Tue, 30 Mar 1999 08:56:11 +0000
Reply-To:     Richard.Cook@PRUDENTIAL.CO.UK
Sender:       "SAS(r) Discussion" <SAS-L@UGA.CC.UGA.EDU>
From:         Richard Cooke <Richard.Cook@PRUDENTIAL.CO.UK>
Subject:      SYSUID
Content-Type: text/plain; charset=us-ascii

Further to my earlier response that the &SYSUID macro var is what you need. I
believe that this only works for SAS version 6.09E or later on MVS.
If you're running an earlier version then you can use the datastep below to get
the user id.
 data _null_;
      * CVT comms vector table address;
      cvtaddr=peek(16,4);
 
      * TCB first and last address location;
      tcbdw=peek(cvtaddr,4);
 
      * current TCB;
      curtcb=peek(tcbdw+4,4);
 
      * current jscb;
      jscb=peek(curtcb+180,4);
 
      * current jct;
      jct=peek(jscb+260,4);
 
      userid=peekc(jct+176,7);
      call symput('userid',userid);
      run;
 
Hope this might be of help.
 Richard Cooke
 (On contract at Prudential Insurance, Euston, London)
---------------------- Forwarded by Richard Cook/LONDON/Prudential on 03/30/99
09:46 AM ---------------------------
 
 
ownersasl0001 [SMTP.ownersa2]@SSW on 03/29/99 11:49:18 PM
To: "DDA.RFC-822=SAS-L@UGA.CC.UGA.EDU/P=Internet/A= /C=us"@SSW
cc:
bcc:
From:  ownersasl0001 [SMTP.ownersa2]@SSW
Location: , ,
Extension:
Date: 29 March 1999, 11:49 p.m.
 
 
SYSUID
 
Gerald Leahy <leahyg@PPRD.ABBOTT.COM>, in part, wrote:
 
>Does anyone know for certain how to get a user id from MVS?  The book
>says %SYSGET should work.  My friend claims %SYSGET does not work at
>all.  Is there an equivalent %SYSFUNC call?
 
 
Gerald,
 
Under MVS, there exists an automatic macro variable SYSJOBID, and it is
all you (or your friend) need. This is documented in the corresponding
Companion.
 
Kind regards,
Paul
 
******************
Paul M. Dorfman
Prudential
Medical Management
Jacksonville, FL
******************
 
 
 
 
"WorldSecure Server <prudential.co.uk>" made the following
 annotations on 03/30/99 09:58:03
------------------------------------------------------------------------------
 
[INFO] -- Access Manager:
This email is confidential and should not be used by anyone who is not
the original intended recipient. Prudential cannot accept liability for
statements made which are clearly the sender's own and not made on
behalf of the Prudential. In addition no statement should be construed
as giving investment advice within or outside the United Kingdom.
 
 =============================================================================