1С-Предприятие 8.0. Практическое пособие разработчика


         

Вывести значения всех констант, существующих


Набор.Бухгалтер = "Николаева Людмила Сергеевна";

Набор.Записать(); [566]

















//  СоздатьМенеджерЗначения()





//Пример: Вывести значения всех констант, существующих в конфигурации

Для Каждого ОчереднаяКонстанта Из Константы Цикл

   ИмяКонст = ОчереднаяКонстанта.СоздатьМенеджерЗначения().Метаданные().Имя;

   ЗначениеКонст = ОчереднаяКонстанта.Получить();

   Сообщить("Константа "+ИмяКонст+" = "+ЗначениеКонст);

КонецЦикла; [567]




Содержание  Назад  Вперед