HP XP Command View Advanced Edition Software - Manual (Page 272)

/*
* Display header information.
*/
SAY 'Tiering Policy Group Name : '||DEMO_STEM.TPG.ID;
SAY 'Monitor Interval Time(sec): '||opt_interval;
SAY '';
SAY 'Volume I/O statistics';
/*
* Get I/O statistics each interval time,
* and display I/O statistics values of all volumes in the TPG.
*/
getmsgrc = 0;
EndTime=TIME();
DO WHILE getmsgrc=0;
/*
* Get tiering policy setting values of volume in the TPG and
* tier status of volumes and pools in the TPG to REXX variables.
*/
CALL KTQSTATS "STEM(DEMO_STEM.) MSG(DEMO_MSG.)";
/*
* Check the return code to see if it is 0 or not.
*/
IF RESULT /= 0 THEN DO
CALL printErrorMessage "KTQSTATS" RESULT;
EXIT 8;
END;
IF DEMO_STEM.TPG.VOL.IO.Interval > 0 THEN DO;
StartTime = EndTime;
EndTime = TIME();
SAY ' -------------------------------------------------------';
SAY ' 'StartTime' - 'EndTime;
SAY ' -------------------------------------------------------';
SAY ' Devn,Volser,STORGRP ,SN ,CU,CCA'||,
',Tier1 IOPS,Tier2 IOPS,Tier3 IOPS';
DO i=1 to DEMO_STEM.TPG.VOL.0;
val_SN = DEMO_STEM.TPG.VOL.i.SerialNum;
val_CU = DEMO_STEM.TPG.VOL.i.CUNum;
val_CCA = DEMO_STEM.TPG.VOL.i.CCA;
sym_SN = 'SN' ||val_SN;
sym_CU = 'CU' ||val_CU;
sym_CCA = 'CCA'||val_CCA;
val_Devn = DEMO_STEM.LOCAL.sym_SN.sym_CU.sym_CCA.Devn;
val_Volser = DEMO_STEM.LOCAL.sym_SN.sym_CU.sym_CCA.Volser;
val_STORGRP = DEMO_STEM.LOCAL.sym_SN.sym_CU.sym_CCA.STORGRP;
/*
* If KTQSTATS is not first call,
* IO.diff has I/O count from last call.
*/
DO j=1 to 3;
val_iops.j=0;
END;
DO j=1 to DEMO_STEM.LOCAL.sym_SN.sym_CU.sym_CCA.Tier.0;
val_iops.j=DEMO_STEM.LOCAL.sym_SN.sym_CU.sym_CCA.Tier.j.IO.diff,
Sample scripts 272