Показано с 1 по 2 из 2
Комбинированный просмотр
-
13.06.2019, 19:14 #1
- Регистрация
- 13.06.2019
- Сообщений
- 1
- Сказал(а) спасибо
- 0
- Поблагодарили 0 раз(а) в 0 сообщениях
Помогите доделать обработку.
Только устроился работать, и практики код в стиле "Хелло Ворлд".
Попросили по правам доступа обработку сделать, вроде нашел, доработал. Хотел делать через СКД, но так и не понял, как обратиться к метаданным.
Вот код:
Код:мПользователей = ПользователиИнформационнойБазы.ПолучитьПользователей() ; Для Каждого Пользователь Из мПользователей Цикл ОбластьСтрока.Параметры.Пользователь = Пользователь.ПолноеИмя; ТабДок.Вывести(ОбластьСтрока); Для Каждого спр Из Метаданные.Справочники Цикл ОбластьСтрокаПр.Параметры.Чтение = ПравоДоступа_("Чтение",спр,Пользователь); ОбластьСтрокаПр.Параметры.Просмотр = ПравоДоступа_("Просмотр",спр,Пользователь); ОбластьСтрокаПр.Параметры.Изменение = ПравоДоступа_("Изменение",спр,Пользователь); ОбластьСтрокаПр.Параметры.Редактирование = ПравоДоступа_("Редактирование",спр,Пользователь); ТабДок.Присоединить(ОбластьСтрокаПр); КонецЦикла; Для Каждого док Из Метаданные.Документы Цикл ОбластьСтрокаПр.Параметры.Чтение = ПравоДоступа_("Чтение",док,Пользователь); ОбластьСтрокаПр.Параметры.Просмотр = ПравоДоступа_("Просмотр",док,Пользователь); ОбластьСтрокаПр.Параметры.Изменение = ПравоДоступа_("Изменение",док,Пользователь); ОбластьСтрокаПр.Параметры.Редактирование = ПравоДоступа_("Редактирование",док,Пользователь); ТабДок.Присоединить(ОбластьСтрокаПр); КонецЦикла; КонецЦикла;
Кто даст мудрый совет, буду благодарен, если в Москве, то угощаю пивом, если леди то шоколадом. :cool:
-
23.06.2019, 21:28 #2
- Регистрация
- 23.06.2019
- Сообщений
- 1
- Сказал(а) спасибо
- 0
- Поблагодарили 0 раз(а) в 0 сообщениях
Re: Помогите доделать обработку.
Наверное уже не актуально, первые две строки замени на эти:
мПользователей = ПользователиИнформационно йБазы.ПолучитьПользовател� �й() ;
Для Каждого Пользователь Из мПользователей Цикл
Если Пользователь .АутентификацияСтандартна� � тогда
....... все что далее написано
КонецЕсли;
КонецЦикла;
Похожие темы
-
помогите найти обработку загрузки контрагентов в УТ 11.1
от loschilov в разделе Конфигурирование, программирование 1С - ПредприятиеОтветов: 0Последнее сообщение: 01.03.2016, 11:15 -
Помогите подправить внешнюю обработку для 1С 8.2.
от OceaN в разделе Конфигурирование, программирование 1С - ПредприятиеОтветов: 11Последнее сообщение: 19.12.2013, 10:57
Социальные закладки