|
地板

楼主 |
发表于 2011-10-7 09:12:33
|
只看该作者
Re: 如何将数据集中的数值型转换为字符型?保留和数值型的位数一样,谢谢!
两种土办法:
[code:1gjx6w1t]*the one;
data _null_;
set a;
varlen=vlength(x);
call symputx('n',varlen);
stop;
run;
data b;
set a(rename=(x=_x));
x=put(_x,best&n..);
run;
*the another one;
data _a;set a;varlen=vlength(x);run;
%macro varlen;
%let id=%sysfunc(open(_a));
%let nobs=%sysfunc(attrn(&id,nobs));
%syscall set(id);
%do i=1 %to &nobs;
%let rc=%sysfunc(fetchobs(&id,&i));
data c(drop=varlen);
set _a(rename=(x=_x));
x=put(_x,best&varlen..);
run;
%end;
%let id=sysfunc(close(&id));
%mend;
%varlen;
[/code:1gjx6w1t] |
|