abap--日期处理

1、获取上一个时间

  "月份SEARCH HELP

  DATA: l_month(6) TYPE n.

  l_month = sy-datum+0(6).   “当前月
*  L_MONTH = L_MONTH - 1.

  CALL FUNCTION 'POPUP_TO_SELECT_MONTH'

    EXPORTING

      actual_month               = l_month
*     FACTORY_CALENDAR           = ' '
*     HOLIDAY_CALENDAR           = ' '
*     LANGUAGE                   = SY-LANGU
*     START_COLUMN               = 8
*     START_ROW                  = 5

    IMPORTING

      selected_month             = c_month ”输出月
*     RETURN_CODE                =

    EXCEPTIONS

      factory_calendar_not_found = 1

      holiday_calendar_not_found = 2

      month_not_found            = 3

      OTHERS                     = 4.

2、获取某月最后一天

DATA: i_todate TYPE sy-datum.

  

    CALL FUNCTION 'LAST_DAY_OF_MONTHS'

    EXPORTING

       day_in             = '20160201'

    IMPORTING

       last_day_of_month = i_todate “输出参数

    EXCEPTIONS

       day_in_no_date     = 1

      OTHERS             = 2.

  WRITE i_todate.