1CLenta.ru  

Вывести месяц прописью

Программирование системы     17.05.2016 11:50     1695

Во встроенном языке 1С есть функция Формат(), которая позволяет задавать формат вывода даты.Используя форматную строку можно задать формат вывода при котором выведется число месяца и месяц прописью. Если необходимо получить только месяц прописью, то можно воспользоваться функциями представленными ниже.

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


Функция встроенного языка 1С, приводит дату к определенному формату. Функция Формат() форматирует дату, число, булевое значение. С помощью форматной строки можно задать вывод месяца прописью. Месяц прописью склоняется только вместе с номером дня месяца. С помощью функции Сред() встроенного языка 1С, можно вырезать наименование месяца.
Пример
Дата = 17.05.2016
Результат = "мая"

Функция ПолучитьМесяцПрописью(Дата)

ТекущаяДата = Формат(Дата, "ДФ='дд ММММ'");
МесяцПрописью = Сред(ТекущаяДата, 4);
Возврат МесяцПрописью;

КонецФункции


Функция ПолучитьМесяцПрописью()


Данная функция работает более гибко. Например, позволяет задать регистр букв в наименовании месяца или установить падеж. На вход принимает дату, а возвращает месяц прописью.
Пример
Дата = 17.05.2016
Результат = "мая"

Функция ПолучитьМесяцПрописью(Дата)

НомерМесяца = Месяц(Дата);

СоответствиеМесяцов = Новый Соответствие();
СоответствиеМесяцов.Вставить(1, "января");
СоответствиеМесяцов.Вставить(2, "февраля");
СоответствиеМесяцов.Вставить(3, "марта");
СоответствиеМесяцов.Вставить(4, "апреля");
СоответствиеМесяцов.Вставить(5, "мая");
СоответствиеМесяцов.Вставить(6, "июня");
СоответствиеМесяцов.Вставить(7, "июля");
СоответствиеМесяцов.Вставить(8, "августа");
СоответствиеМесяцов.Вставить(9, "сентября");
СоответствиеМесяцов.Вставить(10, "октября");
СоответствиеМесяцов.Вставить(11, "ноября");
СоответствиеМесяцов.Вставить(12, "декабря");

Возврат СоответствиеМесяцов[НомерМесяца];

КонецФункции

Комментарии (0)

Для того чтобы добавить сообщение, необходимо Войти или Зарегистрироваться

 
 


Регистрация