日本語で入力された西暦・和暦を日付値に変換する方法を紹介します。
サンプルデータ作成
data DT1; length C1-C4 $30.; C1 = "2000/02/01"; C2 = "2000年2月1日"; C3 = "H12/02/01"; C4 = "平成12年2月1日"; run; |
例
- 日本語を含む和暦は「JNENGO」というインフォーマットが用意されてるので変換が楽。
- 日本語を含む西暦は漢字の「年」「月」「日」をKTRANSLATE関数で「/」に置換してから変換するなど工夫が必要。
*** 「2000/02/01」 ; N1 = input( C1, yymmdd10. ) ; *** 「2000年2月1日」 ; N2 = input( ktranslate(C2,"/","年","/","月","","日") ,yymmdd10.) ; *** 「H12/02/01」 ; N3 = input( C3, nengo9. ) ; *** 「平成12年2月1日」 ; N4 = input( C4, jnengo32. ) ; |
0 件のコメント:
コメントを投稿