diff --git a/src/cf/CommonModules/узОбновлениеИнформационнойБазы/Ext/Module.bsl b/src/cf/CommonModules/узОбновлениеИнформационнойБазы/Ext/Module.bsl
index 422146588..9dd812564 100644
--- a/src/cf/CommonModules/узОбновлениеИнформационнойБазы/Ext/Module.bsl
+++ b/src/cf/CommonModules/узОбновлениеИнформационнойБазы/Ext/Module.bsl
@@ -1,6 +1,6 @@
Процедура ПриДобавленииПодсистемы(Описание) Экспорт
Описание.Имя = "УправлениеЗадачами";
- Описание.Версия = "1.0.2.013";
+ Описание.Версия = "1.0.2.015";
// Требуется библиотека стандартных подсистем.
Описание.ТребуемыеПодсистемы.Добавить("СтандартныеПодсистемы");
КонецПроцедуры
@@ -76,6 +76,13 @@
Обработчик.ОбщиеДанные = Истина;
Обработчик.Комментарий = "Обновление на версию 1.0.2.013";
+ Обработчик = Обработчики.Добавить();
+ Обработчик.Версия = "1.0.2.014";
+ Обработчик.НачальноеЗаполнение = Ложь;
+ Обработчик.Процедура = "узОбновлениеИнформационнойБазы.ОбновлениеНаВерсию_1_0_2_014";
+ Обработчик.ОбщиеДанные = Истина;
+ Обработчик.Комментарий = "Обновление на версию 1.0.2.014";
+
КонецПроцедуры
Процедура ПередОбновлениемИнформационнойБазы() Экспорт
КонецПроцедуры
@@ -333,6 +340,44 @@
КонецЦикла;
КонецПроцедуры
+Процедура ОбновлениеНаВерсию_1_0_2_014() Экспорт
+ Запрос = Новый Запрос;
+ Запрос.Текст =
+ "ВЫБРАТЬ
+ | узИсторияКонфигураций.Ссылка
+ |ИЗ
+ | Справочник.узИсторияКонфигураций КАК узИсторияКонфигураций
+ |
+ |УПОРЯДОЧИТЬ ПО
+ | узИсторияКонфигураций.Код";
+
+ РезультатЗапроса = Запрос.Выполнить();
+
+ Выборка = РезультатЗапроса.Выбрать();
+
+ СтруктураКэшПоиска = Новый Структура;
+ Пока Выборка.Следующий() Цикл
+ СпрОбъект = Выборка.Ссылка.ПолучитьОбъект();
+ #Если Тромбон тогда
+ СпрОбъект = Справочники.узИсторияКонфигураций.СоздатьЭлемент();
+ #Конецесли
+ пПользователь = Неопределено;
+
+ пПользовательХранилища = СокрЛП(СпрОбъект.ПользовательХранилища);
+
+ Если ЗначениеЗаполнено(пПользовательХранилища) Тогда
+ Если СтруктураКэшПоиска.Свойство(пПользовательХранилища) Тогда
+ пПользователь = СтруктураКэшПоиска[пПользовательХранилища];
+ Иначе
+ пПользователь = узОбщийМодульСервер.ПолучитьПользователяПоПользователюХранилища(пПользовательХранилища);
+ СтруктураКэшПоиска.Вставить(пПользовательХранилища,пПользователь);
+ Конецесли;
+ Конецесли;
+
+ СпрОбъект.Пользователь = пПользователь;
+ СпрОбъект.Записать();
+ КонецЦикла;
+КонецПроцедуры
Процедура узНачальноеЗаполнение() Экспорт
узДобавитьАдминистраторИБ();
diff --git a/src/cf/Configuration.xml b/src/cf/Configuration.xml
index 43b156ffe..21e478adb 100644
--- a/src/cf/Configuration.xml
+++ b/src/cf/Configuration.xml
@@ -49,7 +49,7 @@
Role.ИнтерактивноеОткрытиеВнешнихОтчетовИОбработок
Управление задачами
- 1.0.2.013
+ 1.0.2.015
false
false
@@ -1366,6 +1366,7 @@
УниверсальныйОбменДаннымиXML
УправлениеИтогамиИАгрегатами
узЗагрузкаИзмененийИзХранилища
+ узАктивностьПользователя
БезопасноеХранилищеДанных
БезопасноеХранилищеДанныхОбластейДанных
БлокировкиСеансовОбластейДанных