Преобразование строки в дату.

Работа со строками в БСП 3.0

Общий модуль СтроковыеФункцииКлиентСервер

  Дата  = СтроковыеФункцииКлиентСервер.СтрокаВДату(Значение );   

Преобразует исходную строку в дату.

Параметры:
Значение – Строка – строка, которую необходимо привести к дате.
Формат даты должен быть в виде “ДД.ММ.ГГГГ” или “ДД/ММ/ГГ” или “ДД-ММ-ГГ”

Например, “23.02.1980” или “23/02/80”.
Возвращаемое значение: Дата – полученная дата.

Функция СтрокаВДату(Знач Значение) Экспорт
 Значение = СтрЗаменить(Значение, " ", "");
 Значение = СокрЛП(СтрЗаменить(Значение, ".", ""));
 Значение = СокрЛП(СтрЗаменить(Значение, "/", "")); 
Значение = СокрЛП(СтрЗаменить(Значение, "-", "")); 
Значение = Сред(Значение, 5) + Сред(Значение, 3, 2) + Лев(Значение, 2);
 Если СтрДлина(Значение) = 6 Тогда 
    Год = СтрокаВЧисло(Лев(Значение, 2));
     Если Год = Неопределено Тогда
          Возврат Дата('0001.01.01');
     КонецЕсли; 
    Значение = ?(Год > 29, "19", "20") + Значение; 
КонецЕсли; 
ОписаниеТипа = Новый ОписаниеТипов("Дата"); 
Результат    = ОписаниеТипа.ПривестиЗначение(Значение);
 Возврат Результат;
 КонецФункции 

См. также

• Разложить Строку В Массив Слов
• Добавление нулей слева или справа от номера
• Извлечь Текст Из HTML
• Является ли строка уникальным идентификатором

Автор публикации

не в сети 2 недели

master1c8

0

Комментарии: 16Публикации: 447Регистрация: 25-12-2016