删除宏变量

shiyiming

删除宏变量，8.2使用%symdel，8.1及以前这么来着？

shiyiming

[quote="willon":2f5e6]删除宏变量，8.2使用%symdel，8.1及以前这么来着？[/quote:2f5e6]

从SAS-L上COPY过来。我没有测试<我的电脑正在重装>。

Hope this helps,


<!-- m --><a class="postlink" href="http://groups.google.com/groups?q=macro+variable+delete&amp;start=20&amp;hl=en&amp;lr=&amp;ie=UTF-8&amp;safe=off&amp;selm=3819ACA2.5FB4%40capitale.qc.ca&amp;rnum=24">http://groups.google.com/groups?q=macro ... ca&amp;rnum=24</a><!-- m -->


%*******************************************************；
macro delmacv(nm);

%if %str(&amp;nm) = %str( ) or %upcase(&amp;nm) = _ALL_
%then
      %let where = %str( );
%else
      %let where = %str(and name = "%upcase(&amp;nm)");

%*Save macro symbol table size ;
  %let savtbmx = %sysfunc(getoption(msymtabmax));

%*redirect macro memory to disk;
  options  msymtabmax=0 ;

%*Force Write of macros to disk;
%*And at end delete macro catalog;

data _null_;
  set sashelp.vmacro end=end;
   call symput(name,' ');
   where scope='GLOBAL' &amp;where ;
   if end
   then do;
        call execute("proc catalog catalog=work.sasst0 kill;quit;");
        call execute("options msymtabmax=&amp;savtbmx;");
        end;
run;
%*;
%mend;

shiyiming

谢谢zibao