※ 引述《[email protected] (希望)》之铭言： > ※ 引述《hopper123 (clue)》之铭言： > : 请问SAS可以ㄧ次读很多档案进去吗?? > : 例如我有十个档案(格式皆相同) A001 A002 A003....A010 > : 我不想写十遍Infile() > : 请问可以用其他方法读吗?? *Macro PADZERO 在数字前补0, 使其长度固定. %Macro PADZERO(number,digit); %LET _l=%LENGTH(&&&number); %IF &_l<&digit %THEN %DO _j=&_l+1 %TO &digit; %LET &number=0&&&number; %END; %MEND; *以下取 alias 的 Macro 做修改. %Macro RFILES(prefix,begno,endno,digits=0); %IF &digits<1 %THEN %LET digits=%LENGTH(&endno); %DO i=&begno %TO &endno; %PADZERO(&i,&digits); %LET _fname=&prefix&i; DATA &_fname; INFILE "&Path&_fname..&Ext"; * Path 是档案路径, Ext 为延伸档名, 呼叫此 macro * 前设定之. 或如 alias 原 macro, 用固定字串亦可. /* (put your statements for data processing) */ RUN; %END; %MEND; 原问之读档: %LET Path=C:\; %LET Ext=dat; %RFILES(A,1,10,digits=3) 未试. 有无错误不知. -- H E L P !!! 统 计 专 业 版 需 要 你 !!! 来 贴 文 吧 !!! 无名小站 telnet://wretch.twbbs.org Statistics (统计方法讨论区) 成大计中站 telnet://bbs.ncku.edu.tw Statistics (统计方法及学理讨论区) 盈月与繁星 telnet://ms.twbbs.org Statistics (统计：让数字说话) 交大资讯次世代 telnet://bs2.twbbs.org Statistics (统计与机率) ★本文未经本人同意请勿转载; 回覆请勿全文引用, 请仅留下直接涉及部分。 -- 夫兵者不祥之器物或恶之故有道者不处君子居则贵左用兵则贵右兵者不祥之器非君子 之器不得已而用之恬淡为上胜而不美而美之者是乐杀人夫乐杀人者则不可得志於天下 矣吉事尚左凶事尚右偏将军居左上将军居右言以丧礼处之杀人之众以哀悲泣之战胜以 丧礼处之道常无名朴虽小天下莫能臣侯王若能守之万物将自宾天地相合以降甘露民莫 之令而自均始制有名名亦既有夫亦将知止知止可以不殆譬道之在天140.116.52.117海 作者在 06/07/21 18:15:31 从 140.116.52.117 修改这篇文章 作者在 06/07/21 18:16:16 从 140.116.52.117 修改这篇文章