1С 7.x : Функция месяц прописью

 // пример от glory01

А = Формат('20020820153309', "ДФ=ММММ")

// А = "Август"

А = Формат(ТекущаяДата(), "ДФ=ММММ")

// А = "Март"

   

  Функция МесяцПрописью(НомерМесяца) Экспорт

    НомерМесяца=Число(НомерМесяца);

	Если НомерМесяца = 1 Тогда

		Возврат "Январь";

	ИначеЕсли НомерМесяца = 2 Тогда

		Возврат "Февраль";

	ИначеЕсли НомерМесяца = 3 Тогда

		Возврат "Март";

	ИначеЕсли НомерМесяца = 4 Тогда

		Возврат "Апрель";

	ИначеЕсли НомерМесяца = 5 Тогда

		Возврат "Май";

	ИначеЕсли НомерМесяца = 6 Тогда

		Возврат "Июнь";

	ИначеЕсли НомерМесяца = 7 Тогда

		Возврат "Июль";

	ИначеЕсли НомерМесяца = 8 Тогда

		Возврат "Август";

	ИначеЕсли НомерМесяца = 9 Тогда

		Возврат "Сентябрь";

	ИначеЕсли НомерМесяца = 10 Тогда

		Возврат "Октябрь";

	ИначеЕсли НомерМесяца = 11 Тогда

		Возврат "Ноябрь";

	ИначеЕсли НомерМесяца = 12 Тогда

		Возврат "Декабрь";

	Иначе

		Возврат "";

	КонецЕсли;

конецфункции