Re: Capping info

2010-03-25 Thread Mark Wheeler

I wrote REXX functions B2C, B2D, B2X, C2B, D2B, and X2B years ago. For example:

/*
C2B
 
++
||
| C2B(string)|
||
++
 
Character to Binary.  Converts a character string to its binary
representation.  The data may be of any length.
 
Here are some examples:
 
  C2B('72s') +'0111001010100010'
  C2B('0123'x)   +'000100100011'
 
*/
 
if arg() ^= 1 then  /* Only one argument is valid  */
   return /* Incorrect call to routine */
 
arg chars
 
return x2b(c2x(chars))


If I had it to do over again, I'd probably imbed a PIPE command per Bruce's 
example:

/* C2B EXEC */

arg chars

'PIPE VAR CHARS | SPECS 1-* C2B 1 | VAR BINARY'

return binary

 

Mark Wheeler 
 
> Date: Thu, 25 Mar 2010 09:48:58 -0400
> From: bjhay...@gmail.com
> Subject: Re: Capping info
> To: IBMVM@LISTSERV.UARK.EDU
> 
> Ahh... Forgot that "c2b" was only in the internal Rexx functions
> package. So, use Pipes instead:
> 'PIPE var result | specs 36.1 c2b 1 | var lparchar'
> 
> On Thu, Mar 25, 2010 at 9:38 AM, Frank M. Ramaekers
>  wrote:
> > C2B?
> >
> >20 +++ lparchar=c2b(substr(result,36,1))
> > DMSREX478E Error 43 running STSIX EXEC, line 20: Routine not found
> >
> >
> > Frank M. Ramaekers Jr.
> >
> >
> >
> > -Original Message-
> > From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On 
> > Behalf Of Bruce Hayden
> > Sent: Thursday, March 25, 2010 7:33 AM
> > To: IBMVM@LISTSERV.UARK.EDU
> > Subject: Re: Capping info
> >
> > STSI can tell you if you are capped, but it can't tell you the weight.
> >  Borrowing from the STSIUSE SAMPEXEC on MAINT 193:
> >
> > /*
> >  * Logical-partition CPUs*
> >  */
> > say 'STSI(2,2,2)2.2.2.'
> > result = stsi(2,2,2)
> > address command 'PIPE',
> >   '|  var result',
> >   '|  specs',
> >   '/LPAR Number:/ 1  33.2  c2x nw write',
> >   '/LCPUC:  / 1  36.1  c2x nw write',
> >   '/Total LCPU Count:   / 1  37.2  c2d nw left write',
> >   '/Conf. LCPU Count:   / 1  39.2  c2d nw left write',
> >   '/SB LCPU Count:  / 1  41.2  c2d nw left write',
> >   '/Resv. LCPU Count:   / 1  43.2  c2d nw left write',
> >   '/Logical-Partition Name: / 1  45.8  nw write',
> >   '/Logical-Partition CAF:  / 1  53.4  c2d nw left write',
> >   '/Ded. LCPU Count:/ 1  73.2  c2d nw left write',
> >   '/Shr. LCPU Count:/ 1  75.2  c2d nw left write',
> >   '|  cons'
> > lparchar=c2b(substr(result,36,1))
> > say 'LPAR characteristics:' lparchar
> > If substr(lparchar,1,1)=1 then say 'CPUs are dedicated'
> > If substr(lparchar,2,1)=1 then say 'CPUs are shared'
> > If substr(lparchar,3,1)=1 then say 'CPUs are limited'
> >
> >
> >
> > --
> > Bruce Hayden
> > z/VM and Linux on System z ATS
> > IBM, Endicott, NY
> >
> > _
> 
> -- 
> Bruce Hayden
> z/VM and Linux on System z ATS
> IBM, Endicott, NY
  
_
Hotmail: Trusted email with Microsoft’s powerful SPAM protection.
http://clk.atdmt.com/GBL/go/210850552/direct/01/

Re: Capping info

2010-03-25 Thread Frank M. Ramaekers
I just used X2B(C2X(substr(result,36,1)))

 
Frank M. Ramaekers Jr.
 
 

-Original Message-
From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On Behalf 
Of Bruce Hayden
Sent: Thursday, March 25, 2010 8:49 AM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: Capping info

Ahh... Forgot that "c2b" was only in the internal Rexx functions
package.  So, use Pipes instead:
'PIPE var result | specs 36.1 c2b 1 | var lparchar'

On Thu, Mar 25, 2010 at 9:38 AM, Frank M. Ramaekers
 wrote:
