01.01.2014 to 20140101
DATA: l_calday TYPE D.
DATA: l_char10 TYPE C LENGTH 10. "Для преобразования даты
SELECT SINGLE LOW FROM TVARVC INTO l_char10
WHERE NAME = 'Z_PTWINC_CALDAY' .
"Обработка формата даты с точками
IF STRLEN( l_char10 ) = 10.
CONCATENATE l_char10+6(4) "Год
l_char10+3(2) "Месяц
l_char10+0(2) "День
INTO l_char10.
ENDIF.
l_calday = l_char10.
SELECT SINGLE LOW FROM TVARVC INTO l_char10
WHERE NAME = 'Z_PTWINC_CALDAY' .
"Обработка формата даты с точками
IF STRLEN( l_char10 ) = 10.
CONCATENATE l_char10+6(4) "Год
l_char10+3(2) "Месяц
l_char10+0(2) "День
INTO l_char10.
ENDIF.
l_calday = l_char10.
Комментариев нет:
Отправить комментарий