你是要求此数据中每一个case在这２４个变量上的得分等于４的比例吗？如果是这样，你可以试试下面的命令

data temp;
input item1-item24;
datalines;
2 3 3 2 3 3 2 4 3 2 3 3 1 2 1 3 4 3 2 1 2 1 4 1
;
run;

data temp (drop=i);
set temp;
array itm(48) item1-item24 itemgtfour1-itemgtfour24;
do i=1 to 24;
if itm(i)=4 then itm(24+i)=1;
else itm(24+i)=0;
end;
propgt4=sum(of itemgtfour1-itemgtfour24)/24;   /****** 求大于4的变量站总变量的比例******/
run;

proc print data=temp;
run;