data temp_value;
set Freq_Var;
retain N 1;
%if N le 3 %then %do;call symput("percent"||left(N),percent);call symput("X"||left(N),&&Var&i);N+1;%end;
run;
宏中红色字体的代码就是上段代码,一发表颜色就没有了,不好意思~~
data temp_value;
set Freq_Var;
retain N 1;
if N le 3 then do;
call symput("percent"||left(N),percent);call symput("X"||left(N),&&Var&i);
N+1;
end;
run;