Функция ДатаПрописью(ВыбДата)
Месяц=Месяц(ВыбДата);
Если Месяц=1 Тогда
Месяц="Январь";
ИначеЕсли Месяц=2 Тогда
Месяц="Февраль";
ИначеЕсли Месяц=3 Тогда
Месяц="Март";
ИначеЕсли Месяц=4 Тогда
Месяц="Апрель";
ИначеЕсли Месяц=5 Тогда
Месяц="Май";
ИначеЕсли Месяц=6 Тогда
Месяц="Июнь";
ИначеЕсли Месяц=7 Тогда
Месяц="Июль";
ИначеЕсли Месяц=8 Тогда
Месяц="Август";
ИначеЕсли Месяц=9 Тогда
Месяц="Сентябрь";
ИначеЕсли Месяц=10 Тогда
Месяц="Октябрь";
ИначеЕсли Месяц=11 Тогда
Месяц="Ноябрь";
ИначеЕсли Месяц=12 Тогда
Месяц="Декабрь";
КонецЕсли;