Hi ballardw, Thank you for your help. I was able to figure it out taking this approach.
rsubmit ;
data temp (keep=fname) ;
rc=filename("filelist", "~/shape/") ;
did=dopen('filelist') ;
nf=dnum(did) ;
do i=1 to nf;
fname=dread(did, i);
ext=scan(fname,-1) ;
if ext = 'shp' then output ;
end;
rc=dclose(did);
run ;
endrsubmit ;
Do you see any issues by taking this approach? Thank you, Jerry
... View more
