我已经通过程序把文件夹里的CSV文件名导入到work.file数据集中了,求问怎样可以批量导入处理这些数据呀?
谢谢!!
下面是导入文件名的程序:
%MACRO GetFileName(DSNAME=,ROUTE=,TYP=) ;
%PUT %STR(----------->DIRNAME=&ROUTE) ;
%PUT %STR(----------->TYP=&TYP) ;
DATA WORK.&DSNAME ;
RC=FILENAME("DIR","&ROUTE") ;
OPENFILE=DOPEN("DIR") ;
IF OPENFILE>0THEN DO ;
NUMMEM=DNUM(OPENFILE) ;
DO II=1TO NUMMEM ;
NAME=DREAD(OPENFILE,II) ;
OUTPUT ;
END ;
END ;
KEEP NAME ;
RUN ;
PROC SORTdata=WORK.&DSNAME;
BY DESCENDING NAME ;
%IF &TYP^=ALL %THEN %DO ;
WHERE INDEX(UPCASE(NAME),UPCASE(".&TYP"));
%END ;
RUN ;
%MEND GetFileName;
%GetFileName(DSNAME=FILE,ROUTE=F:\测验数据,TYP=CSV);