如何在SAS里用marco 导入数据

大家好，我现在有300组csv数据，分别是：shanghai001-shanghai100， london001-london100，newyork001-newyork100；

我现在的导入code 如下：

1. data shanghai001;                                   
   
2. infile  'H:\shanghai001.csv
   
3. '   delimiter   =   ',' DSD lrecl=32767 firstobs=2  ;                           
   
4. 
   
5. informat    Date_L_ DATE11. ;                              
   
6. informat    Time_L_ time18.3    ;
   
7. informat    Type    $10.    ;
   
8. 
   
9. format  Date_L_ DATE11. ;                              
   
10. format  Time_L_ time18.3    ;
    
11. format  Type    $10.    ;                                                           
    
12. 
    
13. input                                                                              
    
14. Date_L_                                         
    
15. Time_L_     
    
16. Type    [        DISCUZ_CODE_1        ]nbsp;                                                                                          
    
17. ;                                          
    
18. run;

复制代码

这个code 是管用的，但是我现在不想反复复制这个code 300次，我只是想知道如何用 macro 讲这300 组数据导入成相对应的300 组（我不想要一个大表，还只想要相对应的300组数据）： sh001-sh100，ln001-ln100 和 ny001-ny100

谢谢大家。

宏内做个循环就可以达到目的，

%macro input_data(innm,outnm);
%do i=1 %to 100;

data _null_;
if &i<10 then call symput("k","00"||"&i.");
else if &i>=10 and &i<100 then call symput("k","0"||"&i.");
else  call symput("k","&i.");
run;


data &outnm.&k.;                                   
infile  "H:\&innm.&k..csv"
delimiter   =   ',' DSD lrecl=32767 firstobs=2  ;                           
informat    Date_L_ DATE11. ;                              
informat    Time_L_ time18.3    ;
informat    Type    $10.    ;
format  Date_L_ DATE11. ;                              
format  Time_L_ time18.3    ;
format  Type    $10.    ;                                                           
input                                                                              
Date_L_                                         
Time_L_     
Type    $                                                                                          

;                                          
run;
%end;
%mend;
%input_data(shanghai,sh);%input_data(london,ld);%input_data(newyork,ny);

mutangchun_yu 发表于 2015-9-23 20:52
宏内做个循环就可以达到目的，

%macro input_data(innm,outnm);

谢谢你的回答，
还有一个小问题，比如说我的 shanghai数据只有99个，而london 和 newyork的数据都是100个。这里的话code也是不是也不用改，因为会自动读取到99。 是这样吗？

mutangchun_yu 发表于 2015-9-23 20:52
宏内做个循环就可以达到目的，

%macro input_data(innm,outnm);

好像有错误唉。。。。

提示：physical file does not exist,


你确定 文件名没有错误吗？

感觉data _null_; 下面是不是要加set 什么的？？？

mutangchun_yu 发表于 2015-9-23 20:52
宏内做个循环就可以达到目的，

%macro input_data(innm,outnm);

我尝试了 宏 没有错， 应该是里面的内循环有点问题。
我不太理解 i 所对应的 倒入文件的名字

目测宏是对的，你看看你的文件是不是都在H的根目录下

vstalent 发表于 2015-9-25 05:12
目测宏是对的，你看看你的文件是不是都在H的根目录下

谢谢， 宏没有错， 地址肯定也没有错。 因为我尝试过了。

应该是%do 那部分的问题

看看你文件名是不是001， 010，099之类的