/* REXX IPL PARAMETERS */
STUF=SYSCPUS('CPUS.')
SAY CPUS.0
DO X = 1 TO CPUS.0
SAY 'CPU ' X ' = ' CPUS.X
END
Jon L. Veilleux
veilleu...@aetna.com
(860) 636-9179
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of
Bob Shannon
Sent: Friday, March 12, 2010 12:56 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Real CPU Id
STSI instruction or CSRSI callable service.
Bob Shannon
Rocket Software
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to
lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at
http://bama.ua.edu/archives/ibm-main.html
This e-mail may contain confidential or privileged information. If
you think you have received this e-mail in error, please advise the
sender by reply e-mail and then delete this e-mail immediately.
Thank you. Aetna
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