> C2B?
>
>    20 +++ lparchar=c2b(substr(result,36,1))
> DMSREX478E Error 43 running STSIX EXEC, line 20: Routine not found
>
>
> Frank M. Ramaekers Jr.
>
>
>
> -Original Message-
> From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On 
> Behalf Of Bruce Hayden
> Sent: Thursday, March 25, 2010 7:33 AM
> To: IBMVM@LISTSERV.UARK.EDU
> Subject: Re: Capping info
>
> STSI can tell you if you are capped, but it can't tell you the weight.
>  Borrowing from the STSIUSE SAMPEXEC on MAINT 193:
>
> /*
>  * Logical-partition CPUs                                    *
>  */
> say 'STSI(2,2,2)2.2.2.'
> result = stsi(2,2,2)
> address command 'PIPE',
>   '|  var result',
>   '|  specs',
>       '/LPAR Number:                / 1  33.2  c2x nw write',
>       '/LCPUC:                      / 1  36.1  c2x nw write',
>       '/Total LCPU Count:           / 1  37.2  c2d nw left write',
>       '/Conf. LCPU Count:           / 1  39.2  c2d nw left write',
>       '/SB LCPU Count:              / 1  41.2  c2d nw left write',
>       '/Resv. LCPU Count:           / 1  43.2  c2d nw left write',
>       '/Logical-Partition Name:     / 1  45.8      nw write',
>       '/Logical-Partition CAF:      / 1  53.4  c2d nw left write',
>       '/Ded. LCPU Count:            / 1  73.2  c2d nw left write',
>       '/Shr. LCPU Count:            / 1  75.2  c2d nw left write',
>   '|  cons'
> lparchar=c2b(substr(result,36,1))
> say 'LPAR characteristics:' lparchar
> If substr(lparchar,1,1)=1 then say 'CPUs are dedicated'
> If substr(lparchar,2,1)=1 then say 'CPUs are shared'
> If substr(lparchar,3,1)=1 then say 'CPUs are limited'
>
>
>
> --
> Bruce Hayden
> z/VM and Linux on System z ATS
> IBM, Endicott, NY
>
> _

-- 
Bruce Hayden
z/VM and Linux on System z ATS
IBM, Endicott, NY

_
This message contains information which is privileged and confidential and is 
solely for the use of the
intended recipient. If you are not the intended recipient, be aware that any 
review, disclosure,
copying, distribution, or use of the contents of this message is strictly 
prohibited. If you have
received this in error, please destroy it immediately and notify us at 
privacy...@ailife.com.


Re: Capping info

2010-03-25 Thread Bruce Hayden
Ahh... Forgot that "c2b" was only in the internal Rexx functions
package.  So, use Pipes instead:
'PIPE var result | specs 36.1 c2b 1 | var lparchar'

On Thu, Mar 25, 2010 at 9:38 AM, Frank M. Ramaekers
 wrote:
> C2B?
>
>    20 +++ lparchar=c2b(substr(result,36,1))
> DMSREX478E Error 43 running STSIX EXEC, line 20: Routine not found
>
>
> Frank M. Ramaekers Jr.
>
>
>
> -Original Message-
> From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On 
> Behalf Of Bruce Hayden
> Sent: Thursday, March 25, 2010 7:33 AM
> To: IBMVM@LISTSERV.UARK.EDU
> Subject: Re: Capping info
>
> STSI can tell you if you are capped, but it can't tell you the weight.
>  Borrowing from the STSIUSE SAMPEXEC on MAINT 193:
>
> /*
>  * Logical-partition CPUs                                    *
>  */
> say 'STSI(2,2,2)2.2.2.'
> result = stsi(2,2,2)
> address command 'PIPE',
>   '|  var result',
>   '|  specs',
>       '/LPAR Number:                / 1  33.2  c2x nw write',
>       '/LCPUC:                      / 1  36.1  c2x nw write',
>       '/Total LCPU Count:           / 1  37.2  c2d nw left write',
>       '/Conf. LCPU Count:           / 1  39.2  c2d nw left write',
>       '/SB LCPU Count:              / 1  41.2  c2d nw left write',
>       '/Resv. LCPU Count:           / 1  43.2  c2d nw left write',
>       '/Logical-Partition Name:     / 1  45.8      nw write',
>       '/Logical-Partition CAF:      / 1  53.4  c2d nw left write',
>       '/Ded. LCPU Count:            / 1  73.2  c2d nw left write',
>       '/Shr. LCPU Count:            / 1  75.2  c2d nw left write',
>   '|  cons'
> lparchar=c2b(substr(result,36,1))
> say 'LPAR characteristics:' lparchar
> If substr(lparchar,1,1)=1 then say 'CPUs are dedicated'
> If substr(lparchar,2,1)=1 then say 'CPUs are shared'
> If substr(lparchar,3,1)=1 then say 'CPUs are limited'
>
>
>
> --
> Bruce Hayden
> z/VM and Linux on System z ATS
> IBM, Endicott, NY
>
> _

