Here is a little Rexx utility that I wrote to display a bunch of good stuff 
from the ASCB, including ASID in both hex and decimal.  Mostly it was used to 
explore 522 timeout issues, but it shows some cool stuff, plus shows you one 
way to make your way through the control blocks.

http://7cats.eu/downloads/d522.rexx.v3.05.txt

It runs under ISPF.  You just have to exec it.  I put all the ISPF stuff inside 
the code as data. ;-)

Kind regards,
Lindy

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf 
Of Sankaranarayanan, Vignesh
Sent: torstaina 4. helmikuuta 2016 13.03
To: [email protected]
Subject: Obtaining current ASID in REXX

Hi folks,

I'm looking for a piece of code in REXX to access the current ASID. I remember 
seeing this in one of the installation REXX'es that came with the BMC ICE for 
Control-M.
I'm hoping that one of you has had to do this in the past and can help me out 
here.

Ex:
If I'm running a REXX via a job, the output should be the ASID of the job.
If I'm running a REXX via a ISPF, the output should be the ASID of my logon 
procedure.

Thank you!

- Vignesh
Mainframe Infrastructure


MARKSANDSPENCER.COM
________________________________
Unless otherwise stated above:
Marks and Spencer plc
Registered Office:
Waterside House
35 North Wharf Road
London
W2 1NW

Registered No. 214436 in England and Wales.

Telephone (020) 7935 4422
Facsimile (020) 7487 2670

www.marksandspencer.com

Please note that electronic mail may be monitored.

This e-mail is confidential. If you received it by mistake, please let us know 
and then delete it from your system; you should not copy, disclose, or 
distribute its contents to anyone nor act in reliance on this e-mail, as this 
is prohibited and may be unlawful.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
[email protected] with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to