понедельник, 9 сентября 2013 г.

Узнать доступную роль на константу.

а = Метаданные.Константы.НастройкаПодчиненногоУзлаРИБЗавершена;
    для Каждого стр из Метаданные.Роли Цикл
        Если ПараметрыДоступа("Просмотр", а , "Значение",стр).Доступность=Истина Тогда
            Сообщить(стр.синоним);
        КонецЕсли;
    КонецЦикла;