298：global宏变量和local宏变量；宏变量和data步

一：global宏变量和local宏变量

例子1：

%let outside = AAA; 
%macro one;
  %global inone; 
  %let inone = BBB;
%mend one;
%macro two;
  %let intwo = CCC; 
%mend two;
%macro last;
  %one
  %two
  %put &outside &inone &intwo; 
%mend last;
%last

image.png

注意到outside（属于global变量）这个宏变量是在宏外面定义的，所以也不需要申明global；

宏变量inone虽然是在宏里面定义的，但是它用global申明了，所以也属于global宏变量

例子2：

%macro allyr3(start=10,stop=14);
  data allyear;
    set
    %do year = &start %to &stop;
      yr&year(in=in&year)
    %end;;
    year = 2000
    %do year = &start %to &stop;
      + (in&year*&year)
    %end;;
  run;
%mend allyr3;

%let year = FRED;
%put The global value of year is &year;
%allyr3(start=12, stop=14)
%put The global value of year is &year;

image.png

例子3：
在上面的这段代码中，year的值会被15给代替
所以这种情况下，我们可以对宏里面的year进行申明，这样就不会导致宏变量之间发生冲突

*申明local变量，避免宏变量之间冲突;
%macro allyr4(start=10,stop=14);
  %local year; 
  %let year=&start; 

  data allyear;
    set
    %do year = &start %to &stop;
      yr&year(in=in&year)
    %end;;
    year = 2000
    %do year = &start %to &stop;
      + (in&year*&year)
    %end;;
  run;
%mend allyr4;

%let year = FRED;
%put The global value of year is &year;
%allyr4(start=12, stop=14)
%put The global value of year is &year;

image.png

二：宏变量和data步交互

对于数据集中的数据，我们有时候可能想将某个变量的值做成宏变量，比如下面这样

data age;
set sashelp.class(where=(name='Jane'));
%let jane_age = age;
run;
但是上面这段代码是不会输出正确结果的，原因还是那个宏先编译的内在执行机制。

需要注意的是，call symputx并不是宏水平语句，而是一个可执行的DATA步骤例程，因此它允许你在data步执行的时候，直接根据数据集的变量赋值给宏变量。

CALL SYMPUTX(macro-variable, value <, symbol-table>);

CALL SYMPUTX的第一个参数可以是字符串、可以是字符变量、也可以是字符型变量和字符串的结合。

CALL SYMPUTX的第二个参数可以是字符串、可以是字符变量、也可以是字符型变量和字符串的结合。

下面我们看下上面的这3种情形:
①：第一和第二个参数都是字符串，需要注意的是，在将值赋予给宏变量的时候，会自动去除值前后的空格。

image.png
image.png image.png

可以看到值前后的空格都被自动去除了。

②：第一个和第二个参数都是变量
说实话，一开始根据SASHELP的解释，我根本没看懂怎么用。下面看例子就清楚了

image.png image.png image.png

解释：当第一个参数是数据集中的某个变量的时候，它的值就是宏变量的名称（在这里就是变量mvar的值"MAIN"和“NUM”，注意不是变量mvar）

第二个参数就是数据集变量的值（在这里就是变量nhigh的值）。

需要注意的是如果第二个参数，变量的值是数值型的话，SAS会自动先转换成字符型再输出，还会在log窗口输出一个note。

还需要注意到是第一个参数如果是数据集的某个变量，那么变量的值必须是字符型或者说符合SAS命名规则的值，比如mvar都是数字，SAS就会报错。

if mod(n,2)=0 then mvar="MAIN";
else mvar=777;

image.png

这就是第二种情况。

③：字符型变量和字符串的结合;

image.png

这段程序会输出19个宏变量（数据集里面有19条观测）

image.png

上面是CALL SYMPUTX参数的解析，讲到CALL SYMPUTX，还有一个就是CALL SYMPUT，前者是后者的升级版，主要区别在于如果第二个参数是数值型的，CALL SYMPUTX能直接转换成字符型在进行处理，并且不会在log里报note；

CALL SYMPUTX的第三个参数能控制生成的宏变量是什么类型的，但是CALL SYMPUT不行。

data _null_;
  x=5;
call symput('x1',x); 
call symput('x2',trim(left(put(x,6.)))); 
call symputx('x3',x); 
run;
%put The vertical bars show leading and trailing blanks.;
%put Using SYMPUT X1 is |&x1|;
%put Using SYMPUT with TRIM LEFT PUT X2 is |&x2|;
%put Using SYMPUTX X3 is |&x3|;

image.png

这条log就是第一个CALL SYMPUT产生的。

除了trim/left函数，还可以通过这种形式生成宏变量：

VAR2="SAS";
call symputx('x4',catt(VAR2," programmer    ")); 

image.png

att函数的作用是去除末尾的空格，比如下面的程序，输出结果是SAS前面的空格也被去除了，但是这是call symputx的功劳，而不是catt的功劳。

VAR2="    SAS";
call symputx('x4',catt(VAR2," programmer    "));

上面这段程序输出结果跟上张图片一样。

运用catt函数还需要注意一点，我就不举例子了。

image.png