通過 Function Module 獲得日期所在的周數
所屬 Function Group：SCAL

DATA:today TYPE d VALUE ’20090115′,
????? week TYPE scal-week."YYYYWW

CALL FUNCTION ‘DATE_GET_WEEK’
? EXPORTING
??? date???????? = today"SCAL-DATE = sy-datum = D
? IMPORTING
??? week???????? = week
? EXCEPTIONS
??? date_invalid = 1
??? OTHERS?????? = 2.
IF sy-subrc <> 0.
? MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
????????? WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.

WRITE:week+4(2).

結果：03
————
注意：
1、返回參數 week 里的格式為 YYYYWW ，所以需要使用偏移量（ week+4(2) ）獲得周數。
2、該函數無法處理 1901.01.01 之前及9999.12.31之后的日期，相關源代碼：
*—START
? if date gt ’99991231′.
??? raise date_invalid.
? endif.

? s_absolut_date = date."s_absolut_date type p
? if s_absolut_date lt 367.??????????? "367 = 01.01.1901
??? raise date_invalid.
? endif.

總結

以上是生活随笔為你收集整理的DATE_GET_WEEK的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。