* Fiscal Year
PARAMETERS p_gjahr TYPE bkpf-gjahr OBLIGATORY VALUE CHECK.
DATA lv_monat(2) TYPE c. "month
DATA lv_fs_date TYPE sy-datum.
DATA lv_ls_date TYPE sy-datum.
CONCATENATE p_gjahr lv_monat '01' INTO lv_fs_date.
一、 取每月最后一天
CALL FUNCTION 'DATE_GET_MONTH_LASTDAY'
EXPORTING
i_date = lv_fs_date
IMPORTING
e_date = lv_ls_date.
lv_gl_data-day = lv_ls_date+6(2).
二、 从日期取周
CALL FUNCTION 'DATE_GET_WEEK'
EXPORTING
DATE = LV_DATE
IMPORTING
WEEK = LV_WEEK
EXCEPTIONS
DATE_INVALID = 1
OTHERS = 2.