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