-- 
Bruce Hayden
z/VM and Linux on System z ATS
IBM, Endicott, NY


Re: Capping info

2010-03-25 Thread Frank M. Ramaekers
C2B?

20 +++ lparchar=c2b(substr(result,36,1))   
DMSREX478E Error 43 running STSIX EXEC, line 20: Routine not found

 
Frank M. Ramaekers Jr.
 
 

-Original Message-
From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On Behalf 
Of Bruce Hayden
Sent: Thursday, March 25, 2010 7:33 AM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: Capping info

STSI can tell you if you are capped, but it can't tell you the weight.
 Borrowing from the STSIUSE SAMPEXEC on MAINT 193:

/*
 * Logical-partition CPUs*
 */
say 'STSI(2,2,2)2.2.2.'
result = stsi(2,2,2)
address command 'PIPE',
   '|  var result',
   '|  specs',
   '/LPAR Number:/ 1  33.2  c2x nw write',
   '/LCPUC:  / 1  36.1  c2x nw write',
   '/Total LCPU Count:   / 1  37.2  c2d nw left write',
   '/Conf. LCPU Count:   / 1  39.2  c2d nw left write',
   '/SB LCPU Count:  / 1  41.2  c2d nw left write',
   '/Resv. LCPU Count:   / 1  43.2  c2d nw left write',
   '/Logical-Partition Name: / 1  45.8  nw write',
   '/Logical-Partition CAF:  / 1  53.4  c2d nw left write',
   '/Ded. LCPU Count:/ 1  73.2  c2d nw left write',
   '/Shr. LCPU Count:/ 1  75.2  c2d nw left write',
   '|  cons'
lparchar=c2b(substr(result,36,1))
say 'LPAR characteristics:' lparchar
If substr(lparchar,1,1)=1 then say 'CPUs are dedicated'
If substr(lparchar,2,1)=1 then say 'CPUs are shared'
If substr(lparchar,3,1)=1 then say 'CPUs are limited'

On Wed, Mar 24, 2010 at 5:28 PM, Kris Buelens  wrote:
> No CP command as far as I know, STSI: I don't think so.
>
> But, performance monitors report this in their LPAR reports.  If you've got
> Perfkit:  PIPE VMC PERFSVM  |.
>
> Hence you could use a PIPE to listen to the monitor records and analyse it
> yourself.  You must be prepared to unravel raw monitor records
>
> 2010/3/24 Alain Benveniste 
>>
>> Is there a way to get the info if my VM lpar is capped or not and what is
>> weight ?
>>
>> Could be great to see these info with the indicate cmd...?
>>
>> This info is needed for us to avoid to run licenced products with more
>> power than we pay for
>> using them...not to be lawfull...
>>
>> Alain Benveniste
>
>
>
> --
> Kris Buelens,
> IBM Belgium, VM customer support
>



-- 
Bruce Hayden
z/VM and Linux on System z ATS
IBM, Endicott, NY

_
This message contains information which is privileged and confidential and is 
solely for the use of the
intended recipient. If you are not the intended recipient, be aware that any 
review, disclosure,
copying, distribution, or use of the contents of this message is strictly 
prohibited. If you have
received this in error, please destroy it immediately and notify us at 
privacy...@ailife.com.


Re: Capping info

2010-03-25 Thread Bruce Hayden
STSI can tell you if you are capped, but it can't tell you the weight.
 Borrowing from the STSIUSE SAMPEXEC on MAINT 193:

/*
 * Logical-partition CPUs*
 */
say 'STSI(2,2,2)2.2.2.'
result = stsi(2,2,2)
address command 'PIPE',
   '|  var result',
   '|  specs',
   '/LPAR Number:/ 1  33.2  c2x nw write',
   '/LCPUC:  / 1  36.1  c2x nw write',
   '/Total LCPU Count:   / 1  37.2  c2d nw left write',
   '/Conf. LCPU Count:   / 1  39.2  c2d nw left write',
   '/SB LCPU Count:  / 1  41.2  c2d nw left write',
   '/Resv. LCPU Count:   / 1  43.2  c2d nw left write',
   '/Logical-Partition Name: / 1  45.8  nw write',
   '/Logical-Partition CAF:  / 1  53.4  c2d nw left write',
   '/Ded. LCPU Count:/ 1  73.2  c2d nw left write',
   '/Shr. LCPU Count:/ 1  75.2  c2d nw left write',
   '|  cons'
