folder下有n个sas数据集，按照modify时间升序，取最后3个数据集的name作为3个宏参数

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

folder下有n个sas数据集，按照modify时间升序，取最后3个数据集的name作为3个宏参数， sas 能做吗？

比如 C:\Users\Desktop\test  folder下面有4个数据集  dm.sas7bdat , ae.sas7bdat,  cm.sas7bdat , mh.sas7bdat ，最后modify的时间是October ‎23, ‎2014, ‏‎4:46:50 PM，  October ‎24, ‎2014, ‏‎4:46:50 PM，October ‎25, ‎2014, ‏‎4:46:50 AM,October 27, ‎2014, ‏‎4:46:50 PM.

想得到最后被modify的 三个宏变量 %let file1 =ae ;  &file2=cm; &file3=mh;

扫码加我 拉你入群

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

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

分享0 收藏1 回帖

关键词：folder sas数据集 modify Older name

看啊，
1. 先用libname句，例如：libname tmp 'D:.....';
2. 再去sashelp.vtable里找tmp库的数据集
3. 用call symputx函数把名称写到宏变量中（关键字：data _null_，_N_，cats等）

细节部分你自己完成啦

1. %macro getLastNdatasets(lib = sashelp, N = 3);
   
2.   proc contents data = &lib.._all_ noprint out = allcontents;
   
3.   run;
   
4. 
   
5.   proc sort data = allcontents out = last&N.(keep = libname memname modate) nodupkey;
   
6.     by libname memname descending modate;
   
7.   run;
   
8. /*
   
9.   proc sql noprint;
   
10.     select strip(catx('.', libname, memname)) into :last&N. separated by ', ' from last&N.(obs = &N.);
    
11.   quit;
    
12.   %put the last &N. dataset(s) should be &&last&N...;
    
13. */
    
14. 
    
15.   data _null_;
    
16.     set last&N.(obs = &N.) end = eof;
    
17.     call symputx(cats('file', _N_), memname);
    
18.     if eof then call symputx('totFile', _N_);
    
19. 
    
20. /*
    
21.     call execute('data ' || strip(memname) || ';');
    
22.     call execute('  set ' || strip(catx('.', libname, memname)) || ';');
    
23.     call execute('run;');
    
24. */
    
25.   run;
    
26. 
    
27.   %do i = 1 %to &totFile.;
    
28.     %put file&i. = &&file&i..;
    
29.   %end;
    
30. %mend;
    
31. 
    
32. %getLastNdatasets;

复制代码

mark一下，谢谢楼上的分享

感谢指导，非常受用！