曜日情報を除外し、Uアルゴリズムを使用して、10進数の週番号を書き出します。
出力フィールドの幅を指定します。
sasdate = '01JAN2007'd;
----+----1----+
u=put(sasdate,yyweeku3.); v=put(sasdate,yyweeku4.); w=put(sasdate,yyweeku5.); x=put(sasdate,yyweeku6.); y=put(sasdate,yyweeku7.); z=put(sasdate,yyweeku8.); put u; put v; put w; put x; put y; put z;
W00 W00 07W00 07W00 2007W00 2007-W00