lparchar=c2b(substr(result,36,1))
say 'LPAR characteristics:' lparchar
If substr(lparchar,1,1)=1 then say 'CPUs are dedicated'
If substr(lparchar,2,1)=1 then say 'CPUs are shared'
If substr(lparchar,3,1)=1 then say 'CPUs are limited'

On Wed, Mar 24, 2010 at 5:28 PM, Kris Buelens  wrote:
> No CP command as far as I know, STSI: I don't think so.
>
> But, performance monitors report this in their LPAR reports.  If you've got
> Perfkit:  PIPE VMC PERFSVM  |.
>
> Hence you could use a PIPE to listen to the monitor records and analyse it
> yourself.  You must be prepared to unravel raw monitor records
>
> 2010/3/24 Alain Benveniste 
>>
>> Is there a way to get the info if my VM lpar is capped or not and what is
>> weight ?
>>
>> Could be great to see these info with the indicate cmd...?
>>
>> This info is needed for us to avoid to run licenced products with more
>> power than we pay for
>> using them...not to be lawfull...
>>
>> Alain Benveniste
>
>
>
> --
> Kris Buelens,
> IBM Belgium, VM customer support
>



-- 
Bruce Hayden
z/VM and Linux on System z ATS
IBM, Endicott, NY


Re: Capping info

2010-03-24 Thread Alan Altmark
On Wednesday, 03/24/2010 at 04:55 EDT, Alain Benveniste 
 wrote:
> Is there a way to get the info if my VM lpar is capped or not and what 
is
> weight ?
> 
> Could be great to see these info with the indicate cmd...?
> 
> This info is needed for us to avoid to run licenced products with more
> power than we pay for using them...not to be lawfull...

Since you're talking about caps and pricing, you must be talking about 
standard engines, not IFLs.  In that case, look at DIAGNOSE 0x2E0.  As 
mentioned in the Prog. Services book, you'll be wanting the IRAQVS macro 
in the HCPGPI maclib.

Alan Altmark
z/VM Development
IBM Endicott


Re: Capping info

2010-03-24 Thread Romanowski, John (OFT)
the perfkit FCX126 LPAR screen shows LPAR weight.
one way to display it is run this to see menu choice 8 - the  FCX126 LPAR screen

PERFKIT FCONAPPC FCXRES00 8

From: The IBM z/VM Operating System [ib...@listserv.uark.edu] On Behalf Of 
Alain Benveniste [a.benveni...@free.fr]
Sent: Wednesday, March 24, 2010 4:54 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Capping info

Is there a way to get the info if my VM lpar is capped or not and what is 
weight ?

Could be great to see these info with the indicate cmd...?

This info is needed for us to avoid to run licenced products with more power 
than we pay for
using them...not to be lawfull...

Alain Benveniste


This e-mail, including any attachments, may be confidential, privileged or 
otherwise legally protected. It is intended only for the addressee. If you 
received this e-mail in error or from someone who was not authorized to send it 
to you, do not disseminate, copy or otherwise use this e-mail or its 
attachments.  Please notify the sender immediately by reply e-mail and delete 
the e-mail from your system.


Re: Capping info

2010-03-24 Thread Kris Buelens
No CP command as far as I know, STSI: I don't think so.

But, performance monitors report this in their LPAR reports.  If you've got
Perfkit:  PIPE VMC PERFSVM  |.

Hence you could use a PIPE to listen to the monitor records and analyse it
yourself.  You must be prepared to unravel raw monitor records

2010/3/24 Alain Benveniste 

> Is there a way to get the info if my VM lpar is capped or not and what is
> weight ?
>
> Could be great to see these info with the indicate cmd...?
>
> This info is needed for us to avoid to run licenced products with more
> power than we pay for
> using them...not to be lawfull...
>
> Alain Benveniste
>



-- 
Kris Buelens,
IBM Belgium, VM customer support


Capping info

2010-03-24 Thread Alain Benveniste
Is there a way to get the info if my VM lpar is capped or not and what is
 weight ?

Could be great to see these info with the indicate cmd...?

This info is needed for us to avoid to run licenced products with more po
wer than we pay for 
using them...not to be lawfull...

Alain Benveniste