data txtname ;
filename txtname pipe  'dir  d:\new /b';
length txtname $20.;
infile txtname truncover;
input name $30.;
txtname=compress(name,'.txt');
call symput('count',compress(attrn(open('work.txtname','i'),'nobs')));
run;
%macro crackman (count);
%do i=1 %to &count.;
proc import datafile="d:\new \&i..txt"  out=a&i.; getnames=yes; run;
%end;
%mend crackman;
%crackman(&count.);

没有测试
这个程序师把文件夹的TXT文件导入生成相对应的SAS数据集，而不是把这么多TXT文件生成一个SAS数据集
不知道能不能帮助你