Code: Alles auswählen.
WRITE sy-timlo TO lv_time USING EDIT MASK '__:__:__'.
CLEAR bdcdata_wa.
bdcdata_wa-fnam = 'BTCH2170-TO_TIME'.
bdcdata_wa-fval = lv_time.
APPEND bdcdata_wa TO bdcdata_tab.
Code: Alles auswählen.
DATA:
lv_date(10) TYPE c,
lv_time_1(8) TYPE c,
lv_time_sub(8) TYPE c.
WRITE sy-timlo TO lv_time_sub.
WRITE sy-timlo TO lv_time_1.
IF lv_time_sub+0(2) >= 01.
lv_time_sub+0(2) = lv_time_sub+0(2) - '01'.
ELSE.
lv_time_sub+0(2) = '23'.
lv_date+0(2) = lv_date+0(2) - '01'.
ENDIF.
WRITE lv_time_sub+0(2) TO lv_time_1+0(2) USING EDIT MASK '__:__:__'.