Перечисления в языке 1С 8.3, 8.2 (в примерах)

Вступайте в мою группу помощник программиста.
В ней мы обсуждаем программирование в 1С.

<<< Документы Константы Перечисления РегистрыБухгалтерии
<<< РегистрыНакопления РегистрыСведений Справочники

Скачать эти примеры в виде тестовой базы (как загрузить, как исследовать)

Полный синтаксис (нажмите, чтобы раскрыть)

/// Как вывести все значения перечисления в 1с 8.3, 8.2
 
&НаСервере
Процедура КакВывестиВсеЗначенияПеречисленияНаСервере()
 
    ВременаГода = Перечисления.ВременаГода;
 
    // первый способ
    Для Каждого Время Из ВременаГода Цикл
        Сообщить(Время);
    КонецЦикла;
 
    // второй способ
    Для Индекс = 0 По ВременаГода.Количество() - 1 Цикл
        Сообщить(ВременаГода.Получить(Индекс));
    КонецЦикла;
 
КонецПроцедуры
 
/// Как открыть форму списка значений перечисления в 1с 8.3, 8.2
 
&НаКлиенте
Процедура КакОткрытьСписокЗначенийПеречисления(Команда)
 
    ОткрытьФорму("Перечисление.ВременаГода.ФормаСписка");
 
КонецПроцедуры
 
/// Как открыть форму выбора значений перечисления в 1с 8.3, 8.2
 
&НаКлиенте
Процедура КакОткрытьФормуВыбораЗначенияПеречисления(Команда)
 
    ОповещениеОЗакрытии = Новый ОписаниеОповещения("ПослеВыбораПеречисления",
        ЭтотОбъект);
 
    ОткрытьФорму("Перечисление.ВременаГода.ФормаВыбора",,,,,,
        ОповещениеОЗакрытии);
 
КонецПроцедуры
 
&НаКлиенте
Процедура ПослеВыбораПеречисления(РезультатЗакрытия,
    ДополнительныеПараметры) Экспорт
 
    Если ЗначениеЗаполнено(РезультатЗакрытия) Тогда
        Сообщить(РезультатЗакрытия);
    КонецЕсли;
 
КонецПроцедуры
 
/// Скачать и выполнить эти примеры на компьютере

Скачать эти примеры в виде тестовой базы (как загрузить, как исследовать)

Перечисления в языке 1С 8.3, 8.2 (в примерах)

<<< Документы Константы Перечисления РегистрыБухгалтерии
<<< РегистрыНакопления РегистрыСведений Справочники

С уважением, (преподаватель школы 1С программистов и разработчик обновлятора).



Владимир Милькин
Как помочь сайту: расскажите (кнопки поделиться ниже) о нём своим друзьям и коллегам. Сделайте это один раз и вы внесете существенный вклад в развитие сайта. На сайте нет рекламы, но чем больше людей им пользуются, тем больше сил у меня для его поддержки.

Нажмите одну из кнопок, чтобы поделиться: