ABAP 日期函數

最新推荐文章于 2024-04-26 09:52:22 发布

twty5210

最新推荐文章于 2024-04-26 09:52:22 发布

阅读量2.5k

点赞数

文章标签： date function calendar conflict attributes output

本文链接：https://blog.csdn.net/twty5210/article/details/5968666

版权

-----------轉日期格式
1. CONVERSION_EXIT_IDATE_OUTPUT

INPUT: 20080203

OUTPUT: FEB032008

2. CONVERT_DATE_TO_EXTERNAL

INPUT: 20080203

OUTPUT: 02/03/2008 "According to user's default setting.

3. CONVERT_DATE_TO_INTERNAL

INPUT: 02/03/2008 "Should be same as the user's default setting

    OUPUT:     20080203
------------------------
根據當前時間如何找到上月的第一天和最後一天？
CALL FUNCTION 'FIMA_DATE_CREATE'
        EXPORTING
             I_DATE                  = SY-DATUM
             I_MONTHS                = '-1'
             I_SET_LAST_DAY_OF_MONTH = 'X'
        IMPORTING
             E_DATE                  = LASTDATE.
LASTDATE是上個月最後一天。
FIRSTDAY是上月第一天
CONCATENATE LASTDATE+(6) '01' INTO FIRSTDAY.

當天是當年的第幾周
DATE_GET_WEEK
得到該周第一天
WEEK_GET_FIRST_DAY
查找當前月份以前的月份（比如現在是4月份，如果我需要知道6個月之前是哪個
月）
CCM_GO_BACK_MONTHS
RP_CALC_DATE_IN_INTERVAL
獲取兩日期之間天數函數
FIMA_DAYS_AND_MONTHS_AND_YEARS
取得當月的第一天和最後一天
CONCATENATE sy-datum(6) '01' INTO so_date-low.
CALL FUNCTION 'BKK_GET_MONTH_LASTDAY'
   EXPORTING
     i_date = sy-datum
   IMPORTING
     e_date = so_date-high.
so_date-sign = 'I'. so_date-option = 'BT'. APPEND so_date.
年月日加減

RP_CALC_DATE_IN_INTERVAL

日期有效性檢查

DATE_CHECK_PLAUSIBILITY

兩日期作差
SD_DATETIME_DIFFERENCE

把輸入日期轉?工廠日曆日期
DATE_CONVERT_TO_FACTORYDATE

獲得所有的月和名字

MONTH_NAMES_GET

彈出一個視窗顯示一個日曆允許用戶選擇一個日期
F4_DATE　　　

獲得一個月的最後一天
RP_LAST_DAY_OF_MONTHS

獲得期間首日
FIRST_DAY_IN_PERIOD_GET

獲得期間末日
LAST_DAY_IN_PERIOD_GET

返回一個日期所在的周數
DATE_GET_WEEK

獲得兩個日期的年數
CALL FUNCTION 'HR_99S_INTERVAL_BETWEEN_DATES'
          EXPORTING
            begda   = gdat
            endda   = sy-datum
          IMPORTING
            c_years = l_age.

關於星期(周)的函數
FM：GET_WEEK_INFO_BASED_ON_DATE
輸入參數                        值
DATE                            2008.01.09
輸出參數                        值
WEEK                            200802      <----2008年第二周
MONDAY                          2008.01.07 <----這個周周一的日期
SUNDAY                          2008.01.13 <----周日的日期
FM：DAY_IN_WEEK(輸入日期是星期幾)
輸入參數                        值
DATUM                           2008.01.09
輸出參數                        值
WOTNR                           3           <----2008-1-9?周三

*更多關於Week的函數請看Function Group：CADA
*彈出選擇周的對話方塊
AT SELECTION-SCREEN ON VALUE-REQUEST FOR s_week-low.
PERFORM getweek CHANGING s_week-low.
FORM getweek CHANGING p_week .
DATA: begin_date TYPE d .
CALL FUNCTION 'POPUP_CALENDAR_SDB'
       EXPORTING
            sel_week   = 'X'
            focus_day = sy-datum
       IMPORTING
            begin_date = begin_date.
CALL FUNCTION 'GET_WEEK_INFO_BASED_ON_DATE'
       EXPORTING
            date = begin_date
       IMPORTING
            week = p_week.
ENDFORM.
選擇時間
F4_CLOCK
*需求：只有顯示年月，但要有日期的search help
PARAMETERS:p1(6) TYPE c.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p1.
DATA:l_date TYPE sy-datum.
CALL FUNCTION 'F4_DATE'
    EXPORTING
       date_for_first_month          = sy-datum
    IMPORTING
       select_date                   = l_date
    EXCEPTIONS
       calendar_buffer_not_loadable = 1
       date_after_range              = 2
       date_before_range             = 3
       date_invalid                  = 4
       factory_calendar_not_found    = 5
       holiday_calendar_not_found    = 6
       parameter_conflict            = 7
      OTHERS                        = 8.
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
   p1 = l_date+0(6).
* check plausibility of dates
CALL FUNCTION 'DATE_CHECK_PLAUSIBILITY'
     EXPORTING
          DATE = bkdf-dbbdt.
判斷是不是時間
TIME_CHECK_PLAUSIBILITY
得到當前的財政年（fiscal year）
GET_CURRENT_YEAR

察看某日期的屬性，包括該日期是星期幾，第幾天（周2=2），是不是公共假期
等，需要輸入國家日曆

DAY_ATTRIBUTES_GET
判斷某天是否是假日
HOLIDAY_CHECK_AND_GET_INFO
月份選擇窗口
POPUP_TO_SELECT_MONTH
比較日期和時間
TYPE-POOLS : TRFF .
DATA : X_LOG_OP        TYPE TRFF_TYPE_C_2 .
          CALL FUNCTION 'FIMA_DATE_COMPARE'
          EXPORTING
            I_FLG_INTRADAY = 'X'
            I_DATE         = SY-DATUM
            I_TIME         = SY-UZEIT
            I_COMP_DATE    = L_MODIFY-MODDATE
            I_COMP_TIME    = L_MODIFY-MODTIME
          IMPORTING
            E_LOG_OP       = X_LOG_OP.
p_months = -4."前4月，如果?正，則是後面的日期

CALL FUNCTION 'MONTH_PLUS_DETERMINE'
    EXPORTING
      MONTHS        = p_months
      OLDDATE       = p_date
    IMPORTING
      NEWDATE       = p_date.
獲得某個日期所在的周

DATE_GET_WEEK
function date_get_week.
*"----------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*"       IMPORTING
*"             VALUE(DATE) LIKE SCAL-DATE
*"       EXPORTING
*"             VALUE(WEEK) LIKE SCAL-WEEK
*"       EXCEPTIONS
*"              DATE_INVALID
*"----------------------------------------------------------------------

獲得某周的第一天
WEEK_GET_FIRST_DAY
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
＝＝＝＝＝＝＝＝＝＝
function week_get_first_day.
*"----------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*" IMPORTING
*"     VALUE(WEEK) LIKE SCAL-WEEK
*" EXPORTING
*"     VALUE(DATE) LIKE SCAL-DATE
*" EXCEPTIONS
*"      WEEK_INVALID
*"----------------------------------------------------------------------
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
＝＝＝＝＝＝＝＝＝
上述兩個函數的功能已經包含在 HR_GBSSP_GET_WEEK_DATES 中了。
從資料表中獲得指定語言每周七天的名稱，例如中文就是星期一、星期二……星
期日，英文就是Sunday、Monday……Saturday。
WEEKDAY_GET
FUNCTION WEEKDAY_GET.
*"----------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*"       IMPORTING
*"             VALUE(LANGUAGE) LIKE SY-LANGU DEFAULT SY-LANGU
*"       EXPORTING
*"             VALUE(RETURN_CODE) LIKE SY-SUBRC
*"       TABLES
*"              WEEKDAY STRUCTURE T246
*"       EXCEPTIONS
*"              WEEKDAY_NOT_FOUND
*"----------------------------------------------------------------------