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

%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);

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

好像有错误唉。。。。

提示：physical file does not exist,


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

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

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