SAP

【SAP】月初、月末日等の取得方法（ABAPプログラミング）

プログラムにおいて、日付の計算はとても重要です。
そこで、SAP/ABAPでの日付計算の処理方法についてまとめてみました！

日付の計算について

SAPの日付型は実は文字型（CHAR8桁）ですが、DAT型同士であれば正しく差を求めることができます。

例：
DATA: W_DATUM1 TYPE DATUM,
          W_DATUM2 TYPE DATUM,
          W_CHAR(2) TYPE C.

* 日付をセット
   W_DATUM1 = '20180517'.
   W_DATUM2 = '20180520'.

* 日付差違計算
　W_CHAR = W_DATUM2 - W_DATUM1.

月初日取得方法

これはとても簡単です。
文字型であることを活かし、後ろ2桁を01にすることで実現可能です。

例：
DATA: W_DATUM1 TYPE DATUM,
          W_DATUM2 TYPE DATUM.

* 本日日付取得
   W_DATUM1 = SY-DATUM.

* 月初日取得（現在日付の前6桁と、後ろに01をつける）
  CONCATENATE W_DATUM+0(6) '01' INTO W_DATUM2.

月末日取得

月末日は月によってことなるため、単純に'31'をセットはできないため、汎用モジュールを使用する流れとなります。

例：
DATA: W_DATUM_FIRST TYPE DATUM,   "月初日
          W_DATUM_LAST  TYPE DATUM.   "月末日

CALL FUNCTION 'HR_JP_MONTH_BEGIN_END_DATE'
EXPORTING
  IV_DATE = SY-DATUM    "実行日
IMPORTING
  EV_MONTH_BEGIN_DATE = W_DATUM_FIRST
  EV_MONTH_END_DATE   = W_DATUM_LAST.

～月前の月初、月末日取得ロジック例

W_MONTHで、何月前かを算出した後、月初・月末日を取得するロジックとなっています。W_MONTHは「-1」なども可能であるため、1月前の月末月初日の取得も可能です。



DATA: W_DATUM_FIRST TYPE DATUM,   "月初日
          W_DATUM_LAST  TYPE DATUM,   "月末日
　　    W_MONTH  TYPE I,                     "月数
          W_NEWDATE TYPE DATUM.         "

* ～月前・～月後の月初・月末日取得
CALL FUNCTION 'MONTH_PLUS_DETERMINE'
  EXPORTING
    MONTHS  = W_MONTH
    OLDDATE = SY-DATUM
  IMPORTING
    NEWDATE = W_NEWDATE.

* 月初日・月末日取得
CALL FUNCTION 'HR_JP_MONTH_BEGIN_END_DATE'
  EXPORTING
    IV_DATE             = W_NEWDATE    "実行日
  IMPORTING
    EV_MONTH_BEGIN_DATE = W_DATUM_FIRST
    EV_MONTH_END_DATE   = W_DATUM_LAST.