学步园

下例取将开始 / 结束日期参数自动赋值为当月的 第一天 和 最后一天的值。

其中 I_BEGDA / I_ENDDA 即为开始结束日期参数；其中的 LAST_DAY_OF_MONTHS 为SAP 系统中自代的函数。

  IF I_BEGDA IS INITIAL.
    I_BEGDA = sy-datum.
    I_BEGDA+6(2) = '01'.
  ENDIF.
  IF I_ENDDA IS INITIAL.
    I_ENDDA = sy-datum.
    CALL FUNCTION 'LAST_DAY_OF_MONTHS'
         EXPORTING
              DAY_IN            = I_BEGDA
         IMPORTING
              LAST_DAY_OF_MONTH = I_ENDDA
         EXCEPTIONS
              DAY_IN_NO_DATE    = 1
              OTHERS            = 2.
  ENDIF.