Простой вопрос. Парсинг даты. дд.мм.гггг - > день. месяц. год.

chizz

Добрый день!

Не могу решить простейшую проблему.
Необходимо преобразовать 10.11.1988 в

lv_day = '10'.
lv_month = 'ноябрь'
lv_year = '1988'

lv_day и lv_year можно получить вырезав нужные символы из строки "10.11.1988".
Есть у кого-нибудь красивая подпрограммка, которая возвращает месяц на русском. Или ФМ какой-нибудь? А лучше все сразу - день, месяц, год?

Спасибо

ArmAnn

Месяц на русском можно взять из табл. T015M

chizz

Спасибо!

Написал маленькую подпрограммку. Вроде работает.

Code:

* парсит дату в формате ггггммдд. возвращает день (дд), месяц (текст на русском), год (гггг)
 form ParseDate
   USING input_date
   CHANGING day month year .

   DATA: lv_date type string.

   MOVE input_date to lv_date.
   day = lv_date+6(2).
   select SINGLE MONAM into month FROM T015M where MONUM =  lv_date+4(2) AND SPRAS = 'R'.
   year = lv_date+0(4).

   endform.

ArmAnn

Вместо

Code:

SPRAS = 'R'

Пишите лучше

Code:

SPRAS = sy-langu

так оно красивее

Burning

Программу уже выложили в студию, а вот ФМ MONTH_NAMES_GET. :wink:

Paul_80

Тож понтанусь :mrgreen:

более актуальным, имхо, в данной задаче будет ФМ HR_RU_MONTH_NAME_IN_GENITIVE, возвращающий наименование месяца на языке логона в родительном падеже. Реализация, правда, у него аховая... :roll:

LinevskiySV

ArmAnn написал:

Месяц на русском можно взять из табл. T015M

еще T247

SYS

Paul_80 написал:

более актуальным, имхо, в данной задаче будет ФМ HR_RU_MONTH_NAME_IN_GENITIVE, возвращающий наименование месяца на языке логона в родительном падеже. Реализация, правда, у него аховая... :roll:

А в чём "аховость"? По-моему, у нас в ближайшее время не предвидится изменение кол-ва месяцев в календаре. Да и быстрее работает чем выбирать из таблицы.

Правила форума

Простой вопрос. Парсинг даты. дд.мм.гггг - > день. месяц. год.

Кто сейчас на конференции