:)
/* REXX */
Say 'Bgn CPU: ' Sysvar('SYSCPU')
Say 'Bgn SRV: ' Sysvar('SYSSRV')
i = 0
Do 9999999
i = i + 1
End
Say 'End CPU: ' Sysvar('SYSCPU')
Say 'End SRV: ' Sysvar('SYSSRV')
Exit 0
First Tennessee Bank
Mainframe Technical Support
-----Original Message-----
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of
ITschak Mugzach
Sent: Tuesday, September 11, 2018 3:55 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Co-posted: Rexx performance measures
[External Email]
Bob, that's what I was expecting. please paste the code here. for some reason,
my code returns same values.
ITschak
On Tue, Sep 11, 2018 at 10:53 PM Jackson, Rob <rwjack...@firsttennessee.com>
wrote:
> Works for me just fine. Looping ten million times and incrementing a
> counter by one resulted in this:
>
> Bgn CPU: 68.66
> Bgn SRV: 2447864
> End CPU: 76.36
> End SRV: 2721588
>
> First Tennessee Bank
> Mainframe Technical Support
>
>
> -----Original Message-----
> From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On
> Behalf Of ITschak Mugzach
> Sent: Tuesday, September 11, 2018 3:36 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Co-posted: Rexx performance measures
>
> [External Email]
>
> I am trying to measure Rexx exec performance metrics. Elapse is easy
> Time('R') at start exec resets the counter and the second one reports
> the value. But how to measure CPU or service units? I tried
> SYSVAR('CPU') at beginning of exec and at end, thinking to do the
> calculation myself, but both returns the same value ... same behevior with
> SYSVAR('SYSSRV').
>
> I am a good developer, but i am not fooling my self I am SO good. what
> is the trick to return the service units consumed by the exec?
>
> ITschak
>
> --
> ITschak Mugzach
> *|** IronSphere Platform* *|* *Information Security Contiguous
> Monitoring for Legacy **| *
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> FIRST TENNESSEE
>
> Confidentiality notice:
> This e-mail message, including any attachments, may contain legally
> privileged and/or confidential information. If you are not the
> intended recipient(s), or the employee or agent responsible for
> delivery of this message to the intended recipient(s), you are hereby
> notified that any dissemination, distribution, or copying of this
> e-mail message is strictly prohibited. If you have received this
> message in error, please immediately notify the sender and delete this e-mail
> message from your computer.
>
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
--
ITschak Mugzach
*|** IronSphere Platform* *|* *Information Security Contiguous Monitoring for
Legacy **| *
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
