[Func] 두날짜 사이의 주차계산

[우승권]

FUNCTION Z_GET_CALC_WEEK_DATE.
*"----------------------------------------------------------------------
*"*"Local interface:
*" IMPORTING
*" VALUE(F_DATE) LIKE SCAL-DATE
*" VALUE(T_DATE) LIKE SCAL-DATE
*" EXPORTING
*" VALUE(WEEKS) TYPE I
*"----------------------------------------------------------------------
DATA : FWEEK LIKE SCAL-WEEK,
TWEEK LIKE SCAL-WEEK.

CALL FUNCTION 'DATE_GET_WEEK'
EXPORTING DATE = F_DATE
IMPORTING WEEK = FWEEK.

CALL FUNCTION 'DATE_GET_WEEK'
EXPORTING DATE = T_DATE
IMPORTING WEEK = TWEEK.

CALL FUNCTION 'Z_GET_CALC_WEEK_DIFF'
EXPORTING F_WEEK = FWEEK
T_WEEK = TWEEK
IMPORTING WEEKS = WEEKS.

ENDFUNCTION.