data c9501;
input name $ sex $ math chinese;
cards;
LiMing M 92 98
ZhYIH F 89 95
WSIM M 86 90
;
run;
proc univariate data=c9501;
var math;
ods output moments=a;
run;
data va;
set a;
keep var;
if _n_=3 then
var=cValue2;
else delete;
run;
options symbolgen=1;
data _null_;
set Va;
call symput('v',var);
run;
data i;
i=&v;
run;