Помогите доделать обработку.
X

Привет дорогой друг

Наш сайт существует и развиваетется за счет рекламы. Пожалуйста, отключите блокировку рекламы AdBlock или подобное, для нашего сайта. Спасибо!
Показано с 1 по 2 из 2
  1. #1
    Гость форума

    Регистрация
    13.06.2019
    Сообщений
    1
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях

    По умолчанию Помогите доделать обработку.

    Только устроился работать, и практики код в стиле "Хелло Ворлд".
    Попросили по правам доступа обработку сделать, вроде нашел, доработал. Хотел делать через СКД, но так и не понял, как обратиться к метаданным.
    Вот код:


    Код:
    		мПользователей = ПользователиИнформационнойБазы.ПолучитьПользователей() ;
    	  
    		Для Каждого Пользователь Из мПользователей Цикл
    		
    			
    
    		
    		ОбластьСтрока.Параметры.Пользователь = Пользователь.ПолноеИмя;
    		ТабДок.Вывести(ОбластьСтрока);
    				Для Каждого спр Из Метаданные.Справочники Цикл
    			ОбластьСтрокаПр.Параметры.Чтение = ПравоДоступа_("Чтение",спр,Пользователь);
    			ОбластьСтрокаПр.Параметры.Просмотр = ПравоДоступа_("Просмотр",спр,Пользователь);
    			ОбластьСтрокаПр.Параметры.Изменение = ПравоДоступа_("Изменение",спр,Пользователь);
    			ОбластьСтрокаПр.Параметры.Редактирование = ПравоДоступа_("Редактирование",спр,Пользователь);
    			ТабДок.Присоединить(ОбластьСтрокаПр);
    		КонецЦикла;
    		                                         
    		Для Каждого док Из Метаданные.Документы Цикл
    			ОбластьСтрокаПр.Параметры.Чтение = ПравоДоступа_("Чтение",док,Пользователь);
    			ОбластьСтрокаПр.Параметры.Просмотр = ПравоДоступа_("Просмотр",док,Пользователь);
    			ОбластьСтрокаПр.Параметры.Изменение = ПравоДоступа_("Изменение",док,Пользователь);
    			ОбластьСтрокаПр.Параметры.Редактирование = ПравоДоступа_("Редактирование",док,Пользователь);
    			ТабДок.Присоединить(ОбластьСтрокаПр);
    		КонецЦикла;
    	КонецЦикла;
    Появилось пожелание, чтоб выводились, только те пользователи, у которых стоит галочка "Аутентификация 1С предприятия".
    Кто даст мудрый совет, буду благодарен, если в Москве, то угощаю пивом, если леди то шоколадом. :cool:

  2. #2
    Гость форума

    Регистрация
    23.06.2019
    Сообщений
    1
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях

    По умолчанию Re: Помогите доделать обработку.

    Наверное уже не актуально, первые две строки замени на эти:
    мПользователей = ПользователиИнформационно йБазы.ПолучитьПользовател� �й() ;

    Для Каждого Пользователь Из мПользователей Цикл
    Если Пользователь .АутентификацияСтандартна� � тогда


    ....... все что далее написано


    КонецЕсли;
    КонецЦикла;

Похожие темы

  1. помогите найти обработку загрузки контрагентов в УТ 11.1
    от loschilov в разделе Конфигурирование, программирование 1С - Предприятие
    Ответов: 0
    Последнее сообщение: 01.03.2016, 11:15
  2. Помогите подправить внешнюю обработку для 1С 8.2.
    от OceaN в разделе Конфигурирование, программирование 1С - Предприятие
    Ответов: 11
    Последнее сообщение: 19.12.2013, 10:57

Социальные закладки

Социальные закладки

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •