This commit is contained in:
Компания 1С committed 2019-08-02 15:19:00 +03:00
1 parent 93206cb79a
commit 559abdc390
27 files changed
+627 -248

No files matched your search

@@ -42,9 +42,13 @@
КонецПроцедуры
Процедура ПриКопировании(ОбъектКопирования)
ИмяПредопределенногоВида = "";
КонецПроцедуры
#КонецОбласти
#Область ОбработчикиСобытий
#Область СлужебныеПроцедурыИФункции
Процедура ПриЧтенииПредставленийНаСервере() Экспорт
@@ -57,6 +57,14 @@
Высота = 0;
КлючСохраненияПоложенияОкна = КлючСохраненияПоложенияОкна + ".Узел";
ПутьКЭлементуСтруктурыНастроек = ОбщегоНазначенияКлиентСервер.СвойствоСтруктуры(
Параметры, "ПутьКЭлементуСтруктурыНастроек", "");
ЭлементСтруктуры = ОтчетыСервер.ЭлементНастроекПоПолномуПути(НастройкиКД, ПутьКЭлементуСтруктурыНастроек);
Если ЭлементСтруктуры <> Неопределено Тогда
ИдентификаторЭлементаСтруктурыНастроек = НастройкиКД.ПолучитьИдентификаторПоОбъекту(ЭлементСтруктуры);
КонецЕсли;
Если Не Параметры.Свойство("Заголовок", Заголовок) Тогда
ВызватьИсключение НСтр("ru = 'Не передан служебный параметр ""Заголовок"".'");
КонецЕсли;
@@ -3232,7 +3240,9 @@
&НаКлиенте
Функция НайтиПолеПорядка(СортировкаУзлаНастроек, Поле)
Для Каждого ЭлементНастройки Из СортировкаУзлаНастроек.Элементы Цикл
Если ЭлементНастройки.Поле = Поле Тогда
Если ТипЗнч(ЭлементНастройки) <> Тип("АвтоЭлементПорядкаКомпоновкиДанных")
И ЭлементНастройки.Поле = Поле Тогда
Возврат Поле;
КонецЕсли;
КонецЦикла;
@@ -4299,6 +4309,12 @@
ПредставлениеЭлемента = ПредставлениеЭлемента + " """ + Строка.Представление + """";
КонецЕсли;
СвойствоЭлементаСтруктуры = СвойствоЭлементаСтруктурыНастроек(Отчет.КомпоновщикНастроек, "Структура");
ЭлементНастройки = ЭлементНастройки(СвойствоЭлементаСтруктуры, Строка);
ПутьКЭлементуСтруктурыНастроек = ОтчетыКлиент.ПолныйПутьКЭлементуНастроек(
Отчет.КомпоновщикНастроек.Настройки, ЭлементНастройки);
ПараметрыФормы = Новый Структура;
ПараметрыФормы.Вставить("КлючВарианта", Строка(КлючТекущегоВарианта));
ПараметрыФормы.Вставить("Вариант", Отчет.КомпоновщикНастроек.Настройки);
@@ -4306,6 +4322,7 @@
ПараметрыФормы.Вставить("НастройкиОтчета", НастройкиОтчета);
ПараметрыФормы.Вставить("ВариантНаименование", ВариантНаименование);
ПараметрыФормы.Вставить("ИдентификаторЭлементаСтруктурыНастроек", Строка.Идентификатор);
ПараметрыФормы.Вставить("ПутьКЭлементуСтруктурыНастроек", ПутьКЭлементуСтруктурыНастроек);
ПараметрыФормы.Вставить("ТипЭлементаСтруктурыНастроек", Строка.Тип);
ПараметрыФормы.Вставить("Заголовок", СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
ШаблонЗаголовка, ПредставлениеЭлемента, ВариантНаименование));
@@ -4600,6 +4617,9 @@
ИмяКоллекции = ИмяКоллекцииНастроекПоИдентификатору(Строка.Идентификатор);
ЭлементыНастроек = ЭлементыНастроек(СвойствоЭлементаСтруктуры, РодительЭлементаНастройки, ИмяКоллекции);
Строка.Использование = Ложь;
ИзменитьИспользованиеСвязанныхЭлементовНастроек(Элемент.Имя, Строка, ЭлементНастройки);
ЭлементыНастроек.Удалить(ЭлементНастройки);
Строки.Удалить(Строка);
КонецЦикла;
@@ -4648,9 +4668,10 @@
КомпоновщикНастроек, КлючСвойства, ИдентификаторЭлементаСтруктурыНастроек, РасширенныйРежим);
ЭлементНастройки = ЭлементНастройки(СвойствоЭлементаСтруктуры, Строка);
РодительЭлементаНастройки = ПолучитьРодителяЭлементаНастройки(СвойствоЭлементаСтруктуры, ЭлементНастройки);
Если ТипЗнч(ЭлементНастройки.Родитель) = Тип("НастройкиВложенногоОбъектаКомпоновкиДанных") Тогда
ЭлементНастройки = ЭлементНастройки.Родитель
Если ТипЗнч(РодительЭлементаНастройки) = Тип("НастройкиВложенногоОбъектаКомпоновкиДанных") Тогда
ЭлементНастройки = РодительЭлементаНастройки;
КонецЕсли;
ЭлементНастройки.Использование = Строка.Использование;
@@ -4680,19 +4701,21 @@
&НаКлиенте
Процедура ИзменитьИспользованиеСвязанныхЭлементовНастроек(ИмяКоллекции, Строка, ЭлементНастройки)
Если ИмяКоллекции = "СоставГруппировки" Тогда
СвязаннаяКоллекция = "ВыбранныеПоля";
СвязанныеКоллекции = СтрРазделить("ВыбранныеПоля, Сортировка", ", ", Ложь);
ИначеЕсли ИмяКоллекции = "ВыбранныеПоля" Тогда
СвязаннаяКоллекция = "СоставГруппировки";
СвязанныеКоллекции = СтрРазделить("СоставГруппировки, Сортировка", ", ", Ложь);
Иначе
СвязаннаяКоллекция = Неопределено;
СвязанныеКоллекции = Новый Массив(1);
КонецЕсли;
Если СвязаннаяКоллекция <> Неопределено И ЗначениеЗаполнено(Строка.Поле) Тогда
Условие = Новый Структура("Поле", Строка.Поле);
ИзменитьИспользованиеПоУсловию(СвязаннаяКоллекция, Условие, Строка.Использование);
ИначеЕсли Строка.Свойство("ЭтоПараметрВывода") И Строка.ЭтоПараметрВывода Тогда
СинхронизироватьПредопределенныеПараметрыВывода(Строка.Использование, ЭлементНастройки);
КонецЕсли;
Для Каждого СвязаннаяКоллекция Из СвязанныеКоллекции Цикл
Если СвязаннаяКоллекция <> Неопределено И ЗначениеЗаполнено(Строка.Поле) Тогда
Условие = Новый Структура("Поле", Строка.Поле);
ИзменитьИспользованиеПоУсловию(СвязаннаяКоллекция, Условие, Строка.Использование);
ИначеЕсли Строка.Свойство("ЭтоПараметрВывода") И Строка.ЭтоПараметрВывода Тогда
СинхронизироватьПредопределенныеПараметрыВывода(Строка.Использование, ЭлементНастройки);
КонецЕсли;
КонецЦикла;
КонецПроцедуры
&НаКлиенте
@@ -6166,6 +6189,11 @@
Процедура ЗагрузитьНастройкиВКомпоновщик(ПараметрыЗагрузки)
ПроверитьПараметрыЗагрузки(ПараметрыЗагрузки);
ОтчетОбъект = ОтчетыСервер.ОтчетОбъект(ПараметрыЗагрузки.ОтчетОбъектИлиПолноеИмя);
Если НастройкиОтчета.События.ПередЗаполнениемПанелиБыстрыхНастроек Тогда
ОтчетОбъект.ПередЗаполнениемПанелиБыстрыхНастроек(ЭтотОбъект, ПараметрыЗагрузки);
КонецЕсли;
ДоступныеНастройки = ОтчетыСервер.ДоступныеНастройки(ПараметрыЗагрузки, НастройкиОтчета);
ОбновитьНастройкиВарианта = ОбщегоНазначенияКлиентСервер.СвойствоСтруктуры(ПараметрыЗагрузки, "ОбновитьНастройкиВарианта", Ложь);
@@ -6177,7 +6205,6 @@
ОтчетыСервер.СброситьПользовательскиеНастройки(ДоступныеНастройки, ПараметрыЗагрузки);
ОтчетОбъект = ОтчетыСервер.ОтчетОбъект(ПараметрыЗагрузки.ОтчетОбъектИлиПолноеИмя);
Если НастройкиОтчета.События.ПередЗагрузкойНастроекВКомпоновщик Тогда
ОтчетОбъект.ПередЗагрузкойНастроекВКомпоновщик(
ЭтотОбъект,
@@ -6231,7 +6258,7 @@
&НаСервере
Процедура ПроверитьПараметрыЗагрузки(ПараметрыЗагрузки)
Если ПараметрыЗагрузки = Неопределено Тогда
Если ТипЗнч(ПараметрыЗагрузки) <> Тип("Структура") Тогда
ПараметрыЗагрузки = Новый Структура;
КонецЕсли;
@@ -1427,6 +1427,11 @@
Процедура ЗагрузитьНастройкиВКомпоновщик(ПараметрыЗагрузки)
ПроверитьПараметрыЗагрузки(ПараметрыЗагрузки);
ОтчетОбъект = РеквизитФормыВЗначение("Отчет");
Если НастройкиОтчета.События.ПередЗаполнениемПанелиБыстрыхНастроек Тогда
ОтчетОбъект.ПередЗаполнениемПанелиБыстрыхНастроек(ЭтотОбъект, ПараметрыЗагрузки);
КонецЕсли;
ДоступныеНастройки = ОтчетыСервер.ДоступныеНастройки(ПараметрыЗагрузки, НастройкиОтчета);
ПрименитьПредопределенныеНастройки(ДоступныеНастройки.Настройки);
@@ -1439,7 +1444,6 @@
ОтчетыСервер.СброситьПользовательскиеНастройки(ДоступныеНастройки, ПараметрыЗагрузки);
ОтчетОбъект = РеквизитФормыВЗначение("Отчет");
Если НастройкиОтчета.События.ПередЗагрузкойНастроекВКомпоновщик Тогда
ОтчетОбъект.ПередЗагрузкойНастроекВКомпоновщик(
ЭтотОбъект,
@@ -1506,7 +1510,7 @@
&НаСервере
Процедура ПроверитьПараметрыЗагрузки(ПараметрыЗагрузки)
Если ПараметрыЗагрузки = Неопределено Тогда
Если ТипЗнч(ПараметрыЗагрузки) <> Тип("Структура") Тогда
ПараметрыЗагрузки = Новый Структура;
КонецЕсли;
@@ -4719,21 +4719,62 @@
КонецПроцедуры
Функция СлужебныйПользователь(Знач КодЯзыка)
Результат = ПользователиИнформационнойБазы.НайтиПоИмени("СлужебныйПользовательДляОбновленияПредставлений");
Если Результат = Неопределено Тогда
ИмяПользователя = "СлужебныйПользовательДляОбновленияПредставлений";
// Обновление пользователя информационной базы.
ПользовательИБ = ПользователиИнформационнойБазы.НайтиПоИмени(ИмяПользователя);
Если ПользовательИБ = Неопределено Тогда
Если ПользователиИнформационнойБазы.ПолучитьПользователей().Количество() = 0 Тогда
Возврат Неопределено;
КонецЕсли;
Результат = ПользователиИнформационнойБазы.СоздатьПользователя();
Результат.Имя = "СлужебныйПользовательДляОбновленияПредставлений";
Результат.ЗапрещеноИзменятьПароль = Истина;
Результат.ПоказыватьВСпискеВыбора = Ложь;
ПользовательИБ = ПользователиИнформационнойБазы.СоздатьПользователя();
ПользовательИБ.Имя = ИмяПользователя;
ПользовательИБ.ЗапрещеноИзменятьПароль = Истина;
ПользовательИБ.ПоказыватьВСпискеВыбора = Ложь;
КонецЕсли;
Результат.Язык = ЛокализацияСервер.ЯзыкПоКоду(КодЯзыка);
Результат.Записать();
Возврат Результат.Имя;
ПользовательИБ.Язык = ЛокализацияСервер.ЯзыкПоКоду(КодЯзыка);
ПользовательИБ.Записать();
// Обновление пользователя - элемента справочника Пользователи.
Роли = Новый Массив;
Роли.Добавить("ПолныеПрава");
ОписаниеПользователяИБ = Новый Структура;
ОписаниеПользователяИБ.Вставить("Действие", "Записать");
ОписаниеПользователяИБ.Вставить("Имя", ПользовательИБ.Имя);
ОписаниеПользователяИБ.Вставить("Роли", Роли);
ОписаниеПользователяИБ.Вставить("АутентификацияСтандартная", Истина);
ОписаниеПользователяИБ.Вставить("ПоказыватьВСпискеВыбора", ПользовательИБ.ПоказыватьВСпискеВыбора);
ОписаниеПользователяИБ.Вставить("УникальныйИдентификатор", ПользовательИБ.УникальныйИдентификатор);
Отбор = Новый Структура("ИдентификаторПользователяИБ", ПользовательИБ.УникальныйИдентификатор);
Выборка = Справочники.Пользователи.Выбрать(,, Отбор);
ЭтоНовый = Не Выборка.Следующий();
Блокировка = Новый БлокировкаДанных;
ЭлементБлокировки = Блокировка.Добавить(Метаданные.Справочники.Пользователи.ПолноеИмя());
Если Не ЭтоНовый Тогда
ЭлементБлокировки.УстановитьЗначение("Ссылка", Выборка.Ссылка);
КонецЕсли;
Блокировка.Заблокировать();
Если ЭтоНовый Тогда
Пользователь = Справочники.Пользователи.СоздатьЭлемент();
Иначе
Пользователь = Выборка.Ссылка.ПолучитьОбъект();
КонецЕсли;
Пользователь.Наименование = ПользовательИБ.Имя;
Пользователь.Служебный = Истина;
Пользователь.ДополнительныеСвойства.Вставить("ОписаниеПользователяИБ", ОписаниеПользователяИБ);
Пользователь.Записать();
Возврат ПользовательИБ.Имя;
КонецФункции
Функция ПредставлениеРежима(Режим)
@@ -5703,7 +5744,6 @@
| ВариантыОтчетов.Родитель КАК Родитель,
| ВЫБОР
| КОГДА &ЕстьПравоЧтенияАвторов
| И &ПолучатьИтоговуюТаблицу
| ТОГДА ВариантыОтчетов.Автор
| ИНАЧЕ НЕОПРЕДЕЛЕНО
| КОНЕЦ КАК Автор,
@@ -5937,13 +5977,11 @@
| ВариантыОтчетов.ТолькоДляАвтора КАК ТолькоДляАвтора,
| ВЫБОР
| КОГДА &ЕстьПравоЧтенияАвторов
| И &ПолучатьИтоговуюТаблицу
| ТОГДА ВариантыОтчетов.Автор
| ИНАЧЕ НЕОПРЕДЕЛЕНО
| КОНЕЦ КАК Автор,
| ВЫБОР
| КОГДА &ЕстьПравоЧтенияАвторов
| И &ПолучатьИтоговуюТаблицу
| ТОГДА ЕСТЬNULL(ВариантыОтчетов.Автор.Наименование, """")
| ИНАЧЕ """"
| КОНЕЦ КАК АвторПредставление,
@@ -6134,14 +6172,12 @@
| ВариантыОтчетов.ТолькоДляАвтора КАК ТолькоДляАвтора,
| ВЫБОР
| КОГДА &ЕстьПравоЧтенияАвторов
| И &ПолучатьИтоговуюТаблицу
| ТОГДА ВариантыОтчетов.Автор
| ИНАЧЕ НЕОПРЕДЕЛЕНО
| КОНЕЦ КАК Автор,
| ВариантыОтчетов.ВидимостьПоУмолчанию,
| ВЫБОР
| КОГДА &ЕстьПравоЧтенияАвторов
| И &ПолучатьИтоговуюТаблицу
| ТОГДА ПРЕДСТАВЛЕНИЕ(ВариантыОтчетов.Автор)
| ИНАЧЕ """"
| КОНЕЦ КАК АвторПредставление,
@@ -41,7 +41,7 @@
Процедура ПриДобавленииПодсистемы(Описание) Экспорт
Описание.Имя = "СтандартныеПодсистемы";
Описание.Версия = "3.0.3.48";
Описание.Версия = "3.0.3.54";
Описание.ИдентификаторИнтернетПоддержки = "SSL";
Описание.РежимВыполненияОтложенныхОбработчиков = "Параллельно";
Описание.ПараллельноеОтложенноеОбновлениеСВерсии = "2.3.3.0";
@@ -40,7 +40,7 @@
|Недопустимая команда или путь к исполняемому файлу
|%1
|по причине:
|Команды не должна содержать символы: ""$"", ""`"", ""|"", "";"", ""&"".'"),
|Команда не должна содержать символы: ""$"", ""`"", ""|"", "";"", ""&"".'"),
КомандаЗапуска[0]);
КонецЕсли;
@@ -292,6 +292,65 @@
ДополнительныеСвойства.Вставить("КэшЗначенийОтборов", КэшЗначенийОтборов);
КонецПроцедуры
// Определяет полный путь к элементу компоновки данных.
//
// Параметры:
// НастройкиКД - НастройкиКомпоновкиДанных - Корневой узел настроек, от которого строится полный путь.
// ЭлементКД - Произвольный - Узел настроек, к которому строится полный путь.
//
// Возвращаемое значение:
// Строка - полный путь к элементу. Может использоваться в функции НайтиЭлементПоПолномуПути().
// Неопределено - если не удалось построить полный путь.
//
Функция ПолныйПутьКЭлементуНастроек(Знач Настройки, Знач ЭлементНастроек) Экспорт
Результат = Новый Массив;
РодительЭлементаНастроек = ЭлементНастроек;
Пока РодительЭлементаНастроек <> Неопределено
И РодительЭлементаНастроек <> Настройки Цикл
ЭлементНастроек = РодительЭлементаНастроек;
РодительЭлементаНастроек = РодительЭлементаНастроек.Родитель;
ТипРодителя = ТипЗнч(РодительЭлементаНастроек);
Если ТипРодителя = Тип("ТаблицаКомпоновкиДанных") Тогда
Индекс = РодительЭлементаНастроек.Строки.Индекс(ЭлементНастроек);
Если Индекс = -1 Тогда
Индекс = РодительЭлементаНастроек.Колонки.Индекс(ЭлементНастроек);
ИмяКоллекции = "Колонки";
Иначе
ИмяКоллекции = "Строки";
КонецЕсли;
ИначеЕсли ТипРодителя = Тип("ДиаграммаКомпоновкиДанных") Тогда
Индекс = РодительЭлементаНастроек.Серии.Индекс(ЭлементНастроек);
Если Индекс = -1 Тогда
Индекс = РодительЭлементаНастроек.Точки.Индекс(ЭлементНастроек);
ИмяКоллекции = "Точки";
Иначе
ИмяКоллекции = "Серии";
КонецЕсли;
ИначеЕсли ТипРодителя = Тип("НастройкиВложенногоОбъектаКомпоновкиДанных") Тогда
ИмяКоллекции = "Настройки";
Индекс = Неопределено;
Иначе
ИмяКоллекции = "Структура";
Индекс = РодительЭлементаНастроек.Структура.Индекс(ЭлементНастроек);
КонецЕсли;
Если Индекс = -1 Тогда
Возврат Неопределено;
КонецЕсли;
Если Индекс <> Неопределено Тогда
Результат.Вставить(0, Индекс);
КонецЕсли;
Результат.Вставить(0, ИмяКоллекции);
КонецЦикла;
Возврат СтрСоединить(Результат, "/");
КонецФункции
#КонецОбласти
#КонецОбласти
@@ -4090,7 +4090,8 @@
Если ТекущаяСтруктура.Свойство(Ключ) И ТипЗнч(ТекущаяСтруктура[Ключ]) = Тип("Структура") Тогда
ТекущаяСтруктура = ТекущаяСтруктура[Ключ];
Иначе
ТекущаяСтруктура = ТекущаяСтруктура.Вставить(Ключ, Новый Структура);
ТекущаяСтруктура.Вставить(Ключ, Новый Структура);
ТекущаяСтруктура = ТекущаяСтруктура[Ключ];
КонецЕсли;
КонецЦикла;
КонецЕсли;
@@ -4355,4 +4356,38 @@
Возврат ?(ЗначениеПоУмолчанию = Неопределено, ГруппыИЭлементы.Авто, ЗначениеПоУмолчанию);
КонецФункции
// Находит элемент компоновки данных по полному пути.
//
// Параметры:
// НастройкиКД - НастройкиКомпоновкиДанных - Корневой узел настроек, в который вложен искомый элемент.
// ПолныйПутьКЭлементу - Строка - полный путь к элементу. Может быть получена в функции ПолныйПутьКЭлементу().
//
// Возвращаемое значение:
// ЭлементКД - Произвольный - Найденный узел настроек.
//
Функция ЭлементНастроекПоПолномуПути(Знач Настройки, Знач ПолныйПутьКЭлементу) Экспорт
Индексы = СтрРазделить(ПолныйПутьКЭлементу, "/", Ложь);
ЭлементНастроек = Настройки;
Для Каждого Индекс Из Индексы Цикл
Если Индекс = "Строки" Тогда
ЭлементНастроек = ЭлементНастроек.Строки;
ИначеЕсли Индекс = "Колонки" Тогда
ЭлементНастроек = ЭлементНастроек.Колонки;
ИначеЕсли Индекс = "Серии" Тогда
ЭлементНастроек = ЭлементНастроек.Серии;
ИначеЕсли Индекс = "Точки" Тогда
ЭлементНастроек = ЭлементНастроек.Точки;
ИначеЕсли Индекс = "Структура" Тогда
ЭлементНастроек = ЭлементНастроек.Структура;
ИначеЕсли Индекс = "Настройки" Тогда
ЭлементНастроек = ЭлементНастроек.Настройки;
Иначе
ЭлементНастроек = ЭлементНастроек[Число(Индекс)];
КонецЕсли;
КонецЦикла;
Возврат ЭлементНастроек;
КонецФункции
#КонецОбласти
@@ -38,7 +38,9 @@
Возврат Неопределено;
КонецЕсли;
УстановитьОтключениеБезопасногоРежима(Истина);
УстановитьПривилегированныйРежим(Истина);
Если ФайлОбъект.ТипХраненияФайла = Перечисления.ТипыХраненияФайлов.ВИнформационнойБазе Тогда
Результат = ХранилищеФайлаИзИнформационнойБазы(ФайлОбъект.Ссылка);
@@ -497,7 +497,7 @@
КонецЕсли;
Блокировка = Новый БлокировкаДанных;
Блокировка.Добавить("Константа.ОграничиватьДоступНаУровнеЗаписей");
Блокировка.Добавить("Константа.КоличествоПотоковОбновленияДоступа");
ЗаданиеВключено = Ложь;
НачатьТранзакцию();
@@ -1149,7 +1149,7 @@
Возврат;
КонецЕсли;
ВыполнитьОбновлениеДоступаНаУровнеЗаписей(Истина, Ложь, 0);
ВыполнитьОбновлениеДоступаНаУровнеЗаписей(Истина, Ложь, 0, Истина);
КонецПроцедуры
@@ -9428,7 +9428,8 @@
КонецПроцедуры
// Выполняет обновление доступа, если запланировано.
Процедура ВыполнитьОбновлениеДоступаНаУровнеЗаписей(ОбновитьВсе, ВызыватьИсключениеВместоРегистрацииОшибки, СекундНеБолее)
Процедура ВыполнитьОбновлениеДоступаНаУровнеЗаписей(ОбновитьВсе,
ВызыватьИсключениеВместоРегистрацииОшибки, СекундНеБолее, ПослеОбновлениеИБ = Ложь)
УстановитьОтключениеБезопасногоРежима(Истина);
УстановитьПривилегированныйРежим(Истина);
@@ -9503,7 +9504,7 @@
КонецЕсли;
Если Исполнитель <> Неопределено Тогда
Если Не ОбновитьВсе Тогда
Если Не ОбновитьВсе Или ПослеОбновлениеИБ Тогда
Возврат;
КонецЕсли;
@@ -10420,6 +10421,14 @@
КонецПроцедуры
// Для процедуры ЗаполнитьОбщиеПараметрыОбновления.
Функция ЭтоОбновлениеСоставаНаборовГруппДоступа(Задание, Контекст)
Возврат Задание.ИдентификаторСписка = Контекст.ИдентификаторСправочникаНаборыГруппДоступа
И Задание.ПорядокВидаКлючаДанных < ПорядокВидаКлючаДанных("НовыеНаборыГруппСУстаревшимиПравами");
КонецФункции
// Для процедуры ДобавитьЗаданияОбновленияДоступа.
Процедура ЗаполнитьУровниЗависимостиЗаданий(Контекст, СвойстваВедущихСписков)
@@ -10601,7 +10610,7 @@
Если Задание.Удалить Тогда
Продолжить;
КонецЕсли;
Если Задание.ИдентификаторСписка = Контекст.ИдентификаторСправочникаНаборыГруппДоступа Тогда
Если ЭтоОбновлениеСоставаНаборовГруппДоступа(Задание, Контекст) Тогда
ЗаданиеСправочникаНаборыГруппДоступа = Задание;
КонецЕсли;
Задание.ДополнительныйЗапуск = Ложь;
@@ -10793,8 +10802,6 @@
Попытка
Если Контекст.ОбработкаЗавершена Тогда
ОбновитьПраваНаРазрешенныйКлючДоступа();
Контекст.Вставить("ОшибкаОжиданияБлокировкиДанных", Ложь);
Попытка
ОтключитьРегламентноеЗаданиеЕслиНетНовыхЗаданий(Контекст);
@@ -12577,6 +12584,9 @@
ЗаполнитьПустыеХешиНаборовГрупп(ПараметрыОбновления);
ИначеЕсли ПараметрыОбновления.ПоследнийОбновленныйЭлемент.ВидКлючаДанных = "НовыеНаборыГруппСУстаревшимиПравами" Тогда
Если Не ПараметрыОбновления.ДляВнешнихПользователей Тогда
ОбновитьПраваНаРазрешенныйКлючДоступа();
КонецЕсли;
ОчиститьПраваПустогоНабораГруппДоступа(ПараметрыОбновления);
ИначеЕсли ЭтоОбработкаУстаревшихЭлементов(ПараметрыОбновления) Тогда
@@ -12722,26 +12732,33 @@
НачальныйЭлемент = Новый Структура;
НачальныйЭлемент.Вставить("КлючДанных");
НачальныйЭлемент.Вставить("ОбработатьУстаревшиеЭлементы", Ложь);
НачальныйЭлемент.Вставить("ОбработатьНаборыГруппСУстаревшимиПравами", Ложь);
СохранитьСвойства = Ложь;
Если ВидКлючаДанных = Неопределено Тогда
Если СохранитьВидКлючаДанных Тогда
ВидКлючаДанных = ПараметрыОбновления.ПоследнийОбновленныйЭлемент.ВидКлючаДанных;
Если ПараметрыОбновления.ПоследнийОбновленныйЭлемент.ОбработатьУстаревшиеЭлементы Тогда
НачальныйЭлемент.ОбработатьУстаревшиеЭлементы = Истина;
КонецЕсли;
ИначеЕсли ПараметрыОбновления.ЭтоОбновлениеПрав
Или ЭтоСправочникНаборыГруппДоступа(ПараметрыОбновления) Тогда
СохранитьСвойства = Истина;
ИначеЕсли ЭтоСправочникНаборыГруппДоступа(ПараметрыОбновления) Тогда
ВидКлючаДанных = "НовыеНаборыИзОдногоПользователя";
ИначеЕсли ПараметрыОбновления.ЭтоОбновлениеПрав Тогда
ВидКлючаДанных = "ЭлементыСУстаревшимиПравами";
Иначе
ВидКлючаДанных = "ЭлементыСУстаревшимиКлючами";
КонецЕсли;
ИначеЕсли ВидКлючаДанных <> "НетДанных"
И ПараметрыОбновления.Свойство("ПоследнийОбновленныйЭлемент")
И ПараметрыОбновления.ПоследнийОбновленныйЭлемент.ОбработатьУстаревшиеЭлементы Тогда
НачальныйЭлемент.ОбработатьУстаревшиеЭлементы = Истина;
И ПараметрыОбновления.Свойство("ПоследнийОбновленныйЭлемент") Тогда
СохранитьСвойства = Истина;
КонецЕсли;
Если СохранитьСвойства Тогда
Если ПараметрыОбновления.ПоследнийОбновленныйЭлемент.ОбработатьУстаревшиеЭлементы Тогда
НачальныйЭлемент.ОбработатьУстаревшиеЭлементы = Истина;
КонецЕсли;
Если ПараметрыОбновления.ПоследнийОбновленныйЭлемент.ОбработатьНаборыГруппСУстаревшимиПравами Тогда
НачальныйЭлемент.ОбработатьНаборыГруппСУстаревшимиПравами = Истина;
КонецЕсли;
КонецЕсли;
УстановитьВидКлючаДанных(НачальныйЭлемент, ВидКлючаДанных);
@@ -12858,6 +12875,7 @@
МаксимальнаяДата = МаксимальнаяДата();
СвойстваКлючаДанных = НачальныйЭлемент(ПараметрыОбновления, "НетДанных");
ВидКлючаДанныхУстановлен = Истина;
Для Каждого Строка Из Выгрузка Цикл
ПараметрыЗадания = Строка.ПараметрыЗадания.Получить();
Если ТипЗнч(ПараметрыЗадания) = Тип("Структура") И ПараметрыЗадания.Свойство("ТочечноеЗадание") Тогда
@@ -12868,7 +12886,7 @@
Если Не ЭтоОбновлениеПрав И Строка.ДатаПоследнегоОбновленногоЭлемента = МаксимальнаяДата Тогда
ПерезапускОбновленияСНачала = Истина;
КонецЕсли;
Если СвойстваКлючаДанных <> Неопределено И ЕстьСвойстваКлючаДанных(ПараметрыЗадания) Тогда
Если ЕстьСвойстваКлючаДанных(ПараметрыЗадания) Тогда
Если СвойстваКлючаДанных.ПорядокВидаКлючаДанных > ПараметрыЗадания.ПорядокВидаКлючаДанных Тогда
СвойстваКлючаДанных.ПорядокВидаКлючаДанных = ПараметрыЗадания.ПорядокВидаКлючаДанных;
СвойстваКлючаДанных.ВидКлючаДанных = ПараметрыЗадания.ВидКлючаДанных;
@@ -12876,8 +12894,15 @@
Если ЭтоОбработкаУстаревшихЭлементов(Новый Структура("ПоследнийОбновленныйЭлемент", ПараметрыЗадания)) Тогда
СвойстваКлючаДанных.ОбработатьУстаревшиеЭлементы = Истина;
КонецЕсли;
Если ПараметрыЗадания.Свойство("ОбработатьНаборыГруппСУстаревшимиПравами")
И ПараметрыЗадания.ОбработатьНаборыГруппСУстаревшимиПравами = Истина Тогда
СвойстваКлючаДанных.ОбработатьНаборыГруппСУстаревшимиПравами = Истина;
КонецЕсли;
Иначе
СвойстваКлючаДанных = Неопределено;
ВидКлючаДанныхУстановлен = Ложь;
Если ЭтоСправочникНаборыГруппДоступа(ПараметрыОбновления) Тогда
СвойстваКлючаДанных.ОбработатьНаборыГруппСУстаревшимиПравами = Истина;
КонецЕсли;
Если ЭтоОбновлениеПрав Или ПерезапускОбновленияСНачала Тогда
Прервать;
КонецЕсли;
@@ -12898,7 +12923,7 @@
КонецЕсли;
ПоследнийОбновленныйЭлемент = ПараметрыОбновления.ПоследнийОбновленныйЭлемент;
Если СвойстваКлючаДанных <> Неопределено Тогда
Если ВидКлючаДанныхУстановлен Тогда
Если ТекущийИтог = Неопределено Тогда
УстановитьВидКлючаДанных(ПоследнийОбновленныйЭлемент, СвойстваКлючаДанных.ВидКлючаДанных);
@@ -12906,9 +12931,12 @@
ПоследнийОбновленныйЭлемент.ПорядокВидаКлючаДанных = СвойстваКлючаДанных.ПорядокВидаКлючаДанных;
ПоследнийОбновленныйЭлемент.ВидКлючаДанных = СвойстваКлючаДанных.ВидКлючаДанных;
КонецЕсли;
Если СвойстваКлючаДанных.ОбработатьУстаревшиеЭлементы Тогда
ПоследнийОбновленныйЭлемент.ОбработатьУстаревшиеЭлементы = Истина;
КонецЕсли;
КонецЕсли;
Если СвойстваКлючаДанных.ОбработатьУстаревшиеЭлементы Тогда
ПоследнийОбновленныйЭлемент.ОбработатьУстаревшиеЭлементы = Истина;
КонецЕсли;
Если СвойстваКлючаДанных.ОбработатьНаборыГруппСУстаревшимиПравами Тогда
ПоследнийОбновленныйЭлемент.ОбработатьНаборыГруппСУстаревшимиПравами = Истина;
КонецЕсли;
СохраняемыеПараметрыЗадания.ПоследнийОбновленныйЭлемент = ПоследнийОбновленныйЭлемент;
@@ -13147,11 +13175,12 @@
ВидыКлючейДанных.Вставить("ЭлементыСУстаревшимиПравами", 0);
ВидыКлючейДанных.Вставить("НовыеНаборыИзОдногоПользователя", 1);
ВидыКлючейДанных.Вставить("НаборыГруппДоступаНазначенныеПользователям", 2);
ВидыКлючейДанных.Вставить("НаборыГруппПользователейНазначенныеПользователям", 3);
ВидыКлючейДанных.Вставить("НовыеНаборыГруппСУстаревшимиПравами", 4);
ВидыКлючейДанных.Вставить("НаборыГруппРазрешенныеПользователям", 5);
ВидыКлючейДанных.Вставить("НовыеНаборыИзОдногоПользователя", 0);
ВидыКлючейДанных.Вставить("НаборыГруппДоступаНазначенныеПользователям", 1);
ВидыКлючейДанных.Вставить("НаборыГруппПользователейНазначенныеПользователям", 2);
ВидыКлючейДанных.Вставить("НовыеНаборыГруппСУстаревшимиПравами", 3);
ВидыКлючейДанных.Вставить("НаборыГруппРазрешенныеПользователям", 4);
ВидыКлючейДанных.Вставить("НаборыГруппСУстаревшимиПравами", 5);
ВидыКлючейДанных.Вставить("УстаревшиеЭлементы", 10);
ВидыКлючейДанных.Вставить("УстаревшиеЭлементыОбщегоРегистра", 11);
@@ -13851,10 +13880,7 @@
Возврат;
КонецЕсли;
НовыйВидКлючаДанных = "";
Если Элемент.ВидКлючаДанных = "ЭлементыСУстаревшимиПравами" Тогда
НовыйВидКлючаДанных = "НовыеНаборыИзОдногоПользователя";
ИначеЕсли Элемент.ВидКлючаДанных = "НовыеНаборыИзОдногоПользователя" Тогда
Если Элемент.ВидКлючаДанных = "НовыеНаборыИзОдногоПользователя" Тогда
НовыйВидКлючаДанных = "НаборыГруппДоступаНазначенныеПользователям";
ИначеЕсли Элемент.ВидКлючаДанных = "НаборыГруппДоступаНазначенныеПользователям" Тогда
@@ -13867,7 +13893,13 @@
НовыйВидКлючаДанных = "НаборыГруппРазрешенныеПользователям";
ИначеЕсли Элемент.ВидКлючаДанных = "НаборыГруппРазрешенныеПользователям"
И Элемент.ОбработатьУстаревшиеЭлементы Тогда
И Элемент.ОбработатьНаборыГруппСУстаревшимиПравами Тогда
НовыйВидКлючаДанных = "НаборыГруппСУстаревшимиПравами";
ИначеЕсли Элемент.ОбработатьУстаревшиеЭлементы
И ( Элемент.ВидКлючаДанных = "НаборыГруппРазрешенныеПользователям"
Или Элемент.ВидКлючаДанных = "НаборыГруппСУстаревшимиПравами") Тогда
НовыйВидКлючаДанных = "УстаревшиеЭлементы";
КонецЕсли;
@@ -14092,7 +14124,7 @@
Запрос.УстановитьПараметр("ДляВнешнихПользователей", ПараметрыОбновления.ДляВнешнихПользователей);
Запрос.УстановитьПараметр("ПоследняяОбработаннаяСсылка", ПоследнийОбновленныйЭлемент.КлючДанных);
Если ВидКлючаДанных = "ЭлементыСУстаревшимиПравами" Тогда
Если ВидКлючаДанных = "НаборыГруппСУстаревшимиПравами" Тогда
Запрос.Текст =
"ВЫБРАТЬ ПЕРВЫЕ " + МаркерРазмераПорции() + "
| ТекущийСписок.Ссылка КАК ТекущаяСсылка
@@ -14226,7 +14258,7 @@
ВидКлючаДанных = ПараметрыОбновления.ПоследнийОбновленныйЭлемент.ВидКлючаДанных;
Если ВидКлючаДанных = "ЭлементыСУстаревшимиПравами" Тогда
Если ВидКлючаДанных = "НаборыГруппСУстаревшимиПравами" Тогда
ОбновитьНаборыГруппСУстаревшимиПравами(ЭлементыДанных, ПараметрыОбновления);
ИначеЕсли ВидКлючаДанных = "НовыеНаборыИзОдногоПользователя" Тогда
@@ -34226,7 +34258,8 @@
Версии = Контекст.ДействующиеПараметры.ВерсииОграниченийСписков.Получить(Строка.ИмяТаблицы);
Если ЗначениеЗаполнено(Версии)
И ЗначениеЗаполнено(Строка.ИмяТаблицы) Тогда
И ЗначениеЗаполнено(Строка.ИмяТаблицы)
Или Строка.ИмяТаблицы = "Справочник.НаборыГруппДоступа" Тогда
СоставИмени = СтрРазделить(Строка.ИмяТаблицы, ".", Ложь);
СвойстваТипа = Контекст.ТипыТаблицПоИменам.Получить(ВРег(СоставИмени[0]));
@@ -34409,40 +34442,39 @@
Процедура ЗаполнитьДолиКоличествоЭлементовСсылочногоТипа(ДолиКоличестваЭлементов, Элемент, ИмяТаблицы)
Если ИмяТаблицы = "Справочник.НаборыГруппДоступа" Тогда
Если Элемент.ВидКлючаДанных = "ЭлементыСУстаревшимиПравами"
Или Элемент.ВидКлючаДанных = "ЭлементыСУстаревшимиКлючами" Тогда
Если Элемент.ВидКлючаДанных = "НовыеНаборыИзОдногоПользователя" Тогда
ДолиКоличестваЭлементов.Обработанных = 0.0;
ДолиКоличестваЭлементов.Оставшихся = 0.2;
ИначеЕсли Элемент.ВидКлючаДанных = "НовыеНаборыИзОдногоПользователя" Тогда
ДолиКоличестваЭлементов.Обработанных = 0.2;
ДолиКоличестваЭлементов.Оставшихся = 0.1;
ИначеЕсли Элемент.ВидКлючаДанных = "НаборыГруппДоступаНазначенныеПользователям" Тогда
ДолиКоличестваЭлементов.Обработанных = 0.3;
ДолиКоличестваЭлементов.Оставшихся = 0.2;
ДолиКоличестваЭлементов.Обработанных = 0.1;
ДолиКоличестваЭлементов.Оставшихся = 0.1;
ИначеЕсли Элемент.ВидКлючаДанных = "НаборыГруппПользователейНазначенныеПользователям" Тогда
ДолиКоличестваЭлементов.Обработанных = 0.5;
ДолиКоличестваЭлементов.Обработанных = 0.2;
ДолиКоличестваЭлементов.Оставшихся = 0.1;
ИначеЕсли Элемент.ВидКлючаДанных = "НовыеНаборыГруппСУстаревшимиПравами" Тогда
ДолиКоличестваЭлементов.Обработанных = 0.6;
ДолиКоличестваЭлементов.Обработанных = 0.3;
ДолиКоличестваЭлементов.Оставшихся = 0.2;
ИначеЕсли Элемент.ВидКлючаДанных = "НаборыГруппРазрешенныеПользователям" Тогда
ДолиКоличестваЭлементов.Обработанных = 0.5;
ДолиКоличестваЭлементов.Оставшихся = 0.1;
ИначеЕсли Элемент.ВидКлючаДанных = "НаборыГруппСУстаревшимиПравами" Тогда
Если Элемент.ОбработатьУстаревшиеЭлементы Тогда
ДолиКоличестваЭлементов.Обработанных = 0.8;
ДолиКоличестваЭлементов.Оставшихся = 0.1;
ДолиКоличестваЭлементов.Обработанных = 0.6;
ДолиКоличестваЭлементов.Оставшихся = 0.3;
Иначе
ДолиКоличестваЭлементов.Обработанных = 0.8;
ДолиКоличестваЭлементов.Оставшихся = 0.2;
ДолиКоличестваЭлементов.Обработанных = 0.6;
ДолиКоличестваЭлементов.Оставшихся = 0.4;
КонецЕсли;
Иначе // УстаревшиеЭлементы.
@@ -22,19 +22,23 @@
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| НаборыСвойств.Ссылка КАК Ссылка,
| НаборыСвойств.ИмяПредопределенныхДанных КАК ИмяПредопределенныхДанных
|ИЗ
| Справочник.НаборыДополнительныхРеквизитовИСведений КАК НаборыСвойств
|ГДЕ
| НаборыСвойств.Предопределенный";
"ВЫБРАТЬ
| НаборыСвойств.Ссылка КАК Ссылка,
| НаборыСвойств.ИмяПредопределенныхДанных КАК ИмяПредопределенныхДанных
|ИЗ
| Справочник.НаборыДополнительныхРеквизитовИСведений КАК НаборыСвойств
|ГДЕ
| НаборыСвойств.Предопределенный";
Выборка = Запрос.Выполнить().Выбрать();
ИмяПредопределенныхДанных = СтрЗаменить(ВидОбъектов, ".", "_");
НаборСсылка = Неопределено;
Пока Выборка.Следующий() Цикл
Если СтрНачинаетсяС(Выборка.ИмяПредопределенныхДанных, "Удалить") Тогда
Продолжить;
КонецЕсли;
Если Выборка.ИмяПредопределенныхДанных = ИмяПредопределенныхДанных Тогда
НаборСсылка = Выборка.Ссылка;
Прервать;
@@ -42,18 +46,21 @@
КонецЦикла;
Если НаборСсылка = Неопределено Тогда
Возврат Неопределено;
НаборСсылка = УправлениеСвойствами.НаборСвойствПоИмени(ИмяПредопределенныхДанных);
Если НаборСсылка = Неопределено Тогда
Возврат Неопределено;
КонецЕсли;
КонецЕсли;
ТекстЗапроса =
"ВЫБРАТЬ
| ТаблицаСвойств.Свойство КАК Свойство,
| ТаблицаСвойств.Свойство.Наименование КАК Наименование,
| ТаблицаСвойств.Свойство.ТипЗначения КАК ТипЗначения
|ИЗ
| &ТаблицаСвойств КАК ТаблицаСвойств
|ГДЕ
| ТаблицаСвойств.Ссылка В ИЕРАРХИИ(&Ссылка)";
"ВЫБРАТЬ
| ТаблицаСвойств.Свойство КАК Свойство,
| ТаблицаСвойств.Свойство.Наименование КАК Наименование,
| ТаблицаСвойств.Свойство.ТипЗначения КАК ТипЗначения
|ИЗ
| &ТаблицаСвойств КАК ТаблицаСвойств
|ГДЕ
| ТаблицаСвойств.Ссылка В ИЕРАРХИИ(&Ссылка)";
ПолноеИмяТаблицы = "Справочник.НаборыДополнительныхРеквизитовИСведений." + ВидСвойств;
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "&ТаблицаСвойств", ПолноеИмяТаблицы);
@@ -2422,28 +2422,32 @@
Или ЭтоОтображаемыйФайл
Или ЭтоВложениеПисьмо Тогда
ВложениеПисьмаОбъект = ВложениеПисьмаСсылка.ПолучитьОбъект();
Если ЕстьПодписи
И ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ЭлектроннаяПодпись") Тогда
МодульЭлектроннаяПодпись = ОбщегоНазначения.ОбщийМодуль("ЭлектроннаяПодпись");
Для Каждого ПодписьВложения Из МассивПодписей Цикл
ЭП = ВложениеПисьмаОбъект.ЭлектронныеПодписи.Добавить();
ДанныеПодписи = МодульЭлектроннаяПодпись.ПрочитатьДанныеПодписи(ПодписьВложения.Данные);
Если ДанныеПодписи <> Неопределено Тогда
ЗаполнитьЗначенияСвойств(ЭП, ДанныеПодписи);
КонецЕсли;
ПараметрыПодписи = Новый Структура;
ПараметрыПодписи.Вставить("Подпись", ДанныеПодписи.Подпись.Получить());
ПараметрыПодписи.Вставить("Сертификат", ДанныеПодписи.Сертификат);
ПараметрыПодписи.Вставить("УстановившийПодпись", Неопределено);
ПараметрыПодписи.Вставить("Комментарий", НСтр("ru = 'Вложение электронного письма'"));
ПараметрыПодписи.Вставить("ДатаПодписи", ТекущаяДатаСеанса());
ПараметрыПодписи.Вставить("КомуВыданСертификат", ДанныеПодписи.КомуВыданСертификат);
РаботаСФайлами.ДобавитьПодписьКФайлу(ВложениеПисьмаСсылка, ПараметрыПодписи);
ЭП.Подпись = Новый ХранилищеЗначения(ПодписьВложения.Данные);
ЭП.Комментарий = НСтр("ru = 'Вложение электронного письма'");
ЭП.ДатаПодписи = ТекущаяДатаСеанса();
КонецЦикла;
ВложениеПисьмаОбъект = ВложениеПисьмаСсылка.ПолучитьОбъект();
ВложениеПисьмаОбъект.ПодписанЭП = Истина;
Иначе
ВложениеПисьмаОбъект = ВложениеПисьмаСсылка.ПолучитьОбъект();
КонецЕсли;
Если ЭтоОтображаемыйФайл Тогда
+9 -9
View File
@@ -1,17 +1,17 @@
<?xml version="1.0" encoding="UTF-8"?>
<mdclass:Configuration xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="7b2363ea-3925-4ed2-8893-c1498346928a">
<mdclass:Configuration xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="5e664e8d-4b87-4c0e-99d1-e5fb4ad5c6d3">
<name>БиблиотекаСтандартныхПодсистем</name>
<synonym>
<key>ru</key>
<value>Библиотека стандартных подсистем, редакция 3.0</value>
</synonym>
<containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="50c829e7-a053-4682-a16a-7b54911ddc86"/>
<containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="4ba6d577-c8b1-40e9-abae-a1abafee944c"/>
<containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="a0acf262-511b-4a05-9b96-b2f9eafc7141"/>
<containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="51581133-e1d5-4ca2-992f-326de53e50c7"/>
<containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="fbb86a75-d4aa-4654-88a3-5341fe0eab59"/>
<containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="46092e9f-bbb9-44eb-84cc-c9b087f8c4e1"/>
<containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="fbf9cb7c-54cd-4338-aaf0-be4d9c2c4516"/>
<containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="1ec8b0ca-8f5d-4f86-b75f-af468c8bb35b"/>
<containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="589c3b37-54a2-4164-9815-c5c974b58ac1"/>
<containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="7b45231d-9d78-48a4-b579-4ebc506faf73"/>
<containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="5536c5d0-7dbd-4b3a-bddd-23119c39de38"/>
<containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="be72a0c5-fafe-498c-b509-b2ddbaad1490"/>
<containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="a4f35a14-fe0c-486f-abd0-66f193f4fb25"/>
<containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="149532ed-c893-4643-8bea-79231373a35b"/>
<defaultRunMode>ManagedApplication</defaultRunMode>
<usePurposes>PersonalComputer</usePurposes>
<scriptVariant>Russian</scriptVariant>
@@ -19,7 +19,7 @@
<defaultRoles>Role.АдминистраторСистемы</defaultRoles>
<defaultRoles>Role.ИнтерактивноеОткрытиеВнешнихОтчетовИОбработок</defaultRoles>
<vendor>Фирма &quot;1С&quot;</vendor>
<version>3.0.3.48</version>
<version>3.0.3.54</version>
<updateCatalogAddress>http://downloads.v8.1c.ru/tmplts/</updateCatalogAddress>
<includeHelpInContents>true</includeHelpInContents>
<usedMobileApplicationFunctionalities>
@@ -1 +1 @@
{6,1,1,e7f84b80-e744-4c5f-acc7-886632de604e,1,2a248e2f-89c6-4f8d-864e-af58de592cdc,"3.0.3.48","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",6040,1,0,7b2363ea-3925-4ed2-8893-c1498346928a,7b2363ea-3925-4ed2-8893-c1498346928a,1,0,db4a9ccb-9ef5-4b3c-8577-b6fe5db1b62e,db4a9ccb-9ef5-4b3c-8577-b6fe5db1b62e,1,0,9233322b-dfdb-4c66-91fe-1299292d40a5,9233322b-dfdb-4c66-91fe-1299292d40a5,1,0,7795348b-2f52-47f7-bf00-e11e5e795a43,7795348b-2f52-47f7-bf00-e11e5e795a43,1,0,0421b67e-ed26-491d-ab98-ec59002ed4ce,0421b67e-ed26-491d-ab98-ec59002ed4ce,1,0,bb47ced2-31f9-4870-8633-20b986e53ccc,bb47ced2-31f9-4870-8633-20b986e53ccc,1,0,7d8acec9-f5a9-411e-921c-446ed0dd3332,7d8acec9-f5a9-411e-921c-446ed0dd3332,1,0,739c01a9-1125-45ef-ab4e-8c73af4eeff0,739c01a9-1125-45ef-ab4e-8c73af4eeff0,1,0,cdbd26b1-9583-46e8-adf7-8cc705639892,cdbd26b1-9583-46e8-adf7-8cc705639892,1,0,c0e38c3e-7088-4e35-9d84-2d0ab9655402,c0e38c3e-7088-4e35-9d84-2d0ab9655402,1,0,1098786f-dd24-4cce-b212-be0cb5f01735,1098786f-dd24-4cce-b212-be0cb5f01735,1,0,3c0037f3-4422-4836-b116-8c72e32bdd55,3c0037f3-4422-4836-b116-8c72e32bdd55,1,0,6f7c6c31-206b-4010-bdad-1ad2e304f154,6f7c6c31-206b-4010-bdad-1ad2e304f154,1,0,a8659e53-8c6b-4b0c-9736-fe93a91e4d69,a8659e53-8c6b-4b0c-9736-fe93a91e4d69,1,0,fe9a1d1a-19c0-499f-8e1b-09cadabe882f,fe9a1d1a-19c0-499f-8e1b-09cadabe882f,1,0,5b68d479-7880-44de-84e3-7f578b43f0dc,5b68d479-7880-44de-84e3-7f578b43f0dc,1,0,bf9ca98c-5c95-4cfb-9181-8c1d847f9fbb,bf9ca98c-5c95-4cfb-9181-8c1d847f9fbb,1,0,b4629308-42de-4ce8-8591-cf0c2399a9a2,b4629308-42de-4ce8-8591-cf0c2399a9a2,1,0,c7e984ae-1dbb-4041-b18a-bfd0d63a002f,c7e984ae-1dbb-4041-b18a-bfd0d63a002f,1,0,bb0424b8-dfd1-4a27-bd66-9dea3ffc77c4,bb0424b8-dfd1-4a27-bd66-9dea3ffc77c4,1,0,a4ac0a50-ee39-4dc1-b84f-eec8fe485f03,a4ac0a50-ee39-4dc1-b84f-eec8fe485f03,1,0,1861ee4f-fd8c-4afa-8441-c074bf51f67e,1861ee4f-fd8c-4afa-8441-c074bf51f67e,1,0,de7ed8f7-3c02-47e0-aea8-4747ac68a5d5,de7ed8f7-3c02-47e0-aea8-4747ac68a5d5,1,0,b93b8760-6200-40ee-8bdc-875ba80a6155,b93b8760-6200-40ee-8bdc-875ba80a6155,1,0,c27472ee-879a-4746-9d21-122738ec80b7,c27472ee-879a-4746-9d21-122738ec80b7,1,0,e8b248d9-9049-456a-9c7d-7a0462cc67ab,e8b248d9-9049-456a-9c7d-7a0462cc67ab,1,0,d4562287-440d-4462-9de2-7097ccbf3764,d4562287-440d-4462-9de2-7097ccbf3764,1,0,ec797c75-02c5-4cf5-9dd4-26cd46c99519,ec797c75-02c5-4cf5-9dd4-26cd46c99519,1,0,6fccdf59-fc99-4a2b-a144-fffe438a147c,6fccdf59-fc99-4a2b-a144-fffe438a147c,1,0,af8bd73a-d8e8-487d-8f36-d835ab10ea3a,af8bd73a-d8e8-487d-8f36-d835ab10ea3a,1,0,08a413ff-bebd-42e5-8ff3-2115746a0844,08a413ff-bebd-42e5-8ff3-2115746a0844,1,0,da9b32e6-5b93-45a6-84b2-238d57541e18,da9b32e6-5b93-45a6-84b2-238d57541e18,1,0,e43d69c8-b284-47da-b236-611bc94a15b6,e43d69c8-b284-47da-b236-611bc94a15b6,1,0,31eeaa05-6c49-41fe-b840-1edbad4ccac7,31eeaa05-6c49-41fe-b840-1edbad4ccac7,1,0,842c8662-8f39-405e-9665-cbdabc116159,842c8662-8f39-405e-9665-cbdabc116159,1,0,fca4b033-02c4-4d61-9e51-87783c3cef1a,fca4b033-02c4-4d61-9e51-87783c3cef1a,1,0,396ef757-d7f6-411f-8c4c-1acb1106a009,396ef757-d7f6-411f-8c4c-1acb1106a009,1,0,839e29b1-a0d2-40fa-9f3e-46e66b943358,839e29b1-a0d2-40fa-9f3e-46e66b943358,1,0,c56d2cc7-630a-441b-b23f-ba78c34849bd,c56d2cc7-630a-441b-b23f-ba78c34849bd,1,0,9aecf4f5-46ed-4d1c-a584-cd028e467895,9aecf4f5-46ed-4d1c-a584-cd028e467895,1,0,21d92c2f-6c78-43ce-b1f4-59d7845b5a91,21d92c2f-6c78-43ce-b1f4-59d7845b5a91,1,0,a1c379be-43d3-4e02-83bb-d2e7de2d4ae3,a1c379be-43d3-4e02-83bb-d2e7de2d4ae3,1,0,a1f10624-22e9-4a04-b370-fd085bdd0f67,a1f10624-22e9-4a04-b370-fd085bdd0f67,1,0,2a4b10be-3cd7-4755-905f-7b4d02ff6a22,2a4b10be-3cd7-4755-905f-7b4d02ff6a22,1,0,3cffb795-2a28-4beb-92f4-5813f5994022,3cffb795-2a28-4beb-92f4-5813f5994022,1,0,3323ca68-1382-4710-a933-23fc56588935,3323ca68-1382-4710-a933-23fc56588935,1,0,d6b12775-3255-42b8-88b2-62684f873e7d,d6b12775-3255-42b8-88b2-62684f873e7d,1,0,cc23d903-ccc5-42f4-862f-5e7278c4e346,cc23d903-ccc5-42f4-862f-5e7278c4e346,1,0,98f033e0-fa40-46e0-b51a-87a066749a35,98f033e0-fa40-46e0-b51a-87a066749a35,1,0,e8b4cb2d-1180-4101-954a-4cb5464f198c,e8b4cb2d-1180-4101-954a-4cb5464f198c,1,0,a379287d-1ce8-460d-a503-910e728e28f1,a379287d-1ce8-460d-a503-910e728e28f1,1,0,f765c4ba-c677-42ac-8d0c-43bb485405b9,f765c4ba-c677-42ac-8d0c-43bb485405b9,1,0,83192b3e-e7a9-4595-8887-24cda84457a9,83192b3e-e7a9-4595-8887-24cda84457a9,1,0,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,1,0,c8a4c5da-bc88-4f6e-9787-1c22c2f41be7,c8a4c5da-bc88-4f6e-9787-1c22c2f41be7,1,0,08eeb8f1-944f-4450-83f6-ef20aaab7d86,08eeb8f1-944f-4450-83f6-ef20aaab7d86,1,0,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,1,0,8d77dd4a-e646-4105-8dcf-8ce8fc3da0b4,8d77dd4a-e646-4105-8dcf-8ce8fc3da0b4,1,0,2fd12dba-5311-4f31-949c-f6b15decc0cc,2fd12dba-5311-4f31-949c-f6b15decc0cc,1,0,d7cf3981-cf63-4a21-868b-8175a7704a8f,d7cf3981-cf63-4a21-868b-8175a7704a8f,1,0,35895e12-52b6-49a1-acdf-6d828a948af0,35895e12-52b6-49a1-acdf-6d828a948af0,1,0,0ae93712-74e8-41c7-8f2d-4dfc8983697d,0ae93712-74e8-Line truncated
{6,1,1,52f33241-ea03-41bf-91c7-d2d069c385cb,1,084682e2-b036-47f7-8c66-484937e5ce75,"3.0.3.54","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",6040,1,0,5e664e8d-4b87-4c0e-99d1-e5fb4ad5c6d3,5e664e8d-4b87-4c0e-99d1-e5fb4ad5c6d3,1,0,db4a9ccb-9ef5-4b3c-8577-b6fe5db1b62e,db4a9ccb-9ef5-4b3c-8577-b6fe5db1b62e,1,0,9233322b-dfdb-4c66-91fe-1299292d40a5,9233322b-dfdb-4c66-91fe-1299292d40a5,1,0,7795348b-2f52-47f7-bf00-e11e5e795a43,7795348b-2f52-47f7-bf00-e11e5e795a43,1,0,0421b67e-ed26-491d-ab98-ec59002ed4ce,0421b67e-ed26-491d-ab98-ec59002ed4ce,1,0,bb47ced2-31f9-4870-8633-20b986e53ccc,bb47ced2-31f9-4870-8633-20b986e53ccc,1,0,7d8acec9-f5a9-411e-921c-446ed0dd3332,7d8acec9-f5a9-411e-921c-446ed0dd3332,1,0,739c01a9-1125-45ef-ab4e-8c73af4eeff0,739c01a9-1125-45ef-ab4e-8c73af4eeff0,1,0,cdbd26b1-9583-46e8-adf7-8cc705639892,cdbd26b1-9583-46e8-adf7-8cc705639892,1,0,c0e38c3e-7088-4e35-9d84-2d0ab9655402,c0e38c3e-7088-4e35-9d84-2d0ab9655402,1,0,1098786f-dd24-4cce-b212-be0cb5f01735,1098786f-dd24-4cce-b212-be0cb5f01735,1,0,3c0037f3-4422-4836-b116-8c72e32bdd55,3c0037f3-4422-4836-b116-8c72e32bdd55,1,0,6f7c6c31-206b-4010-bdad-1ad2e304f154,6f7c6c31-206b-4010-bdad-1ad2e304f154,1,0,a8659e53-8c6b-4b0c-9736-fe93a91e4d69,a8659e53-8c6b-4b0c-9736-fe93a91e4d69,1,0,fe9a1d1a-19c0-499f-8e1b-09cadabe882f,fe9a1d1a-19c0-499f-8e1b-09cadabe882f,1,0,5b68d479-7880-44de-84e3-7f578b43f0dc,5b68d479-7880-44de-84e3-7f578b43f0dc,1,0,bf9ca98c-5c95-4cfb-9181-8c1d847f9fbb,bf9ca98c-5c95-4cfb-9181-8c1d847f9fbb,1,0,b4629308-42de-4ce8-8591-cf0c2399a9a2,b4629308-42de-4ce8-8591-cf0c2399a9a2,1,0,c7e984ae-1dbb-4041-b18a-bfd0d63a002f,c7e984ae-1dbb-4041-b18a-bfd0d63a002f,1,0,bb0424b8-dfd1-4a27-bd66-9dea3ffc77c4,bb0424b8-dfd1-4a27-bd66-9dea3ffc77c4,1,0,a4ac0a50-ee39-4dc1-b84f-eec8fe485f03,a4ac0a50-ee39-4dc1-b84f-eec8fe485f03,1,0,1861ee4f-fd8c-4afa-8441-c074bf51f67e,1861ee4f-fd8c-4afa-8441-c074bf51f67e,1,0,de7ed8f7-3c02-47e0-aea8-4747ac68a5d5,de7ed8f7-3c02-47e0-aea8-4747ac68a5d5,1,0,b93b8760-6200-40ee-8bdc-875ba80a6155,b93b8760-6200-40ee-8bdc-875ba80a6155,1,0,c27472ee-879a-4746-9d21-122738ec80b7,c27472ee-879a-4746-9d21-122738ec80b7,1,0,e8b248d9-9049-456a-9c7d-7a0462cc67ab,e8b248d9-9049-456a-9c7d-7a0462cc67ab,1,0,d4562287-440d-4462-9de2-7097ccbf3764,d4562287-440d-4462-9de2-7097ccbf3764,1,0,ec797c75-02c5-4cf5-9dd4-26cd46c99519,ec797c75-02c5-4cf5-9dd4-26cd46c99519,1,0,6fccdf59-fc99-4a2b-a144-fffe438a147c,6fccdf59-fc99-4a2b-a144-fffe438a147c,1,0,af8bd73a-d8e8-487d-8f36-d835ab10ea3a,af8bd73a-d8e8-487d-8f36-d835ab10ea3a,1,0,08a413ff-bebd-42e5-8ff3-2115746a0844,08a413ff-bebd-42e5-8ff3-2115746a0844,1,0,da9b32e6-5b93-45a6-84b2-238d57541e18,da9b32e6-5b93-45a6-84b2-238d57541e18,1,0,e43d69c8-b284-47da-b236-611bc94a15b6,e43d69c8-b284-47da-b236-611bc94a15b6,1,0,31eeaa05-6c49-41fe-b840-1edbad4ccac7,31eeaa05-6c49-41fe-b840-1edbad4ccac7,1,0,842c8662-8f39-405e-9665-cbdabc116159,842c8662-8f39-405e-9665-cbdabc116159,1,0,fca4b033-02c4-4d61-9e51-87783c3cef1a,fca4b033-02c4-4d61-9e51-87783c3cef1a,1,0,396ef757-d7f6-411f-8c4c-1acb1106a009,396ef757-d7f6-411f-8c4c-1acb1106a009,1,0,839e29b1-a0d2-40fa-9f3e-46e66b943358,839e29b1-a0d2-40fa-9f3e-46e66b943358,1,0,c56d2cc7-630a-441b-b23f-ba78c34849bd,c56d2cc7-630a-441b-b23f-ba78c34849bd,1,0,9aecf4f5-46ed-4d1c-a584-cd028e467895,9aecf4f5-46ed-4d1c-a584-cd028e467895,1,0,21d92c2f-6c78-43ce-b1f4-59d7845b5a91,21d92c2f-6c78-43ce-b1f4-59d7845b5a91,1,0,a1c379be-43d3-4e02-83bb-d2e7de2d4ae3,a1c379be-43d3-4e02-83bb-d2e7de2d4ae3,1,0,a1f10624-22e9-4a04-b370-fd085bdd0f67,a1f10624-22e9-4a04-b370-fd085bdd0f67,1,0,2a4b10be-3cd7-4755-905f-7b4d02ff6a22,2a4b10be-3cd7-4755-905f-7b4d02ff6a22,1,0,3cffb795-2a28-4beb-92f4-5813f5994022,3cffb795-2a28-4beb-92f4-5813f5994022,1,0,3323ca68-1382-4710-a933-23fc56588935,3323ca68-1382-4710-a933-23fc56588935,1,0,d6b12775-3255-42b8-88b2-62684f873e7d,d6b12775-3255-42b8-88b2-62684f873e7d,1,0,cc23d903-ccc5-42f4-862f-5e7278c4e346,cc23d903-ccc5-42f4-862f-5e7278c4e346,1,0,98f033e0-fa40-46e0-b51a-87a066749a35,98f033e0-fa40-46e0-b51a-87a066749a35,1,0,e8b4cb2d-1180-4101-954a-4cb5464f198c,e8b4cb2d-1180-4101-954a-4cb5464f198c,1,0,a379287d-1ce8-460d-a503-910e728e28f1,a379287d-1ce8-460d-a503-910e728e28f1,1,0,f765c4ba-c677-42ac-8d0c-43bb485405b9,f765c4ba-c677-42ac-8d0c-43bb485405b9,1,0,83192b3e-e7a9-4595-8887-24cda84457a9,83192b3e-e7a9-4595-8887-24cda84457a9,1,0,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,1,0,c8a4c5da-bc88-4f6e-9787-1c22c2f41be7,c8a4c5da-bc88-4f6e-9787-1c22c2f41be7,1,0,08eeb8f1-944f-4450-83f6-ef20aaab7d86,08eeb8f1-944f-4450-83f6-ef20aaab7d86,1,0,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,1,0,8d77dd4a-e646-4105-8dcf-8ce8fc3da0b4,8d77dd4a-e646-4105-8dcf-8ce8fc3da0b4,1,0,2fd12dba-5311-4f31-949c-f6b15decc0cc,2fd12dba-5311-4f31-949c-f6b15decc0cc,1,0,d7cf3981-cf63-4a21-868b-8175a7704a8f,d7cf3981-cf63-4a21-868b-8175a7704a8f,1,0,35895e12-52b6-49a1-acdf-6d828a948af0,35895e12-52b6-49a1-acdf-6d828a948af0,1,0,0ae93712-74e8-41c7-8f2d-4dfc8983697d,0ae93712-74e8-Line truncated
@@ -205,6 +205,14 @@
<commandBar/>
</commandInterface>
<extInfo xsi:type="form:InformationRegisterManagerFormExtInfo">
<handlers>
<event>AfterWriteAtServer</event>
<name>ПослеЗаписиНаСервере</name>
</handlers>
<handlers>
<event>OnReadAtServer</event>
<name>ПриЧтенииНаСервере</name>
</handlers>
<handlers>
<event>BeforeWrite</event>
<name>ПередЗаписью</name>
@@ -13,4 +13,28 @@
Отказ = Истина;
КонецПроцедуры
&НаСервере
Процедура ПриЧтенииНаСервере(ТекущийОбъект)
// СтандартныеПодсистемы.УправлениеДоступом
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.УправлениеДоступом") Тогда
МодульУправлениеДоступом = ОбщегоНазначения.ОбщийМодуль("УправлениеДоступом");
МодульУправлениеДоступом.ПриЧтенииНаСервере(ЭтотОбъект, ТекущийОбъект);
КонецЕсли;
// Конец СтандартныеПодсистемы.УправлениеДоступом
КонецПроцедуры
&НаСервере
Процедура ПослеЗаписиНаСервере(ТекущийОбъект, ПараметрыЗаписи)
// СтандартныеПодсистемы.УправлениеДоступом
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.УправлениеДоступом") Тогда
МодульУправлениеДоступом = ОбщегоНазначения.ОбщийМодуль("УправлениеДоступом");
МодульУправлениеДоступом.ПослеЗаписиНаСервере(ЭтотОбъект, ТекущийОбъект, ПараметрыЗаписи);
КонецЕсли;
// Конец СтандартныеПодсистемы.УправлениеДоступом
КонецПроцедуры
#КонецОбласти
@@ -372,5 +372,14 @@
<navigationPanel/>
<commandBar/>
</commandInterface>
<extInfo xsi:type="form:InformationRegisterManagerFormExtInfo"/>
<extInfo xsi:type="form:InformationRegisterManagerFormExtInfo">
<handlers>
<event>AfterWriteAtServer</event>
<name>ПослеЗаписиНаСервере</name>
</handlers>
<handlers>
<event>OnReadAtServer</event>
<name>ПриЧтенииНаСервере</name>
</handlers>
</extInfo>
</form:Form>
@@ -17,6 +17,30 @@
КонецПроцедуры
&НаСервере
Процедура ПриЧтенииНаСервере(ТекущийОбъект)
// СтандартныеПодсистемы.УправлениеДоступом
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.УправлениеДоступом") Тогда
МодульУправлениеДоступом = ОбщегоНазначения.ОбщийМодуль("УправлениеДоступом");
МодульУправлениеДоступом.ПриЧтенииНаСервере(ЭтотОбъект, ТекущийОбъект);
КонецЕсли;
// Конец СтандартныеПодсистемы.УправлениеДоступом
КонецПроцедуры
&НаСервере
Процедура ПослеЗаписиНаСервере(ТекущийОбъект, ПараметрыЗаписи)
// СтандартныеПодсистемы.УправлениеДоступом
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.УправлениеДоступом") Тогда
МодульУправлениеДоступом = ОбщегоНазначения.ОбщийМодуль("УправлениеДоступом");
МодульУправлениеДоступом.ПослеЗаписиНаСервере(ЭтотОбъект, ТекущийОбъект, ПараметрыЗаписи);
КонецЕсли;
// Конец СтандартныеПодсистемы.УправлениеДоступом
КонецПроцедуры
#КонецОбласти
#Область ОбработчикиКомандФормы
@@ -377,6 +377,14 @@
<event>AfterWrite</event>
<name>ПослеЗаписи</name>
</handlers>
<handlers>
<event>AfterWriteAtServer</event>
<name>ПослеЗаписиНаСервере</name>
</handlers>
<handlers>
<event>OnReadAtServer</event>
<name>ПриЧтенииНаСервере</name>
</handlers>
<handlers>
<event>BeforeWriteAtServer</event>
<name>ПередЗаписьюНаСервере</name>
@@ -30,6 +30,30 @@
Оповестить("Запись_РолеваяАдресация", ПараметрыЗаписи, Запись.РольИсполнителя);
КонецПроцедуры
&НаСервере
Процедура ПриЧтенииНаСервере(ТекущийОбъект)
// СтандартныеПодсистемы.УправлениеДоступом
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.УправлениеДоступом") Тогда
МодульУправлениеДоступом = ОбщегоНазначения.ОбщийМодуль("УправлениеДоступом");
МодульУправлениеДоступом.ПриЧтенииНаСервере(ЭтотОбъект, ТекущийОбъект);
КонецЕсли;
// Конец СтандартныеПодсистемы.УправлениеДоступом
КонецПроцедуры
&НаСервере
Процедура ПослеЗаписиНаСервере(ТекущийОбъект, ПараметрыЗаписи)
// СтандартныеПодсистемы.УправлениеДоступом
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.УправлениеДоступом") Тогда
МодульУправлениеДоступом = ОбщегоНазначения.ОбщийМодуль("УправлениеДоступом");
МодульУправлениеДоступом.ПослеЗаписиНаСервере(ЭтотОбъект, ТекущийОбъект, ПараметрыЗаписи);
КонецЕсли;
// Конец СтандартныеПодсистемы.УправлениеДоступом
КонецПроцедуры
#КонецОбласти
#Область ОбработчикиСобытийЭлементовШапкиФормы
@@ -1217,6 +1217,10 @@
<event>AfterWrite</event>
<name>ПослеЗаписи</name>
</handlers>
<handlers>
<event>AfterWriteAtServer</event>
<name>ПослеЗаписиНаСервере</name>
</handlers>
<handlers>
<event>OnReadAtServer</event>
<name>ПриЧтенииНаСервере</name>
@@ -46,6 +46,14 @@
&НаСервере
Процедура ПриЧтенииНаСервере(ТекущийОбъект)
// СтандартныеПодсистемы.УправлениеДоступом
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.УправлениеДоступом") Тогда
МодульУправлениеДоступом = ОбщегоНазначения.ОбщийМодуль("УправлениеДоступом");
МодульУправлениеДоступом.ПриЧтенииНаСервере(ЭтотОбъект, ТекущийОбъект);
КонецЕсли;
// Конец СтандартныеПодсистемы.УправлениеДоступом
Расписание = ТекущийОбъект.Расписание.Получить();
КонецПроцедуры
@@ -158,6 +166,18 @@
КонецЕсли;
КонецПроцедуры
&НаСервере
Процедура ПослеЗаписиНаСервере(ТекущийОбъект, ПараметрыЗаписи)
// СтандартныеПодсистемы.УправлениеДоступом
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.УправлениеДоступом") Тогда
МодульУправлениеДоступом = ОбщегоНазначения.ОбщийМодуль("УправлениеДоступом");
МодульУправлениеДоступом.ПослеЗаписиНаСервере(ЭтотОбъект, ТекущийОбъект, ПараметрыЗаписи);
КонецЕсли;
// Конец СтандартныеПодсистемы.УправлениеДоступом
КонецПроцедуры
#КонецОбласти
#Область ОбработчикиСобытийЭлементовШапкиФормы
@@ -70,6 +70,14 @@
&НаСервере
Процедура ПриЧтенииНаСервере(ТекущийОбъект)
// СтандартныеПодсистемы.УправлениеДоступом
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.УправлениеДоступом") Тогда
МодульУправлениеДоступом = ОбщегоНазначения.ОбщийМодуль("УправлениеДоступом");
МодульУправлениеДоступом.ПриЧтенииНаСервере(ЭтотОбъект, ТекущийОбъект);
КонецЕсли;
// Конец СтандартныеПодсистемы.УправлениеДоступом
Если ТекущийОбъект.ВключатьПодписьДляНовыхСообщений
И ТекущийОбъект.ФорматПодписиДляНовыхСообщений = Перечисления.СпособыРедактированияЭлектронныхПисем.HTML Тогда
@@ -114,6 +122,13 @@
&НаСервере
Процедура ПослеЗаписиНаСервере(ТекущийОбъект, ПараметрыЗаписи)
// СтандартныеПодсистемы.УправлениеДоступом
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.УправлениеДоступом") Тогда
МодульУправлениеДоступом = ОбщегоНазначения.ОбщийМодуль("УправлениеДоступом");
МодульУправлениеДоступом.ПослеЗаписиНаСервере(ЭтотОбъект, ТекущийОбъект, ПараметрыЗаписи);
КонецЕсли;
// Конец СтандартныеПодсистемы.УправлениеДоступом
УстановитьКартинкиСтраниц();
@@ -205,5 +205,14 @@
<navigationPanel/>
<commandBar/>
</commandInterface>
<extInfo xsi:type="form:InformationRegisterManagerFormExtInfo"/>
<extInfo xsi:type="form:InformationRegisterManagerFormExtInfo">
<handlers>
<event>AfterWriteAtServer</event>
<name>ПослеЗаписиНаСервере</name>
</handlers>
<handlers>
<event>OnReadAtServer</event>
<name>ПриЧтенииНаСервере</name>
</handlers>
</extInfo>
</form:Form>
@@ -15,6 +15,30 @@
КонецПроцедуры
&НаСервере
Процедура ПриЧтенииНаСервере(ТекущийОбъект)
// СтандартныеПодсистемы.УправлениеДоступом
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.УправлениеДоступом") Тогда
МодульУправлениеДоступом = ОбщегоНазначения.ОбщийМодуль("УправлениеДоступом");
МодульУправлениеДоступом.ПриЧтенииНаСервере(ЭтотОбъект, ТекущийОбъект);
КонецЕсли;
// Конец СтандартныеПодсистемы.УправлениеДоступом
КонецПроцедуры
&НаСервере
Процедура ПослеЗаписиНаСервере(ТекущийОбъект, ПараметрыЗаписи)
// СтандартныеПодсистемы.УправлениеДоступом
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.УправлениеДоступом") Тогда
МодульУправлениеДоступом = ОбщегоНазначения.ОбщийМодуль("УправлениеДоступом");
МодульУправлениеДоступом.ПослеЗаписиНаСервере(ЭтотОбъект, ТекущийОбъект, ПараметрыЗаписи);
КонецЕсли;
// Конец СтандартныеПодсистемы.УправлениеДоступом
КонецПроцедуры
#КонецОбласти
#Область ОбработчикиКомандФормы
@@ -2540,6 +2540,93 @@
<value>true</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>Administration</name>
<value>true</value>
</right>
<right>
<name>DataAdministration</name>
<value>true</value>
</right>
<right>
<name>UpdateDataBaseConfiguration</name>
<value>true</value>
</right>
<right>
<name>ExclusiveMode</name>
<value>true</value>
</right>
<right>
<name>ActiveUsers</name>
<value>true</value>
</right>
<right>
<name>EventLog</name>
<value>true</value>
</right>
<right>
<name>ThinClient</name>
<value>true</value>
</right>
<right>
<name>WebClient</name>
<value>true</value>
</right>
<right>
<name>ThickClient</name>
<value>true</value>
</right>
<right>
<name>ExternalConnection</name>
<value>true</value>
</right>
<right>
<name>Automation</name>
<value>true</value>
</right>
<right>
<name>TechnicalSpecialistMode</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeNormal</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeEmbeddedWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeFullscreenWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeKiosk</name>
<value>true</value>
</right>
<right>
<name>AnalyticsSystemClient</name>
<value>true</value>
</right>
<right>
<name>SaveUserData</name>
<value>true</value>
</right>
<right>
<name>ConfigurationExtensionsAdministration</name>
<value>true</value>
</right>
<right>
<name>Output</name>
<value>true</value>
</right>
</object>
<object>
<name>InformationRegister.СостоянияОбменовДанными</name>
<right>
@@ -3209,93 +3296,6 @@
<value>true</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>Administration</name>
<value>true</value>
</right>
<right>
<name>DataAdministration</name>
<value>true</value>
</right>
<right>
<name>UpdateDataBaseConfiguration</name>
<value>true</value>
</right>
<right>
<name>ExclusiveMode</name>
<value>true</value>
</right>
<right>
<name>ActiveUsers</name>
<value>true</value>
</right>
<right>
<name>EventLog</name>
<value>true</value>
</right>
<right>
<name>ThinClient</name>
<value>true</value>
</right>
<right>
<name>WebClient</name>
<value>true</value>
</right>
<right>
<name>ThickClient</name>
<value>true</value>
</right>
<right>
<name>ExternalConnection</name>
<value>true</value>
</right>
<right>
<name>Automation</name>
<value>true</value>
</right>
<right>
<name>TechnicalSpecialistMode</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeNormal</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeEmbeddedWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeFullscreenWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeKiosk</name>
<value>true</value>
</right>
<right>
<name>AnalyticsSystemClient</name>
<value>true</value>
</right>
<right>
<name>SaveUserData</name>
<value>true</value>
</right>
<right>
<name>ConfigurationExtensionsAdministration</name>
<value>true</value>
</right>
<right>
<name>Output</name>
<value>true</value>
</right>
</object>
<object>
<name>InformationRegister.ДополнительныеАдресныеСведения</name>
<right>
@@ -3362,6 +3362,45 @@
<value>false</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>Administration</name>
<value>false</value>
</right>
<right>
<name>UpdateDataBaseConfiguration</name>
<value>false</value>
</right>
<right>
<name>ThickClient</name>
<value>false</value>
</right>
<right>
<name>ExternalConnection</name>
<value>false</value>
</right>
<right>
<name>Automation</name>
<value>false</value>
</right>
<right>
<name>TechnicalSpecialistMode</name>
<value>false</value>
</right>
<right>
<name>ConfigurationExtensionsAdministration</name>
<value>false</value>
</right>
<right>
<name>InteractiveOpenExtDataProcessors</name>
<value>false</value>
</right>
<right>
<name>InteractiveOpenExtReports</name>
<value>false</value>
</right>
</object>
<object>
<name>Catalog.ПользовательскиеНастройкиОтчетов</name>
<right>
@@ -4287,45 +4326,6 @@
<value>false</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>Administration</name>
<value>false</value>
</right>
<right>
<name>UpdateDataBaseConfiguration</name>
<value>false</value>
</right>
<right>
<name>ThickClient</name>
<value>false</value>
</right>
<right>
<name>ExternalConnection</name>
<value>false</value>
</right>
<right>
<name>Automation</name>
<value>false</value>
</right>
<right>
<name>TechnicalSpecialistMode</name>
<value>false</value>
</right>
<right>
<name>ConfigurationExtensionsAdministration</name>
<value>false</value>
</right>
<right>
<name>InteractiveOpenExtDataProcessors</name>
<value>false</value>
</right>
<right>
<name>InteractiveOpenExtReports</name>
<value>false</value>
</right>
</object>
<object>
<name>Document.ОтзывСогласияНаОбработкуПерсональныхДанных</name>
<right>