'Content-type: text/html; charset=iso-8859-1'/# phl84/001.fnc

now exp phl_acv ,'TPR='v10, ,'TPR=ZZZ' 5 1 Isis_Key Isis_Postings Isis_Posting 977,4001 e1:=val(v2), s2:=(v1*4), ,if ref(['phl_acv']val(v3^m),s(mhu,v30.26,mpl)):s2 then ,ref(['phl_acv']val(v3^m),v30/) ,fi 1