Подскажите как написать функцию которая преобразовывает строку в дату. Вытягиваю данные из гугл таблицы по ссылке. На выводе получаю
![66a0f7641df40966934349.png](https://habrastorage.org/webt/66/a0/f7/66a0f7641df40966934349.png)
ТЗ = Новый ТаблицаЗначений;
ТЗ.Колонки.Добавить("РНС", ОбщегоНазначения.ОписаниеТипаДата(ЧастиДаты.Дата));
ТЗ.Колонки.Добавить("Старт_ПРОДАЖ", ОбщегоНазначения.ОписаниеТипаДата(ЧастиДаты.Дата));
ТЗ.Колонки.Добавить("НВВОД", ОбщегоНазначения.ОписаниеТипаДата(ЧастиДаты.Дата));
ТЗ.Колонки.Добавить("Начало_проекта", ОбщегоНазначения.ОписаниеТипаДата(ЧастиДаты.Дата));
ТЗ.Колонки.Добавить("Наименование", Новый ОписаниеТипов("Строка",,,,Новый КвалификаторыСтроки(20)));
Для Каждого Стр Из ТЗ Цикл
Стр.ДатаРНС_Google = СтрокаВДату(Стр.РНС); //НАЧА ПИСАТЬ ФУНКЦИЮ
КонецЦикла;
ТЗ.СкопироватьКолонки("РНС", "Старт_ПРОДАЖ", "НВВОД", "Начало_проекта", "Наименование");
Подскажите пожалуйста пробую так
&НаСервере
Функция СтрокаВДату (Стр)
НомерСимволаСточкой = СтрНайти(Стр,".");
ЛеваяЧ = Лев(Стр, НомерСимволаСточкой -1);
ПравЧ = Сред(Стр,НомерСимволаСточкой +1);
Лев(Стр, СтрНайти(Стр,"."));
Если ЛеваяЧ = "Янв" Тогда
Месяц = 1;
ИначеЕсли ЛеваяЧ = "Февр" Тогда
Месяц = 2;
ИначеЕсли ЛеваяЧ = "Мар" Тогда
Месяц = 3;
ИначеЕсли ЛеваяЧ = "Апр" Тогда
Месяц = 4;
ИначеЕсли ЛеваяЧ = "Май" Тогда
Месяц = 5;
ИначеЕсли ЛеваяЧ = "Июнь" Тогда
Месяц = 6;
ИначеЕсли ЛеваяЧ = "Июль" Тогда
Месяц = 7;
ИначеЕсли ЛеваяЧ = "Авг" Тогда
Месяц = 8;
ИначеЕсли ЛеваяЧ = "Сен" Тогда
Месяц = 9;
ИначеЕсли ЛеваяЧ = "Окт" Тогда
Месяц = 10;
ИначеЕсли ЛеваяЧ = "Ноя" Тогда
Месяц = 11;
ИначеЕсли ЛеваяЧ = "Дек" Тогда
Месяц = 12;
КонецЕсли;
Год = Число(ПравЧ)+ 2000;
Возврат Дата(Год,Месяц,1)
КонецФункции
не летит