SAP 根据期间获取当月

ABAP_小欧

已于 2023-04-14 13:53:45 修改

阅读量541

点赞数

文章标签： abap

于 2023-04-14 13:34:24 首次发布

本文链接：https://blog.csdn.net/only_oy/article/details/130150453

版权

DATA: P_JAHR  type MLDOC-JAHRPER.

DATA:LV_TIME1 TYPE SY-DATUM.

  P_JAHR  = '20230414'.

IF P_JAHR IS NOT INITIAL.
    LV_TIME1 = P_JAHR-LOW+0(4) && P_JAHR-LOW+5(2)  && '01'.
  ENDIF.

  

RANGES: R_LOADDATE FOR SY-DATUM.
  IF LV_TIME1 IS NOT INITIAL .
    R_LOADDATE-LOW = LV_TIME1. "获取当前月的第一天
    CALL FUNCTION 'BKK_GET_MONTH_LASTDAY' "获取当前月的最后一天
      EXPORTING
        I_DATE = LV_TIME1
      IMPORTING
        E_DATE = R_LOADDATE-HIGH.
    LV_TIME2 = R_LOADDATE-HIGH.
    R_LOADDATE-SIGN = 'I'.
    R_LOADDATE-OPTION = 'BT'.
    APPEND R_LOADDATE.
  ENDIF.