cool
z9 bc 2096 2 engines

 4 *-* CVT  = STORAGE(10,4)               
  >>>   "?:: "                           
5 *-* RMCT = STORAGE(D2X(C2D(CVT)+604),4)
  >>>   "?o??"                           
6 *-* SU   = STORAGE(D2X(C2D(RMCT)+64),4)
  >>>   "????"                           
7 *-* SU   = 16000000/C2D(SU)            
  >>>   "8743.1694"                      


Ken Klein
Sr. Systems Programmer
Kentucky Farm Bureau Insurance - Louisville
[email protected]
502-495-5000 x7011

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On
Behalf Of Errol Van staden
Sent: Friday, July 17, 2009 6:42 AM
To: [email protected]
Subject: Re: Converting CPU Time to MIPS

A bit late on this maybe but:

Determine the SU per second of your machine

You can get this with the following REXX code

CVT  = STORAGE(10,4)                         
RMCT = STORAGE(D2X(C2D(CVT)+604),4)          
SU   = STORAGE(D2X(C2D(RMCT)+64),4)          
SU   = 16000000/C2D(SU)                      

For a 301 this would be 21857.9235

1 CPU second is therefor 21857.9235 Service Units

Divide this figure by 48.5 to get MIPS = 450.678835

Check that this correct by consulting Gartner etc and adjust the 48.5
more accurately

Use the actual Transaction CPU time to get the percentage of the 450
MIPS used E.G .002 secs = .9 MIPS

----------------------------------------------------------------------
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

----------------------------------------------------------------------
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

Reply via email to