can any one give a sas code for this 'xl formula'

[Grandhi4]

Hi all,

This is one xl formula can any one give a sas code (in macros)

=SUM(IF(O7>0.5,0.5+0.5*(O7-0.5),O7), IF(P7>0.5, 0.5+0.5*(P7-0.5),P7),IF(Q7>0.5,0.5+0.5*(Q7-0.5),Q7),IF(R7>0.5,0.5+0.5*(R7-0.5),R7),IF(S7>0.5,0.5+0.5*(S7-0.5),S7),IF(T7>0.5,0.5+0.5*(T7-0.5),T7))

Thanks

suresh

[Keith]

I would use an array to do this in SAS, something along the following lines.

%let val=0.5;

data want;

input o7 p7 q7 r7 s7 t7;

array vars{*} o7--t7;

sumvars=0;

do i=1 to dim(vars);

      sumvars+ifn(vars{i}>&val.,&val.+&val.*(vars{i}-&val.),vars{i});

end;

drop i;

cards;

0.5   0.3   0.2   0.6   0.1   2

;

run;