SAS編程中的這些小問(wèn)題你遇到過(guò)嗎

在用SAS編程時(shí)，總是時(shí)不時(shí)會(huì)遇到各種各樣的小問(wèn)題，我本人也遇到過(guò)一些有意思的問(wèn)題，在寫(xiě)程序的過(guò)程中，為了避免這些小問(wèn)題也慢慢的積累了一些經(jīng)驗(yàn)，那么通過(guò)這一節(jié)分享給大家吧，希望會(huì)給各位童鞋帶來(lái)一些幫助！

問(wèn)題一

---

WARNING: The quoted string currently being processed has become more than 262 bytes long.  You might have unbalanced quotation marks.

---

上述問(wèn)題一般出現(xiàn)在這種情況下：

data tmp;

do i = 1 to 100;

var = 'var'||left(i);

output;

end;

run;

proc sql;

select var into : varlist separated by ' ' 

from tmp;

quit;

data _null_;

var = scan("&varlist.",1,' ');

put var =;

run;

當(dāng)我需要對(duì)某一個(gè)變量的所有行值生成一個(gè)宏變量的時(shí)候，就會(huì)通過(guò)如上的方式進(jìn)行編程，那么通過(guò)scan函數(shù)進(jìn)行拆解時(shí)，就會(huì)得到上述這種警告。從上述警告可以看到是因?yàn)樽址^(guò)了262個(gè)字節(jié)。盡管沒(méi)有報(bào)錯(cuò)，但是出于編程的完美運(yùn)行角度看，有些童鞋可能就受不了了。

那么我們可以通過(guò)添加一行代碼來(lái)解決這個(gè)問(wèn)題：

options noquotelenmax;

問(wèn)題二

---

WARNING: 沒(méi)有解析符號(hào)引用 VARLIST。

---

這種警告應(yīng)該會(huì)很常見(jiàn)，那么我所指的問(wèn)題并不是通常我們所說(shuō)的宏變量未生成的情況，而是在有條件的生成宏變量的情況下合理的未生成宏變量的結(jié)果，如下所示：

proc sql;

select distinct age into : agelist separated by ' ' 

from sashelp.class

where age > 16;

quit;

%put agelist = &agelist.;

上述代碼表示將滿足條件的age不重復(fù)的通過(guò)空格分隔符生成宏變量agelist，但是很顯然數(shù)據(jù)集中的age并不滿足這個(gè)條件，因此會(huì)出現(xiàn)上述所謂的警告，那么為了避免這個(gè)問(wèn)題，我們可以在程序的最前面對(duì)宏變量進(jìn)行聲明，可以是局部的，也可以是全局的，視具體情況而定，這樣我們就可以得到一個(gè)初始化的值為空的宏變量。

在這里，我們對(duì)其進(jìn)行全局的聲明：

%global agelist;

問(wèn)題三

---

WARNING: 沒(méi)有解析宏 CI 的調(diào)用。

---

在統(tǒng)計(jì)報(bào)告的報(bào)表里，通常在第一列的某一行會(huì)出現(xiàn)一個(gè)標(biāo)簽“%95CI”，而為了讓這個(gè)標(biāo)簽出現(xiàn)，我們通常習(xí)慣用下列語(yǔ)句：

proc sql;

create table tmp as

select '('||compress(lower)||','||compress(upper)||')' as confidence label = "95%CI"

from dataset;

quit;

通過(guò)上述類似這種語(yǔ)句我們就可以得到對(duì)應(yīng)的95%CI，那么為了避免%被誤認(rèn)為宏的調(diào)用，我們可以采用兩種辦法：

一：label = '95%CI'

二：label = %nrstr("95%CI")

問(wèn)題四

---

這個(gè)問(wèn)題來(lái)自論壇，涉及到anydtdte的格式默認(rèn)長(zhǎng)度問(wèn)題，很有意思，特意貼出來(lái)。

程序如下所示：

data a;

input date $ 1-51;

cards;

2012-01-19T11:30

2011-12-22T11:15

2012-03-08T08:15

;

run;

data b;

set a;

date1=scan(date,1,'T');

date2=input(date,anydtdte.);

format date2 date9.;

run;

最終的結(jié)果如下所示：

上述結(jié)果有兩處問(wèn)題：

第一：date2的結(jié)果與date1的日期結(jié)果對(duì)不上，例如第二列為2012年1月19日，到了第三列變成了2012年1月1日；

第二：第三列date2的最后一行結(jié)果為缺失。

那么問(wèn)題的關(guān)鍵在在哪呢，從上述代碼我們可以看到編程做日期轉(zhuǎn)換的過(guò)程中采用anydtdte格式來(lái)進(jìn)行轉(zhuǎn)化，這個(gè)思路并沒(méi)有錯(cuò)，那么錯(cuò)在什么地方呢？

首先給出SAS HELP的語(yǔ)法：
 

