SAS 9.4에서 폴더 내용을 읽는 매크로 변수 사용

Question

매크로 변수를 사용하여 동적으로 폴더 이름을 지정하는 SAS 매크로가있는 디렉토리에서 파일 목록을 가져 오려고합니다.

%macro veicolo(codice_veicolo); 

filename pipedir pipe ' dir "some_path\&codice_veicolo" /S' lrecl=5000; 

data &codice_veicolo; 
infile pipedir truncover; 
input line $char1000.; 
length directory $1000; 
retain directory; 
if line =' ' or 
index(upcase(line),'<DIR>') or 
left(upcase(line))=:'VOLUME' then 
delete; 
if left(upcase(line))=:'DIRECTORY OF' then 
directory=left(substr(line,index(upcase(line),'DIRECTORY OF')+12)); 
if left(upcase(line))=:'DIRECTORY OF' then 
delete; 
if input(substr(line,1,10),?? mmddyy10.) = . then 
substr(line,1,10)='12/31/2999'; 
date=input(substr(line,1,10),?? mmddyy10.); 
format date mmddyy10.; 
run; 

proc sort data=&codice_veicolo; 
by directory descending date; 
run; 

data folder_&codice_veicolo(drop=i line); 
set &codice_veicolo; 
by directory; 
length filename $75; 
retain number_of_files_in_directory directory_size; 
if first.directory then 
do; 
number_of_files_in_directory=input(scan(line,2,' '),32.); 
call symput(nfiles,number_of_files_in_directory); 
directory_size=input(scan(line,4,' '),comma32.); 
end; 
file_size=input(scan(line,3,' '),comma32.); 
filename=' '; 
do i=4 to 100; 
filename=trim(left(filename))||' '||scan(line,i,' '); 
if scan(line,i,' ')=' ' then 
leave; 
end; 
if index(upcase(line),'FILE(S)') then 
delete; 
if date ge '30DEC2999'd then 
delete; 


run; 


%mend; 

그때 내가에서 검색 할 폴더의 이름 인 codice_veicolo 인수와 매크로를 실행하면, 내가받을 다음과 같은 오류 :

Output Err std: 
The system cannot find the path specified. 
NOTE: 20 records were read from the infile PIPEDIR. 
     The minimum record length was 0. 
     The maximum record length was 90. 
NOTE: The data set WORK.JL6AME1A6FK000442 has 2 observations and 3 variables. 
NOTE: DATA statement used (Total process time): 
     real time   0.05 seconds 
     cpu time   0.01 seconds 

내가 실행 코드는 다음과 같다 나는 매크로 변수를 확인할 수 없습니다 어떤 이유로 그렇게 생각하지만, 내가 실행하는 경우 :

%let pgmpath = %sysfunc(pathname(pipedir)); 
%put &pgmpath; 

나는 그러므로 나는 문제가 t에 가정 적절한 경로와 적절한 디렉토리를 얻을 그는 진술을 infile. 코드는 매크로 변수를 사용하지 않고 정상적으로 실행됩니다.

Windows 9에서 SAS 9.4를 사용하고 있습니다. 어떤 아이디어 ??

는

Answer 1

매크로 변수 참조는 따옴표 안에 확장되지 않습니다 사전에 :) 루카을 주셔서 감사합니다. 대신이 방법을 사용해보세요.

filename pipedir pipe %sysfunc(quote(dir /s "some_path\&codice_veicolo")) lrecl=5000;