如何自动识别将数据库中字符型变量批量变为数值型变量 [推广有奖]

data a;
input id name $ drgif dn msd $;
cards;
1 zhang 1 1 white
2 li 2 1 red
3 chen 2 2 one
;
run;
proc contents data=a out=varname noprint varnum; run;
proc sql noprint;
select name into : varlist separated by ',' from varname;
quit;
%macro split/parmbuff;
%do i=1 %to 5;
  %let var&i=%scan(%bquote(&syspbuff),&i);
  %global var&i;
%end;
%mend;
%split(&varlist)
%macro check;
data b;
set a;
%do i=1 %to 5;
if anyalpha(&&var&i)=0 then &&var&i.._n=input(&&var&i,best.);
%end;
run;
%mend;
%check
proc print data=b;run;

不要意思，刚才理解错误，您的macro是可以的，还有个问题，比如数据库中某个变量绝大部分都是数字，但有个别是NK或者其他标示，能否把这类变量中NK变为缺失，然后也转化为数值型呢？求教，不甚感激。

data a;
input id name drgif dn msd;
cards;
1 zhang 1  1    白细胞
2 li        2  .     红细胞
3 chen  2  NK  1个
;
run;

其他必要的不必要的data 可以根据需要clean up

厉害！是的，我试试效率，您也是医药的？

非常高兴有机会跟您学习，还有个小问题咨询您，变量类型改变后，变量的位置也会有变化，有办法保证变量位置不变吗？不甚感激

请问您、如果有多个数据集（870个）时，如何批量处理呢。SAS新人，求教了。

额，只要一个数据集能做，只能剩下的869个数据集和第一个数据集情况一样（或者有微小的差异），都可以用宏做

因为宏不就是帮助我们自动写语句的啊，例如你870个数据集，名字都有规律，你在调用那个宏的时候，用一个%do %to就可以循环调用，变动的只是数据集名字的宏参数

谢谢啦。问题已经解决。