Имя: Пароль:
1C
 
С полными правами все работает, через УстановитьПривилегированныйРежим(Истина) не работае
,
0 SkillUp
 
25.02.19
14:57
Код:

В первой процедуре процедуре:

// Процедура открытия обработки.
//
Процедура ОткрытьОбработку(Элемент)
УстановитьПривилегированныйРежим(Истина);    
ЭтаФорма.ВладелецФормы.ОткрытьОбработку(Элемент);

Вторая:
Процедура ПриОткрытии()
    
    Попытка
        СписокПользователей = ПолныеПрава.ПолучитьСписокПользователейОбр(); Тут ,если не полные права- ошибка!!!
    
    КонецПопытки;
    ОбновитьСписокАктивных();
    
КонецПроцедуры

Пытаюсь через УстановитьПривилегированныйРежим(Истина), не срабатывает? Как обойти проблему?
1 SkillUp
 
25.02.19
14:58
Блинг, секцию перепутал, в 1С надо...
2 ДенисЧ
 
25.02.19
14:59
А ЖР что написано после этого?
3 SkillUp
 
25.02.19
15:00
(2)  ОбновитьСписокАктивных()-это?
4 butterbean
 
25.02.19
15:00
УстановитьПривилегированныйРежим работает только в том контексте где вызывается, т.е. в открываемой обработке не работает
5 SkillUp
 
25.02.19
15:00
(2) Не понял...
6 SkillUp
 
25.02.19
15:00
(4) Обычное приложение у меня...
7 ДенисЧ
 
25.02.19
15:01
(5) Бывает.... Позови того, кто умеет читать по-русски....
8 ДенисЧ
 
25.02.19
15:01
(4) Во внешних обработках оно принципиально не работает....
9 SkillUp
 
25.02.19
15:01
(7) )
10 SkillUp
 
25.02.19
15:02
(8) Это встроенная...
11 SkillUp
 
25.02.19
15:02
(7) Как быть?!
12 SkillUp
 
25.02.19
15:03
)
13 butterbean
 
25.02.19
15:05
(11) устанавливать привилегированный режим в обработке, в процедуре ПриОткрытии
14 SkillUp
 
25.02.19
15:05
(13) Пробовал, не работает...
15 Провинциальный 1сник
 
25.02.19
15:08
(8) В присоединенных через справочник работает
16 SkillUp
 
25.02.19
15:08
(13) Вот так делал:

    УстановитьПривилегированныйРежим(Истина);
    
    Попытка
        СписокПользователей = ПолныеПрава.ПолучитьСписокПользователейОбр();
        Для Каждого Пользователь  из СписокПольЗователей цикл
            ТекПользователь =ПользователиИнформационнойБазы.НайтиПоИмени(Пользователь.Имя);
            Если ТекПользователь.ПоказыватьВСпискеВыбора = Истина  Тогда
                ПользовательСпр = Справочники.Пользователи.НайтиПоКоду(Пользователь.Имя);
                Если ПользовательСпр <> Справочники.Пользователи.ПустаяСсылка() Тогда
                    Если ПользовательСпр = ТекущийПользователь Тогда
                        Продолжить;
                    КонецЕсли;
                    стр = Пользователи.Добавить();
                    стр.Пользователь = ПользовательСпр;
                    стр.Имя = ПользовательСпр.Код;
                КонецЕсли;
            КонецЕсли;
        КонецЦикла;
    Исключение
    КонецПопытки;
    ОбновитьСписокАктивных();
    УстановитьПривилегированныйРежим(Ложь);
17 SkillUp
 
25.02.19
15:10
(15) Можно чуть понятней, пож...
18 SkillUp
 
25.02.19
15:11
Все разобрался, ребят спасибо!!!
Проблемы невозможно решaть нa том же уровне компетентности, нa котором они возникaют. Альберт Эйнштейн