SAS Says基础篇：SAS宏初步(2)

6. 用call symput编写数据驱动的程序

分配一个值给宏变量，可以使用callsymput：

CALL SYMPUT(”macro-variable-name”,value);

macro-variable-name是变量名，value可以是一个变量名，该变量的值将分配给macro-variable-name，也可以是一个用引号括起来的常量。

call symput通常在IF-THEN语句中使用：

IF Age>=18 THEN CALL SYMPUT(”status”,”Adult”);

ELSE CALL SYMPUT(”status”,”Minor”);

这个语句创建了宏变量&STATUS，并依据年龄情况分配给值adult或minor。下面的代码使用变量来赋值：

IF TotalSales>1000000 THEN CALL SYMPUT(”bestseller”,BookTitle);

注意 用call symput创建的宏变量与赋值变量不能够用在同一个数据步中。因为直到数据步执行之后，SAS才会将一个值赋给宏变量。

例子 仍然是花店销售的数据：

现在想找到单个订单最大的客户，并打印出这个客户的所有订单。

第一段代码读取原始数据，proc sort按照quantity降序排序，最大单个订单将会出现在第一个观测值上。

第二段代码使用call symput，当_N_为1 的时候，分配变量CustomerID的值给宏变量&SELECTEDCUSTOMER，在数据步中，我们所需要的就是这么多，因此使用stop语句告诉SAS停止数据步。Stop语句也可以不要，但为了提高效率，它可以告诉SAS不要再读取下面的观测值了。

第三段代码，此时SAS直到数据步已经结束，因此执行数据步。宏变量&SELECTEDCUSTOMER的值为356W，结果如下：

7. 排除宏错误的bug

避免宏错误 尽可能先用标准SAS代码写你的程序，当没有错误了，再转成宏代码，先一次增加一个宏逻辑特征。再增加%macro和%mend。再增加宏变量。

引用问题 宏处理器不能解决但引号内的宏。所以要使用双引号。比如下面的例子，单引号不能读取宏变量的值：

排除宏错误bug的系统选项 这五个系统选项会影响SAS写入日志的信息。粗体为默认的设置。

• MERROR|NOMERROR 如果你调用了一个SAS不能找到的宏，则会报警。

• SERROR|NOSERROR 如果你使用了一个SAS不能找到的宏，则会报警。

• MLOGIC|NOMLOGIC SAS会在日志里打印关于执行宏的详细信息。

• MPRINT|NOMPRINT SAS在日志里打印由宏产生的标准SAS代码。

• SYMBOLGEN|NOSYMBOLGEN SAS在日志里打印宏变量的值。

最好只在排除bug的时候才将MLOGIC,MPRINT和SYMBOLGEN打开，否则它会让你的日志阅读起来很困难。想要关闭，则用系统语句：

OPTIONS MPRINT NOSYMBOLGEN NOMLOGIC;

Merror信息 如果SAS不能找到一个宏，并且Merror选项也是开着的，那么SAS会打印这样的信息：

WARNING:Apparent invocation of macro SAMPL not resolved.

确认宏名字的拼写是否正确。

SERROR信息 如果SAS不能在开放代码中处理一个宏变量，并且serror选项是开着的，SAS会打印这样的信息：

WARNING:Apparent symbolic reference FLOWER not resolved.

首先确认是否拼写错误，再次查看视角，即是否在外部使用了一个局部变量。

MLOGIC信息 如果这个选项开启，SAS会在日志中打印由宏产生的SAS语句。如果在MPRINT选项中运行了%SAMPLE，日志会如下所示;

SYMBOLGEN信息 如果这个选项开启，SAS会在日志窗口中打印每个宏变量的值。如果在SYMBOLGEN选项中运行%SAMPLE，日志会如下所示：