SAS Says基礎(chǔ)篇：SAS宏初步(2)

6. 用call symput編寫數(shù)據(jù)驅(qū)動的程序

分配一個值給宏變量，可以使用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”);

這個語句創(chuàng)建了宏變量&STATUS，并依據(jù)年齡情況分配給值adult或minor。下面的代碼使用變量來賦值：

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

注意 用call symput創(chuàng)建的宏變量與賦值變量不能夠用在同一個數(shù)據(jù)步中。因為直到數(shù)據(jù)步執(zhí)行之后，SAS才會將一個值賦給宏變量。

例子 仍然是花店銷售的數(shù)據(jù)：

現(xiàn)在想找到單個訂單最大的客戶，并打印出這個客戶的所有訂單。

第一段代碼讀取原始數(shù)據(jù)，proc sort按照quantity降序排序，最大單個訂單將會出現(xiàn)在第一個觀測值上。

第二段代碼使用call symput，當(dāng)_N_為1 的時候，分配變量CustomerID的值給宏變量&SELECTEDCUSTOMER，在數(shù)據(jù)步中，我們所需要的就是這么多，因此使用stop語句告訴SAS停止數(shù)據(jù)步。Stop語句也可以不要，但為了提高效率，它可以告訴SAS不要再讀取下面的觀測值了。

第三段代碼，此時SAS直到數(shù)據(jù)步已經(jīng)結(jié)束，因此執(zhí)行數(shù)據(jù)步。宏變量&SELECTEDCUSTOMER的值為356W，結(jié)果如下：

7. 排除宏錯誤的bug

避免宏錯誤 盡可能先用標(biāo)準(zhǔn)SAS代碼寫你的程序，當(dāng)沒有錯誤了，再轉(zhuǎn)成宏代碼，先一次增加一個宏邏輯特征。再增加%macro和%mend。再增加宏變量。

引用問題 宏處理器不能解決但引號內(nèi)的宏。所以要使用雙引號。比如下面的例子，單引號不能讀取宏變量的值：

排除宏錯誤bug的系統(tǒng)選項 這五個系統(tǒng)選項會影響SAS寫入日志的信息。粗體為默認(rèn)的設(shè)置。

• MERROR|NOMERROR 如果你調(diào)用了一個SAS不能找到的宏，則會報警。

• SERROR|NOSERROR 如果你使用了一個SAS不能找到的宏，則會報警。

• MLOGIC|NOMLOGIC SAS會在日志里打印關(guān)于執(zhí)行宏的詳細(xì)信息。

• MPRINT|NOMPRINT SAS在日志里打印由宏產(chǎn)生的標(biāo)準(zhǔn)SAS代碼。

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

最好只在排除bug的時候才將MLOGIC,MPRINT和SYMBOLGEN打開，否則它會讓你的日志閱讀起來很困難。想要關(guān)閉，則用系統(tǒng)語句：

OPTIONS MPRINT NOSYMBOLGEN NOMLOGIC;

Merror信息 如果SAS不能找到一個宏，并且Merror選項也是開著的，那么SAS會打印這樣的信息：

WARNING:Apparent invocation of macro SAMPL not resolved.

確認(rèn)宏名字的拼寫是否正確。

SERROR信息 如果SAS不能在開放代碼中處理一個宏變量，并且serror選項是開著的，SAS會打印這樣的信息：

WARNING:Apparent symbolic reference FLOWER not resolved.

首先確認(rèn)是否拼寫錯誤，再次查看視角，即是否在外部使用了一個局部變量。

MLOGIC信息 如果這個選項開啟，SAS會在日志中打印由宏產(chǎn)生的SAS語句。如果在MPRINT選項中運(yùn)行了%SAMPLE，日志會如下所示;

SYMBOLGEN信息 如果這個選項開啟，SAS會在日志窗口中打印每個宏變量的值。如果在SYMBOLGEN選項中運(yùn)行%SAMPLE，日志會如下所示：