複数のファイルをINFILEで読み込むときに、最初の見出しだけを読む

見出しが1行目含まれているファイルを複数読み込むと、見出し行がデータとして入ってきます。これを読み飛ばすサンプルです。探すのに時間が掛かったので、メモしておきます。

INFILE '/sas/data/input/test*.csv'
    LRECL=904
    ENCODING="SHIFT-JIS"
    TERMSTR=CRLF
    MISSOVER
    DSD
    FIRSTOBS=2  /* 2行目から読む */
    EOV=EOV  /* 入力ファイルの切替わりを検出する変数 */
;

input @;   /* 何も読み込まない */
if eov then input; /* 見出しの行を読み捨てる */
eov=0;