时间函数大饱眼福
ABAP日期函數(求月末日,第幾周,search help 只顯示年月) 使用方法實例
計算兩個日期間的工作天數,就是剔除了雙休日后的天數.( 待考證)
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????? <----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)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_DAYfunction 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:沒有找到周日的描述。
總結
- 上一篇: ABAP EXCEL 上传 和下载 过程
- 下一篇: 惨绝人寰的日期函数,用的方便