SAS命令应用高级技巧--如何从一批SCL,SOURCE文件中查找或替换某字符串
你是否有这样的麻烦，你在好几个CATALOG下建了上百个SCL或SOURCE文件，突然有一天因为系统变化，必须改动程序，比如有某个特征被大量程序引用了，那你必须一个一个的打开SCL文件，然后查找，然后在替换，想必你在那时肯定痛恨SAS公司的破编辑器了，功能弱智的像微软的记事本一样，如果你不幸不知道这样的技巧，那只能老老实实一个一个的打开，查找，替换、编译、保存、另存，然后在打开另一个文件，如此周而复此
呵，不过幸运的是你看到了这篇文章，从此就可以中气十足的对BOSS说，我绝对把那改动全部该过来了，没问题
好了，不唠叨了，言归正传吧
不知道你有没有用过大名鼎鼎的编辑器ULTRAEDIT呢，相信很多写CODE的人都在用它吧，确实很强的一个编辑器，今天我就用这编辑器中的一个小小功能，那就是查找、替换功能，它可是能在N多文件里做查找替换，我试了，打开上百个文件速度还是不错的，且操作非常方便
好了，知道有这个功能就行了，下面的问题是怎么才能把SAS CATALOG里的程序文件导出来呢？且听我慢慢说来
首先，我们知道，SAS提供了很多快捷的命令直接操作，比如
在命令窗口敲入一个【open 表名】,就可以打开一个表，而不用用鼠标去找这个表名，然后双击
要实现把CATALOG下的程序文件导出，导入 我们必须知道这些命令，如下
build scl文件 /*打开一个SCL文件*/
clear /*清除当前窗口内容*/
file "文件名" /*存盘当前窗口内容到文件*/
include "文件名" /*把指定文件的内容导入当前窗口*/
compile /*编译当前程序*/
save/*存盘当前窗口内容*/
saveclass/*存盘为类*/
end/*关闭当前窗口*/
cancel/*取消当前窗口所作的改动*/
还必须知道这样一个SAS系统视图，里面存放的是SAS的一下文件信息，比如CATALOG下有哪些什么文件啊，是什么样的类型啊，如下
系统视图sashelp.vcatalg
主要字段:
libname 库名，就是CATALOG的名字
memname 目录名
objtype 成员类型，比如SCL
objname 对象名，就是CATALOG下的文件拉
好了，知道这些就可以把你想要的文件导出来了,下面就是源代码了
/*导出*/
%let dir=g:\src\;/*要导出到哪个目录*/
data _null_;
set sashelp.vcatalg;
where libname ="要导出那个库" and memname in (要导出哪些目录) and objtype="要导出什么类型的文件，比如SCL";
length filename filename1 $200 str $2000;
filename=compress("&dir"|| memname || "\" || objname || ".scl");
filename1=compress(libname ||"."|| memname || "." || objname || ".scl");
str= "dm """ || "build "|| trim(filename1) || ";file" || "'" || trim(filename) || "'"|| ";end;"|| """;";
put str;
run;
OK，现在运行上面的程序，会输出如下结果
dm "build ***.scl;file'g:\src\***.scl';end;";
dm "build ***.scl;file'g:\src\***.scl';end;";
....
然后把输出结果拷贝出来，然后粘贴到命令窗口，运行，然后你就会看到窗口闪啊闪啊，如果文件很多的化会闪一会儿的，耐心一点
运行完了把，然后去你导出的那个目录看吧，是不是生成了很多SCL文件
咔咔，第一步大功告成
第二步当然是第导出的文件进行操作了，你想干什么就干什么把，如此强大的ultraedit,批查询、替换简直就是A piece of cake.
好了，假定你所有的改动都该好了，当然是要怎么把改动的结果写入SAS的CATALOG了,很简单，就是把上面的输出结果改把改把，然后再在SAS命令窗口运行就会把所有改动自动写入SAS的CATALOG了，如下
/*导入*/
dm "build ***.scl;clear;include '***.scl';save;compile;saveclass;end;"
看看，连complie,saveclass都给你做了，满足了把
此文至此OVER,请君自用，但望转载时注目来处，感激不尽 :)
本文地址：http://com.8s8s.com/it/it25885.htm