ABAP日期函式

weilish發表於2010-09-06
函式

計算兩個日期間的工作天數,就是剔除了雙休日後的天數.( 待考證)
DATE_CONVERT_TO_FACTORYDATE
HR_HK_DIFF_BT_2_DATES


根據當前時間如何找到上月的第一天 和最後一天？
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      MONDAY                          2008.01.07 SUNDAY                          2008.01.13 FM：DAY_IN_WEEK(輸入日期是星期幾)

輸入參 數                        值
DATUM                           2008.01.09
輸出引數                        值
WOTNR                           3          

*更多關於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)TYPEc.
ATSELECTION-SCREENONVALUE-REQUESTFORp1.
  DATA:l_dateTYPEsy-datum.
  CALLFUNCTION'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.
  IFsy-subrc <>0.
    MESSAGEIDsy-msgidTYPEsy-msgtyNUMBERsy-msgno
            WITHsy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ENDIF.
   p1 = l_date+0(6).
* check plausibilty of dates
CALL FUNCTION 'DATE_CHECK_PLAUSIBILITY'
     EXPORTING
          DATE = bkdf-dbbdt.
 
TIME_CHECK_PLAUSIBILITY   判斷是不是時間
 
GET_CURRENT_YEAR       得到當前的財政年（fiscal 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 和 WEEK_GET_FIRST_DAY
function date_get_week.
*"----------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*"       IMPORTING
*"             VALUE(DATE) LIKE SCAL-DATE
*"       EXPORTING
*"             VALUE(WEEK) LIKE SCAL-WEEK
*"       EXCEPTIONS
*"              DATE_INVALID
*"----------------------------------------------------------------------

函 數模組作用：
獲得某個日期所在的周。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
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
*"----------------------------------------------------------------------

函 數模組作用：
從資料表中獲得指定語言每週七天的名稱，例如中文就是星期一、星期二……星期日，英文就是Sunday、 Monday……Saturday。

輸入引數：
LANGUAGE：指定語言程式碼，可以省略，如果不填就是當前登入語言。注意，在呼叫時如 果指定某種特定語言，必須用一個位元組的語言程式碼，例如中文是 1、英文是 E……，而不能用 ZH、EN，語言程式碼參見表 T002。

輸 出引數：
RETURN_CODE：返回碼，查詢資料庫獲 得的返回碼。但是由於這個函式會丟擲異常，因此返回碼的作用不大。

表：
WEEKDAY：結構與透明表 T246 相同，用來儲存返回給使用者的週日名稱。

異常：
WEEKDAY_NOT_FOUND：沒有找到週日的描述。

來自 “ ITPUB部落格 ” ，連結：http://blog.itpub.net/16794144/viewspace-672780/，如需轉載，請註明出處，否則將追究法律責任。

相關文章