我的一段SAS程序如下：
（注：该部分程序改自于人大经济论坛的程序。程序的主要目的是想读入在某个文件夹下的所有xls文件。论坛上高手比较多，请教高人指点下）
filename y "C:\Documents and Settings\ibm\My Documents\My SAS Files\9.2\li0oi3pj1\";
%let dir=%str(C:\Documents and Settings\ibm\My Documents\My SAS Files\9.2\li0oi3pj1\);  
%macro test(filname);
    %let filrf=&filname;
    %let did=%sysfunc(dopen(&filrf));
        
      %let listname=;
      %let memcount=%sysfunc(dnum(&did));  
        %if &memcount gt 0 %then %do i=1 %to &memcount;

          %let listname=%sysfunc(dread(&did,&i));

             %if %sysfunc(scan(&listname,-1,'.')) eq 'xls'
                     %then %do;
             PROC IMPORT OUT= w_&i
              DATAFILE= "&dir.\&listname"
              DBMS=Excel REPLACE;
              GETNAMES=NO;
              MIXED=NO;
              SCANTEXT=YES;
              USEDATE=YES;
              SCANTIME=YES;
              RUN;
           %end;
        %end;
    %else %do;  %let rc=%sysfunc(dclose(&did)); %end;
    %let rc=%sysfunc(dclose(&did));
%mend;
%test(y);


程序的运行结果是：只在日志窗口出现以上程序代码，其他的什么也没有。就连通常情况下错误或CPU工作时间等信息都没有。我不知道问题出在哪里了。所以请教高手指点，不甚感激。先谢谢