從上述編程可看到，這么童鞋在采用anydtdte格式進(jìn)行轉(zhuǎn)化時(shí)并沒(méi)有設(shè)定字符長(zhǎng)度，而是采用了anydtdte默認(rèn)讀取的長(zhǎng)度值9，因此在讀取date1字符串時(shí)，就變成了只讀取前9位，因而出現(xiàn)日期對(duì)不上，到了最后一行更是因?yàn)榈诰盼粩?shù)字為0而沒(méi)有此日期因此無(wú)法轉(zhuǎn)化從而出現(xiàn)缺失的情況。

那么糾正這個(gè)錯(cuò)誤想必各位童鞋都應(yīng)該了解了，只需要在anydtdte后面加個(gè)數(shù)字10就完美的解決了這個(gè)問(wèn)題了。

date2=input(date,anydtdte10.);

問(wèn)題五

---

%abort 和 %return

---

關(guān)于這兩個(gè)宏語(yǔ)句，作用都差不多，都是為了中斷程序的運(yùn)行，只是輕重程度不一樣，這一點(diǎn)需要謹(jǐn)記：

%abort直接結(jié)束SAS進(jìn)程。也就是說(shuō)你的SAS在執(zhí)行完這個(gè)語(yǔ)句之后，你的SAS會(huì)被立即關(guān)閉，甚至都來(lái)不及保存，因此運(yùn)行這個(gè)語(yǔ)句需要慎重考慮。

%return 中斷你當(dāng)前運(yùn)行的宏。

對(duì)于%return舉個(gè)簡(jiǎn)單的例子：

%macro checkit(error);

%if &error = 1 %then %do;

%put 程序中斷，請(qǐng)修正參數(shù);

%return;

%end;

%else%put 繼續(xù)進(jìn)行;

%mend checkit;

上述編程表示當(dāng)輸入的error = 1 時(shí)，日志會(huì)輸出“程序中斷，請(qǐng)修正參數(shù)”，同時(shí)宏被中斷；當(dāng)輸入的error = 其他值時(shí)，日志會(huì)輸出“繼續(xù)進(jìn)行”。

問(wèn)題六

---

為了湊成六六大順，再寫(xiě)一個(gè)今天某位童鞋遇到的一個(gè)問(wèn)題吧。

問(wèn)題是這樣的：

一個(gè)數(shù)據(jù)集的一個(gè)變量假定為var，var的值為1 1 2 2 2 3 . . 5?？梢钥吹接?個(gè)1,3個(gè)2，2個(gè)缺失，一個(gè)5。那么這位童鞋想通過(guò)程序統(tǒng)計(jì)var為2的個(gè)數(shù)，于是寫(xiě)出了如下代碼：

proc sql;

select count(var = 2) as varcnt

from tmp;

quit;

---

這位童鞋可能有點(diǎn)不太明白sum函數(shù)和count函數(shù)在遇到邏輯比較運(yùn)算的時(shí)候的區(qū)別。

首先我說(shuō)一下count函數(shù)吧。

Count函數(shù)一般在sql中有兩種寫(xiě)法，一種是count(*)，這個(gè)表示對(duì)數(shù)據(jù)集行數(shù)的統(tǒng)計(jì)，如果加了group by，那就是分組的行數(shù)統(tǒng)計(jì)；一種是count(variable)，這個(gè)是表示對(duì)某一個(gè)變量的非缺失行數(shù)的統(tǒng)計(jì)，加了group by 那也是同理；如果加了邏輯比較運(yùn)算的話，像count(expression)，跟count（*）基本上沒(méi)啥區(qū)別，當(dāng)然前提是這個(gè)運(yùn)算不是簡(jiǎn)單的數(shù)值運(yùn)算，我們知道數(shù)值運(yùn)算中缺失值加任何值都是缺失，除非采用計(jì)算函數(shù)。

以上述數(shù)據(jù)為例：

data tmp;

input var @@;

cards;

1 1 2 2 2 . . 5

;

run;

proc sql;

select count(var) from tmp;

select count(*) from tmp;

select count(var = 1) from tmp;

quit;

最終得到的結(jié)果是：第一行為6，第二行為8，第三行為8。第三行中var = 1最終的結(jié)果要么是0，要么是1，因?yàn)榉侨笔У膙ar的值 = 1肯定要么是0要么是1，而缺失的var值 = 1 的結(jié)果肯定是0，因此都是非缺失的，因此其實(shí)跟第一種寫(xiě)法意義一樣。數(shù)據(jù)分析師培訓(xùn)

而sum函數(shù)則一般在sql中有兩種寫(xiě)法：一種是sum(variable)，這個(gè)表示對(duì)variable每行值的累加，不考慮缺失值；一種是sum（expression），那么就是對(duì)expression的結(jié)果進(jìn)行累加，如果expression = 1 ，那么就是加1，如果expression = 0，那么就是加0。