SCAN関数で、右からn個目に区切られた文字を取得する。

SCAN関数の使い方含め、落とし穴もあるので、まずは以下リンク記事をご参照下さい。

「SCAN関数の落とし穴」

そして本題。

SCAN関数の第2引数に「負の値」を指定すると、右からn個目に区切られた文字を取得するように変更できます。

data DT1;    length A B $20.;    A = "ABC,DEF,GHI";    B = scan( A , -1, "," ); run;   A   B     ABC,DEF,GHI      GHI

第2引数に 「-1」 と指定しているので、区切った文字の右から1個目の文字 「GHI」 を取得しています。

日本語に対応した 「KSCAN関数」 も同様に負の値を指定することが出来ます。

SCAN関数の落とし穴

私自身がSCAN関数にはめられた出来事を紹介。
SCAN関数とは、、、まず例をご覧ください。


例

---

data DT0;    length A  A1-A3  $10.;    A="aa,bb,cc";    A1 = scan( A, 1, "," );    A2 = scan( A, 2, "," );    A3 = scan( A, 3, "," ); run;  A    A1    A2    A3    aa,bb,cc   aa  bb  cc

上の例では、「aa,bb,cc」という文字列をカンマ「,」で区切って分割しています。

つまり、文字列を、指定した1文字で区切った時のn個目の文字を返してくれるのがSCAN関数です。

勘違いしやすいのが、例えば区切る文字に「,:」と指定したら「,」と「:」の2つが区切り文字になります。

「,:」というひとつづきの文字が区切り文字になるという意味ではないです。



構文

---

SCAN( 文字列または変数 , n個目 , "区切り文字" )

• 日本語などのマルチバイト文字には対応していません。マルチバイト文字を扱う場合は、KSCAN関数というのが用意されています。

落とし穴

---

以下のプログラムの結果は想定通りでしょうか？

* テストデータ ; data DT1; input A :$10.; cards; aa,bb aa ,aa aa,,bb ; * SCAN関数で分割 ; data OUT1;    set DT1;    length A1-A3 $5.;    A1 = scan(A, 1, ",");    A2 = scan(A, 2, ",");    A3 = scan(A, 3, ","); run;  A    A1    A2    A3    aa,bb   aa  bb  aa   aa  ,aa   aa  aa,,bb   aa  bb

以下の結果を想定した方も多いと思います。

A	A1	A2	A3
aa,bb	aa	bb
aa	aa
,aa		aa
aa,,bb	aa		bb

この現象は以下のルールによるものです。

• 3行目の「,aa」のように一番先頭に区切り文字があると、先頭の区切り文字は無視される。
• 4行目の「aa,,bb」のように区切り文字が連続している場合、区切り文字は1つだけと解釈される。

このルールを無効にしたい場合、SCAN関数に”M修飾子”というものをつけてやります。

* SCAN関数で分割 ; data OUT2;    set DT1;    length A1-A3 $5.;    A1 = scan(A, 1, "," , "M");    A2 = scan(A, 2, "," , "M");    A3 = scan(A, 3, "," , "M"); run;  A    A1    A2    A3    aa,bb   aa  bb  aa   aa  ,aa   aa  aa,,bb   aa  bb

できた！
ただし、KSCAN関数には”M修飾子”の機能がありません。
（SAS9.4M5からKSCANX関数というのが追加されて同様の構文で"M修飾子"がつかえます）