Имя: Пароль:
1C
 
Не могу получить группу пользователей чтобы предать ее в параметры сеанса в 8.2
0 Bober777
 
06.03.09
13:03
Не могу получить группу пользователей чтобы предать ее в параметры сеанса в 8.2 в конфигурации архив. Для того что бы соответственно использовать эту группу потом в RLS для прав юзверей.

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

&НаСервере
Процедура УстановитьЗначениеПараметраСеанса(ИмяПараметра, УстановленныеПараметры)    
   // Конец УниверсальныеМеханизмы
   Если УстановленныеПараметры.Свойство(ИмяПараметра) Тогда
       Возврат;
   КонецЕсли;
   // Конец УниверсальныеМеханизмы
   
   // Переопределяемый блок
   
   // Дописывается по шаблону:    
   //Если ИмяПараметра = <ИмяПараметра> Тогда        
   //    УстановленныеПараметры.Вставить(<ИмяПараметра>);
   //КонецЕсли;
   //Если ИмяПраметра = "ГруппыТекущегоПользователя" Тогда
   //УстановленныеПараметры.Вставить("ГруппыТекущегоПользователя");    
   // КонецЕсли;
       Если ИмяПараметра = "ГруппыТекущегоПользователя" Тогда
       //ПолныеПрава.УстановитьПараметрыМеханизмаОграниченияПрав();
       УстановленныеПараметры.Вставить("ГруппыТекущегоПользователя");
       УстановленныеПараметры.ГруппыТекущегоПользователя = ПолучитьГруппаТекПользователя();
       //Сообщить(УстановленныеПараметры.ГруппыТекущегоПользователя);
   КонецЕсли;

   Если ИмяПараметра = "ИспользоватьОграниченияПравДоступаНаУровнеЗаписей" Тогда
       ПолныеПрава.УстановитьПараметрыМеханизмаОграниченияПрав();
       УстановленныеПараметры.Вставить("ИспользоватьОграниченияПравДоступаНаУровнеЗаписей");
   КонецЕсли;
   // Конец переопределяемого блока
КонецПроцедуры

&НаСервере
Функция ПолучитьГруппаТекПользователя()

    Запрос = Новый Запрос;
    Запрос.Текст = "ВЫБРАТЬ
                   |    ГДП.Ссылка КАК Группа
                   |ИЗ
                   |    Справочник.ГруппыДоступаПользователей КАК ГДП
                   |ГДЕ
                   |    ГДП.СоставГруппы.Пользователь = &Пользователь";
   
    Запрос.УстановитьПараметр("Пользователь", ПараметрыСеанса.ТекущийПользователь);
   
    Результат = Запрос.Выполнить();
    Выборка = Результат.Выбрать();
   
    //РезультатПользователей = Запрос.Выполнить().Выбрать();
    //ВыборкаПользователей =  РезультатПользователей.СоставГруппы;
   
    М = Новый Массив;
    Пока Выборка.Следующий() Цикл
       М.Добавить(Выборка.Группа);    
    КонецЦикла;    
    Возврат М;

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

в итоге выдает ошибку

{Справочник.Документы.Форма.ФормаЭлемента(104)}: Ошибка при получении значения атрибута контекста (ГруппыТекущегоПользователя): Попытка получения неинициализированного значения параметра сеанса
   Возврат ПараметрыСеанса.ГруппыТекущегоПользователя;
по причине:
Попытка получения неинициализированного значения параметра сеанса
1 ТелепатБот
 
гуру
06.03.09
13:03
2 Bober777
 
06.03.09
13:05
Как я понимаю он (параметр "ГруппыТекущегоПользователя") не инициалицируется
3 Bober777
 
06.03.09
13:30
ребят может кто сталкивался с такой проблемой подскажите пожалуйста что делать?
4 Bober777
 
08.03.09
00:47
Честно не охота создавать еще какие-то темы что бы привлечь всеобщее внимание чтобы мне ответили на вопрос что ни кто не сталкивался никогда с такой проблемой?
AdBlock убивает бесплатный контент. 1Сергей