&НаСервере

Функция ДоступнаРоль(Знач стрРольНаСервере)

            Попытка        

                        Если РольДоступна(стрРольНаСервере) Тогда

                                   Возврат Истина;

                        Иначе

                                   Возврат Ложь;          

                        КонецЕсли;   

            Исключение      

                        Возврат Ложь;

            КонецПопытки;       

КонецФункции

&НаКлиенте

Процедура ПриОткрытии(Отказ)

            Если ДоступнаРоль("УК_Юрист") Тогда

                        Для Каждого Элем Из Элементы Цикл

                                   Если ТипЗнч(Элем) = Тип("ПолеФормы") Тогда

                                               Если Элем.Имя <> "КадастровыйНомер" Тогда

                                                           Элем.Доступность = Ложь; 

                                               КонецЕсли;

                                   КонецЕсли;

                        КонецЦикла;

            КонецЕсли;   

КонецПроцедуры