() Нет такого параметра
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Если Параметры.Свойство("АвтоТест") Тогда // Возврат при получении формы для анализа.
Возврат;
КонецЕсли;
УстановитьУсловноеОформление();
МодельСервиса = ОбщегоНазначенияПовтИсп.РазделениеВключено()
И ОбщегоНазначенияПовтИсп.ДоступноИспользованиеРазделенныхДанных();
ОтборЖурналаРегистрации = Новый Структура;
ОтборЖурналаРегистрацииПоУмолчанию = Новый Структура;
ЗначенияОтбора = ПолучитьЗначенияОтбораЖурналаРегистрации("Событие").Событие;
Если Не ПустаяСтрока(Параметры.Пользователь) Тогда
Если ТипЗнч(Параметры.Пользователь) = Тип("СписокЗначений") Тогда
ОтборПоПользователю = Параметры.Пользователь;
Иначе
ИмяПользователя = Параметры.Пользователь;
ОтборПоПользователю = Новый СписокЗначений;
ПоПользователю = ОтборПоПользователю.Добавить(ИмяПользователя, ИмяПользователя);
КонецЕсли;
ОтборЖурналаРегистрации.Вставить("Пользователь", ОтборПоПользователю);
КонецЕсли;
Если ЗначениеЗаполнено(Параметры.СобытиеЖурналаРегистрации) Тогда
ОтборПоСобытию = Новый СписокЗначений;
Если ТипЗнч(Параметры.СобытиеЖурналаРегистрации) = Тип("Массив") Тогда
Для Каждого Событие Из Параметры.СобытиеЖурналаРегистрации Цикл
ПредставлениеСобытия = ЗначенияОтбора[Событие];
ОтборПоСобытию.Добавить(Событие, ПредставлениеСобытия);
КонецЦикла;
Иначе
ОтборПоСобытию.Добавить(Параметры.СобытиеЖурналаРегистрации, Параметры.СобытиеЖурналаРегистрации);
КонецЕсли;
ОтборЖурналаРегистрации.Вставить("Событие", ОтборПоСобытию);
КонецЕсли;
Если МодельСервиса Тогда
ОтборЖурналаРегистрации.Вставить("ДатаНачала", НачалоДня(ТекущаяДатаСеанса()));
ОтборЖурналаРегистрации.Вставить("ДатаОкончания", КонецДня(ТекущаяДатаСеанса()));
Иначе
Если ЗначениеЗаполнено(Параметры.ДатаНачала) Тогда
ОтборЖурналаРегистрации.Вставить("ДатаНачала", Параметры.ДатаНачала);
КонецЕсли;
Если ЗначениеЗаполнено(Параметры.ДатаОкончания) Тогда
ОтборЖурналаРегистрации.Вставить("ДатаОкончания", Параметры.ДатаОкончания + 1);
КонецЕсли;
КонецЕсли;
Если Параметры.Данные <> Неопределено Тогда
ОтборЖурналаРегистрации.Вставить("Данные", Параметры.Данные);
КонецЕсли;
Если Параметры.Сеанс <> Неопределено Тогда
ОтборЖурналаРегистрации.Вставить("Сеанс", Параметры.Сеанс);
КонецЕсли;
// Уровень - список значений.
Если Параметры.Уровень <> Неопределено Тогда
ОтборЖурналаРегистрации.Вставить("Уровень", Параметры.Уровень);
КонецЕсли;
// ИмяПриложения - список значений.
Если Параметры.ИмяПриложения <> Неопределено Тогда
СписокПриложений = Новый СписокЗначений;
Для Каждого Приложение Из Параметры.ИмяПриложения Цикл
СписокПриложений.Добавить(Приложение, ПредставлениеПриложения(Приложение));
КонецЦикла;
ОтборЖурналаРегистрации.Вставить("ИмяПриложения", СписокПриложений);
КонецЕсли;
КоличествоПоказываемыхСобытий = 200;
ОтборПоУмолчанию = ОтборПоУмолчанию(ЗначенияОтбора);
Если Не ОтборЖурналаРегистрации.Свойство("Событие") Тогда
ОтборЖурналаРегистрации.Вставить("Событие", ОтборПоУмолчанию);
КонецЕсли;
ОтборЖурналаРегистрацииПоУмолчанию.Вставить("Событие", ОтборПоУмолчанию);
Элементы.ПредставлениеРазделенияДанныхСеанса.Видимость = Не ОбщегоНазначенияПовтИсп.ДоступноИспользованиеРазделенныхДанных();
Критичность = "ВсеСобытия";
// Взводится в значение Истина, если нужно, чтобы формирование журнала регистрации проходило не в фоне.
ЗапускатьНеВФоне = Параметры.ЗапускатьНеВФоне;
КонецПроцедуры
Показать