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

*/
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_POOLID = DEMO_STEM.LOCAL.sym_SN.sym_CU.sym_CCA.POOLID;
val_TLv = DEMO_STEM.LOCAL.sym_SN.sym_CU.sym_CCA.TierLevel;
val_pageCt = DEMO_STEM.LOCAL.sym_SN.sym_CU.sym_CCA.Used;
volTierCt = DEMO_STEM.LOCAL.sym_SN.sym_CU.sym_CCA.Tier.0;
IF (volTierCt /=2)&(volTierCt /=3) THEN DO
SAY ' 'RIGHT(val_Devn,4)','LEFT(val_Volser,6)||,
','val_SN','val_CU', 'val_CCA||,
','RIGHT(val_POOLID,3)','RIGHT(val_TLv,3);
ITERATE;
END;
sym_POOLID = 'POOL'||D2X(val_POOLID, 2);
val_RelocatePerCent = ,
DEMO_STEM.LOCAL.sym_SN.sym_POOLID.RelocatePerCent;
poolTierCt = DEMO_STEM.LOCAL.sym_SN.sym_POOLID.Tier.0;
IF DATATYPE(poolTierCt) /= 'NUM' THEN
poolTierCt = 0;
/* TierLevel TierRange MultiTier
* 3Tier 2Tier 3Tier 2Tier
* 0 1/2/3 1/2 Y Y
* 1 1 1 N N
* 2 1/2 1/2 Y Y
* 3 2 1/2 N Y
* 4 2/3 1/2 Y Y
* 5 3 2 N N
*/
TierRange.1 = '';
TierRange.2 = '';
TierRange.3 = '';
MultiTier = 'Y';
IF volTierCt=3 THEN DO /* 3tier? */
IF val_TLv/=3 & val_TLv/=4 & val_TLv/=5 THEN
TierRange.1 = 'Y';
IF val_TLv/=1 & val_TLv/=5 THEN
TierRange.2 = 'Y';
IF val_TLv/=1 & val_TLv/=2 & val_TLv/=3 THEN
TierRange.3 = 'Y';
IF val_TLv=1 | val_TLv=3 | val_TLv=5 THEN
MultiTier = 'N';
END;
ELSE IF volTierCt=2 THEN DO /* 2tier? */
IF val_TLv /= 5 THEN
TierRange.1 = 'Y';
IF val_TLv /= 1 THEN
TierRange.2 = 'Y';
IF val_TLv=1 | val_TLv=5 THEN
MultiTier = 'N';
END;
/*
* Calculate page in the tier range for relocate status recognition.
*/
TierRangePageCt = 0;
DO t=1 to volTierCt;
IF TierRange.t = 'Y' THEN DO
Sample scripts 266