[ABAP] 시간, 날짜 계산함수

data : lf_time_begin type sy-uzeit,
      lf_time_end type sy-uzeit.
data : lf_date_end type sy-datum,
        lf_date_begin type sy-datum.

lf_time_begin = sy-uzeit.
lf_date_begin = sy-datum.

call function 'TSTR_CALC_TIME'
  exporting
*   IV_CALENDARID            = m_timestream-calendarid
*   IV_TSTREAMID             = m_timestream-tstreamid
    iv_begin_datelocal_req   = lf_date_begin   " 시작 일자
    iv_begin_timelocal_req   = lf_time_begin   " 시작 시간
    iv_duration_integer      = 2                   "  단위는 초...
    iv_direction             = '-'                        "   ==> +(미래) / -(과거)
*   IV_SPLIT_ALLOWED         = 'X'
  importing
    ev_end_datelocal         = lf_date_end
    ev_end_timelocal         = lf_time_end
  exceptions
    fatal_error              = 1
    time_invalid             = 2
    time_missing             = 3
    tstream_not_loadable     = 4
    tstream_generation_error = 5
    parameter_error          = 6
    unspecified_error        = 7
    others                   = 8.

write :/ sy-uzeit.
write :/ lf_time_end.

  CALL FUNCTION 'RP_CALC_DATE_IN_INTERVAL'
    EXPORTING
      date      = sy-datum
      days      = '00'
      months    = '01'
      signum    = '-'
      years     = '00'
    IMPORTING
      calc_date = lv_datum.