Macro XDIR (from Fraktal SAS Programming)

%MACRO xdir(xpath);
filename path pipe "dir /b &XPATH." lrecl = 256;
data _NULL_;
infile path;
input entries $ 1-256;
  put entries;
run;
%MEND xdir;