MPE CI Programming for 7.5

July 22, 2008
Page 60
hp e3000
strategy
MPE version
PARM vers_parm=!hprelversion Versscript
# react to MPE version string
setvar vers "!vers_parm
# convert to integer, e.g.. "C.65.02" => 6502
setvar vers str(vers,3,2) + rht(vers,2)
setvar vers !vers
if vers >= 7000 then
echo On 7.0!
elseif vers >= 6500 then
echo On 6.5!
elseif vers >= 6000 then
echo On 6.0!
endif