Re: BMC iCAP

2016-12-05 Thread Ricardo Gomez Ramirez
We are using BMC iCAP


--
*Ricardo Gomez* 
rica...@gomezr.com

2016-11-29 9:38 GMT-06:00 J Ellis :

> Is anyone using the BMC iCAP tool ?
> if you are and would like to chat about it, please email me or we can chat
> here on the list.
> thanks,
> Joe
>
> --
> 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


Re: IBM Mainframe

2015-11-29 Thread Ricardo Gomez Ramirez
2015-11-26 5:51 GMT-06:00 John McKown :​

That's definitely true at the company I'm working for. Basically, the
> company wants "ad hoc" workers for some project. But they don't seem to
> have any concern about "maintenance" or having people on staff who
> understand how things work. They want I.T. to be like the water/sewage
> company or electricity. Or maybe like plumbers. Call when you have a
> problem. Too bad, for them, that I.T. tends to be more "customized" and you
> can't just unplug a programmer from one job and plug him into another,
> unlike a light bulb or a lamp.


Definitely I can not be more agree with you, I'm 39 with 21 years of
experience in mainframe and I'm worried about the future because employers
want people with all the experience but they wanna to pay like newbies.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


REXX to know the CPU and MSU consumption.

2015-11-29 Thread Ricardo Gomez Ramirez
I am currently programming a REXX to let me know the current consumption of
my system MSU and the 4HRA. So far I have achieved:

- Get the SysName
- Get the model and type
- Capacity defined for the LPAR's MSU
- 4HRA
- And whether the LPAR is capped or not

The rexx I would not have invented it, I took fragments of several sites
where the end all read the Resource Control Table.

However, one thing that I'd like but I have not found anywhere is how to
extract the number of  MSU's that are active (in use) at that time. The
value I'm looking for is the one in "MSU Act" column at CPC screen, Option
3> 3 at RMF Monitor III.

With this, the specific question is how to know the current number of MSU's
a partition (LPAR) is consuming?

As support to help others, I share the rexx I'm currently using:

/* REXX */
/* Trace ?r  */
/*/
CVT  = C2d(Storage(10,4))/* point to CVT */
RMCT = C2d(Storage(D2x(CVT+604),4))  /* point to RMCT*/
RCT  = C2d(Storage(D2x(RMCT+228),4)) /* Resource Control Tbl */
RMCTCCT  = C2d(Storage(D2x(RMCT+4),4))   /* cpu mgmt control tbl */

CCVUTILP = C2d(Storage(D2x(RMCTCCT+102),2))  /* CPU Utilization  */
RCTLACS  = C2d(Storage(D2x(RCT+196),4))  /* 4 hr MSU average */
RCTIMGWU = C2d(Storage(D2x(RCT+28),4))   /* Image defined MSUs   */
RCTCECWU = C2d(Storage(D2x(RCT+32),4))   /* CEC MSU Capacity */
/*/
/*  The CPU model is stored in packed decimal format with no sign,   */
/*  so to make the model printable, it needs to be converted back*/
/*  to hex.  */
MODEL= C2d(Storage(D2x(CVT - 6),2))  /* point to cpu model   */
MODEL= D2x(MODEL)/* convert back to hex  */
/*/

CURRDATE = Date('S')
CURRTIME = Time()
SYSNAME  = MVSVAR('SYSNAME')
CAPPED   = 'N'

PERCENT  = Format((RCTLACS/RCTIMGWU)*100,3,2)

If RCTLACS <> 0 then do
  If RCTLACS >= RCTIMGWU & RCTIMGWU <> RCTCECWU then ,
CAPPED = 'Y'
End

say SYSNAME CURRDATE CURRTIME,
'CpuModel='MODEL,
'MSU='RCTIMGWU,
'CPU_Utyl='CCVUTILP'%',
'4HRA='RCTLACS,
'Limit='PERCENT'%',
'Capp?='CAPPED

​Regards.
​

--
*Ricardo Gomez*
rica...@gomezr.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN