helpf.pro
Регистрация
 +2 
Распечатать

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

Код 1C v 8.х
 // пример от glory01
А = Формат('20020820153309', "ДФ=ММММ")
// А = "Август"
А = Формат(ТекущаяДата(), "ДФ=ММММ")
// А = "Март"


Код 1C v 7.x
  Функция МесяцПрописью(НомерМесяца) Экспорт
НомерМесяца=Число(НомерМесяца);
Если НомерМесяца = 1 Тогда
Возврат "Январь";
ИначеЕсли НомерМесяца = 2 Тогда
Возврат "Февраль";
ИначеЕсли НомерМесяца = 3 Тогда
Возврат "Март";
ИначеЕсли НомерМесяца = 4 Тогда
Возврат "Апрель";
ИначеЕсли НомерМесяца = 5 Тогда
Возврат "Май";
ИначеЕсли НомерМесяца = 6 Тогда
Возврат "Июнь";
ИначеЕсли НомерМесяца = 7 Тогда
Возврат "Июль";
ИначеЕсли НомерМесяца = 8 Тогда
Возврат "Август";
ИначеЕсли НомерМесяца = 9 Тогда
Возврат "Сентябрь";
ИначеЕсли НомерМесяца = 10 Тогда
Возврат "Октябрь";
ИначеЕсли НомерМесяца = 11 Тогда
Возврат "Ноябрь";
ИначеЕсли НомерМесяца = 12 Тогда
Возврат "Декабрь";
Иначе
Возврат "";
КонецЕсли;
конецфункции
Разместил:   Версии: | 7.x | 8.x |  Дата:   Прочитано: 23086
 +2 
Распечатать
Возможно, вас также заинтересует
Cклонения по падежам 4
НаКлиенте Процедура Команда1(Команда) ФИО = " Иванов Иван Иванович" ; Падеж = 2; Пол = 1; Результат = СклонениеФИО(ФИО, Падеж, пол); Сообщить(Результат); КонецПроцедуры НаСервере Функция СклонениеФИО(ФИО, Падеж, пол) ...
Автоматическая выгрузка загрузка данных используя регламентное задание 1
Для обмена данными между программами необходимо сделать следующее: 1. При помощи Конвертации Данных создать правила выгрузки данных 2. Нужно чтобы в конфигурации была обработка УниверсальныйОбменДаннымиXML ,...
Ввод документа на основании - Программно 5
НовДок = Документы.ПеречислениеНДФЛвБюджет.СоздатьДокумент(); //Заполнить - вызывает ОбработкаЗаполнения(Основание) в документе ПеречислениеНДФЛвБюджет ...
Ввод дополнительного ежегодного отпуска 0
Вид расчета, используемый для начисления оплаты дополнительного ежегодного отпуска , описывается в плане видов расчета Основные начисления организаций . Новый вид расчета удобнее создать копированием...
Выбрать движения, получить выборку записей регистра накопления 0
Пример 1 : //Взаиморасчеты за период, хотя, это лучше выбирать запросом , он в примере 3 Отбор = Новый Структура("Организация", Организация); НаборЗаписей =...
Посмотреть все результаты поиска похожих
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.