SAS：导入一个文件夹中的所有txt格式数据

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

求教各位老师：
%macro directory(dir=);
%let rs=%sysfunc(filename(filref,&dir));
%let did=%sysfunc(dopen(&filref));
%let nobs=%sysfunc(dnum(&did));
%do i=1 %to &nobs.;
%let name=%qscan(%qsysfunc(dread(&did,&i)),1,.);
%let ext=%qscan(%qsysfunc(dread(&did,&i)),-1,.);
proc import out=&name. datafile="&dir.\&name..&ext"
dbms=tab replace;
getnames=no;
run;

/*这段程序是我加的*/
/*E:\股票数据 文件夹中的文件名为gp000001 , gp600012 , gp300010 等。。 每个文件的格式一样*/
/*想将导入的每个文件做一些处理，如gp000001，增加一变量（名称） 变量值等于000001，
再删除最后一行数据，或保留一段时间的数据*/
data a&name.;  
set &name.;
micheng=000001;
run;
/*另外再请教如何将处理过的数据集，全部串接到一个数据集中*/

%end;
%mend;
%directory(dir=E:\股票数据);


谢谢各位！！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：txt格式 文件夹 txt directory Director