宏程序的存储与调用的问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

比如我有好几个宏.sas文件，我想把他们弄在一起，我从网上查到可以用宏存储和调用，我试了一下，貌似存储成功了，但是调用一直不行

1. libname test 'c:\';
   
2. options MSTORED SASMSTORE=test ;
   
3. %macro myfiles / store des='test';
   
4.   filename file1 'D:\1.sas';
   
5. filename file2 'D:\2.sas';
   
6. filename file3 'D:\3.sas';
   
7. filename file4 'D:\4.sas';
   
8. %mend;

复制代码

这样写对不对？
调用的时候我用什么方法可以调用到他们，比如我有个语句 ：
%ROC (data=score_dev, response=dumdef1,var=score);
就是要在上面的几个宏的基础上才能运行成功的， 我该怎么调用呢？

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：宏程序 filename response options libname store 程序 网上

用%include试试，例如：

%include 'D:\1.sas';
%include 'D:\2.sas';
%include 'D:\3.sas';
%include 'D:\4.sas';

include我用过了额，可以的，但是现在就是想要把他们都存储在一个里面，然后再调用，不知道这个应该怎么写。。。

楼主那几个D:\*.sas如果里面都是定义宏的话，定义的时候也需要store的，不是外面再包层macro且把最外面的那层macro store了就完事了，其实store只是外面的marco的编译，根本不会去运行里面的filename，更不用说filename中的macro了。store其实就是把编译文件存到硬盘，你用proc catalog看store的macro就只能看到最外层的macro，因此你还是先把该store的都重新定义下，然后用proc catalog去看你要的有没有，有了就ok了。

有人能告诉下应该怎么做么?

楼上的楼上

小试牛刀

1. %let dsn=a;
   
2. %let path='.';
   
3. libname &dsn &path;
   
4. 
   
5. data _null_;
   
6.         file 'a.sas';
   
7.         put '%macro a;';
   
8.         put '%mend;';
   
9. run;
   
10. 
    
11. data _null_;
    
12.         file 'b.sas';
    
13.         put '%macro b;';
    
14.         put '%mend;';
    
15. run;
    
16. 
    
17. data _null_;
    
18.         file 'c.sas';
    
19.         put '%macro c;';
    
20.         put '%mend;';
    
21. run;
    
22. 
    
23. %macro ms(filename,newname);
    
24. data _NULL_;
    
25.         infile "&filename" missover pad LRECL=32767;
    
26.         input @01 string $1000.;
    
27.         file "&newname";
    
28.         if length(string)>=6
    
29.         and upcase(substr(string,1,6))='%MACRO' then
    
30.         str=strip(substr(string,1,length(string)-1))||' /store source;';
    
31.         else str=string;
    
32. 
    
33.         if _N_=1 then do;
    
34.                 put "options mstored sasmstore=&dsn.;";
    
35.         end;
    
36.         
    
37.         put str;
    
38. run;
    
39. %mend;
    
40. 
    
41. %ms(a.sas,aa.sas)
    
42. %ms(b.sas,bb.sas)
    
43. %ms(c.sas,cc.sas)
    
44. 
    
45. %include 'aa.sas';
    
46. %include 'bb.sas';
    
47. %include 'cc.sas';
    
48. 
    
49. proc catalog cat=&dsn..sasmacr;
    
50.         contents;
    
51. quit;

复制代码

result：
                                                                               SAS 系统                                    
                                                                         目录的内容 A.SASMACR

                                               #    名称    类型                创建日期               修改日期    说明
                                               ------------------------------------------------------------------------
                                               1    A       MACRO     20MAY2004:00:36:54     20MAY2004:00:36:54
                                               2    B       MACRO     20MAY2004:00:36:54     20MAY2004:00:36:54
                                               3    C       MACRO     20MAY2004:00:36:54     20MAY2004:00:36:54


D版时间不对，不要在意。