astakhovp/SSL
1
0 Fork 0
Code Issues Actions Packages Projects Releases Wiki Activity

3_1_2_281

Browse Source
This commit is contained in:
Компания 1С committed 2020-02-05 10:14:00 +03:00
1 parent cb9eda8782
commit 86731ba105
39 files changed
+1061 -693
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

SSL/src/Catalogs/ВнешниеКомпоненты/Forms/ФормаЭлемента/Module.bsl
+2
View File
@@ -305,6 +305,8 @@
Возврат;
КонецЕсли;
РазблокироватьДанныеФормыДляРедактирования();
МассивСсылок = Новый Массив;
МассивСсылок.Добавить(Объект.Ссылка);
SSL/src/Catalogs/ИдентификаторыОбъектовМетаданных/ManagerModule.bsl
+13 -9
View File
@@ -1995,7 +1995,7 @@
Если Строка <> Неопределено Тогда
ОбъектМетаданных = Метаданные[Строка.Имя];
РезультатПроверки.НеСоответствует = Строка.Имя <> СвойстваИдентификатора.ПолноеИмя;
РезультатПроверки.НеСоответствует = Строка.Имя <> СвойстваИдентификатора.ПолноеИмяКоллекции;
КонецЕсли;
Иначе
РезультатПроверки.НеСоответствует = Ложь;
@@ -2693,8 +2693,9 @@
Запрос.Текст =
"ВЫБРАТЬ
| Идентификаторы.Ссылка КАК Ссылка,
| Идентификаторы.КлючОбъектаМетаданных,
| Идентификаторы.ПолноеИмя
| Идентификаторы.КлючОбъектаМетаданных КАК КлючОбъектаМетаданных,
| Идентификаторы.ПолноеИмя КАК ПолноеИмя,
| Идентификаторы.ПолноеИмя КАК ПолноеИмяКоллекции
|ИЗ
| Справочник.ИдентификаторыОбъектовМетаданных КАК Идентификаторы
|ГДЕ
@@ -2706,15 +2707,16 @@
ТекстЗапроса =
"ВЫБРАТЬ
| ВерсииИдентификаторов.Идентификатор КАК Ссылка,
| Идентификаторы.КлючОбъектаМетаданных,
| ВерсииИдентификаторов.ПолноеИмяОбъекта КАК ПолноеИмя
| Идентификаторы.КлючОбъектаМетаданных КАК КлючОбъектаМетаданных,
| ВерсииИдентификаторов.ПолноеИмяОбъекта КАК ПолноеИмя,
| Идентификаторы.ПолноеИмя КАК ПолноеИмяКоллекции
|ИЗ
| РегистрСведений.ИдентификаторыОбъектовВерсийРасширений КАК ВерсииИдентификаторов
| ВНУТРЕННЕЕ СОЕДИНЕНИЕ Справочник.ИдентификаторыОбъектовРасширений КАК Идентификаторы
| ПО (Идентификаторы.Ссылка = ВерсииИдентификаторов.Идентификатор)
| И (ВерсииИдентификаторов.ВерсияРасширений = &ВерсияРасширений)
|ГДЕ
| ВерсииИдентификаторов.ВерсияРасширений = &ВерсияРасширений
| И ВерсииИдентификаторов.ПолноеИмяОбъекта В (&ПолныеИмена)";
| ВерсииИдентификаторов.ПолноеИмяОбъекта В(&ПолныеИмена)";
Запрос.Текст = Запрос.Текст + "
|
@@ -3021,6 +3023,7 @@
| Идентификаторы.Ссылка КАК Ссылка,
| Идентификаторы.КлючОбъектаМетаданных КАК КлючОбъектаМетаданных,
| Идентификаторы.ПолноеИмя КАК ПолноеИмя,
| Идентификаторы.ПолноеИмя КАК ПолноеИмяКоллекции,
| Идентификаторы.ПометкаУдаления КАК ПометкаУдаления,
| ЛОЖЬ КАК ОбъектРасширений,
| """" КАК ИмяРасширения
@@ -3046,6 +3049,7 @@
| Идентификаторы.Ссылка КАК Ссылка,
| Идентификаторы.КлючОбъектаМетаданных КАК КлючОбъектаМетаданных,
| ЕСТЬNULL(ВерсииИдентификаторов.ПолноеИмяОбъекта, """") КАК ПолноеИмя,
| Идентификаторы.ПолноеИмя КАК ПолноеИмяКоллекции,
| Идентификаторы.ПометкаУдаления КАК ПометкаУдаления,
| ИСТИНА КАК ОбъектРасширений,
| Идентификаторы.ИмяРасширения КАК ИмяРасширения
@@ -3053,9 +3057,9 @@
| Справочник.ИдентификаторыОбъектовРасширений КАК Идентификаторы
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ИдентификаторыОбъектовВерсийРасширений КАК ВерсииИдентификаторов
| ПО (ВерсииИдентификаторов.Идентификатор = Идентификаторы.Ссылка)
| И (ВерсииИдентификаторов.ВерсияРасширений = &ВерсияРасширений)
|ГДЕ
| ВерсииИдентификаторов.ВерсияРасширений = &ВерсияРасширений
| И Идентификаторы.Ссылка В(&ИдентификаторыРасширений)";
| Идентификаторы.Ссылка В(&ИдентификаторыРасширений)";
КонецЕсли;
Выгрузка = Запрос.Выполнить().Выгрузить();
SSL/src/Catalogs/СертификатыКлючейЭлектроннойПодписиИШифрования/Templates/КомпонентаXMLDSIG/Template.addin
BIN
View File
Binary file not shown.
SSL/src/Catalogs/УчетныеЗаписиЭлектроннойПочты/ManagerModule.bsl
+1 -1
View File
@@ -972,7 +972,7 @@
Если ТребуетсяПроверкаНастроекИсходящейПочты Тогда
Рекомендации.Добавить(НСтр("ru = 'Проверьте настройки подключения к серверу исходящей почты.'"));
КонецЕсли;
Если ТребуетсяПроверкаНастроекИсходящейПочты Тогда
Если ТребуетсяПроверкаНастроекВходящейПочты Тогда
Рекомендации.Добавить(НСтр("ru = 'Проверьте настройки подключения к серверу входящей почты.'"));
КонецЕсли;
Рекомендации = СтрСоединить(Рекомендации, Символы.ПС);
SSL/src/Catalogs/Файлы/Forms/Файлы/Form.form
-4
View File
@@ -4162,10 +4162,6 @@
<event>OnCreateAtServer</event>
<name>ПриСозданииНаСервере</name>
</handlers>
<handlers>
<event>OnClose</event>
<name>ПриЗакрытии</name>
</handlers>
<handlers>
<event>BeforeLoadDataFromSettingsAtServer</event>
<name>ПриЗагрузкеДанныхИзНастроекНаСервере</name>
SSL/src/Catalogs/Файлы/Forms/Файлы/Module.bsl
-19
View File
@@ -113,25 +113,6 @@
КонецПроцедуры
&НаКлиенте
Процедура ПриЗакрытии(ЗавершениеРаботы)
Если ЗавершениеРаботы Тогда
Возврат;
КонецЕсли;
ПриЗакрытииНаСервере();
СтандартныеПодсистемыКлиент.УстановитьПараметрКлиента(
"КоличествоЗанятыхФайлов", КоличествоЗанятыхФайлов);
КонецПроцедуры
&НаСервере
Процедура ПриЗакрытииНаСервере()
КоличествоЗанятыхФайлов = РаботаСФайламиСлужебный.КоличествоЗанятыхФайлов();
КонецПроцедуры
&НаКлиенте
Процедура ОбработкаОповещения(ИмяСобытия, Параметр, Источник)
SSL/src/Catalogs/Файлы/Forms/ФормаЭлемента/Module.bsl
+1
View File
@@ -761,6 +761,7 @@
ОсвободитьФайл();
ОповеститьОбИзменении(ЭтотОбъект.Объект.Ссылка);
Оповестить("Запись_Файл", Новый Структура("Событие", "РедактированиеОтменено"), ЭтотОбъект.Объект.Ссылка);
РаботаСФайламиСлужебныйКлиент.ИзменитьКоличествоЗанятыхФайлов();
КонецПроцедуры
SSL/src/CommonModules/ВариантыОтчетов/Module.bsl
-4
View File
@@ -3344,10 +3344,6 @@
// Обновление индекса поиска вариантов отчетов.
Функция ОбновитьИндексПоиска(Режим, ИндексироватьСхему)
Если Режим = "ОбщиеДанныеКонфигурации" И Не РазрешеноИндексированиеНеразделенныхДанных() Тогда
Возврат Неопределено;
КонецЕсли;
НачатьЗаполнениеПредставлений(Режим, Ложь);
ОбщиеДанные = (Режим = "ОбщиеДанныеКонфигурации" Или Режим = "ОбщиеДанныеРасширений");
SSL/src/CommonModules/ДополнительныеОтчетыИОбработки/Module.bsl
+2 -2
View File
@@ -1678,8 +1678,8 @@
// См. ОбщегоНазначенияПереопределяемый.ПриДобавленииИсключенийПоискаСсылок.
Процедура ПриДобавленииИсключенийПоискаСсылок(Массив) Экспорт
Массив.Добавить("Справочник.ДополнительныеОтчетыИОбработки.ТабличнаяЧасть.Разделы.Раздел.Значение");
Массив.Добавить("Справочник.ДополнительныеОтчетыИОбработки.ТабличнаяЧасть.Назначение.ОбъектНазначения.Значение");
Массив.Добавить("Справочник.ДополнительныеОтчетыИОбработки.ТабличнаяЧасть.Разделы.Реквизит.Раздел");
Массив.Добавить("Справочник.ДополнительныеОтчетыИОбработки.ТабличнаяЧасть.Назначение.Реквизит.ОбъектНазначения");
КонецПроцедуры
SSL/src/CommonModules/ОбновлениеИнформационнойБазыБСП/Module.bsl
+1 -1
View File
@@ -41,7 +41,7 @@
Процедура ПриДобавленииПодсистемы(Описание) Экспорт
Описание.Имя = "СтандартныеПодсистемы";
Описание.Версия = "3.1.2.264";
Описание.Версия = "3.1.2.281";
Описание.ИдентификаторИнтернетПоддержки = "SSL";
Описание.РежимВыполненияОтложенныхОбработчиков = "Параллельно";
Описание.ПараллельноеОтложенноеОбновлениеСВерсии = "2.3.3.0";
SSL/src/CommonModules/ОбновлениеИнформационнойБазыСлужебный/Module.bsl
+290 -232
View File
@@ -77,244 +77,21 @@
//
Функция ВыполнитьОбновлениеИнформационнойБазы(ПараметрыОбновления) Экспорт
Если Не ПараметрыОбновления.ПриЗапускеКлиентскогоПриложения Тогда
Если Не ОбщегоНазначения.РазделениеВключено()
И ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ОбновлениеКонфигурации") Тогда
МодульОбновлениеКонфигурации = ОбщегоНазначения.ОбщийМодуль("ОбновлениеКонфигурации");
МодульОбновлениеКонфигурации.ПроверитьНаличиеУстаревшихИсправлений();
ДополнительныеПараметры = ДействияПередОбновлениемИнформационнойБазы(ПараметрыОбновления);
Если ЗначениеЗаполнено(ДополнительныеПараметры.Возврат) Тогда
Возврат ДополнительныеПараметры.Возврат;
КонецЕсли;
Попытка
РегистрыСведений.ПараметрыРаботыПрограммы.ЗагрузитьОбновитьПараметрыРаботыПрограммы();
Исключение
ЗаписатьОшибку(ПодробноеПредставлениеОшибки(ИнформацияОбОшибке()));
ВызватьИсключение;
КонецПопытки;
КонецЕсли;
РежимВыполненияОтложенногоОбновления = РежимВыполненияОтложенногоОбновления(ПараметрыОбновления);
// Определяем факт смены имени конфигурации.
РежимОбновленияДанных = РежимОбновленияДанных();
ВерсияМетаданных = Метаданные.Версия;
Если ПустаяСтрока(ВерсияМетаданных) Тогда
ВерсияМетаданных = "0.0.0.0";
КонецЕсли;
ВерсияДанных = ВерсияИБ(Метаданные.Имя);
// Перед обновлением информационной базы.
//
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.РаботаВМоделиСервиса.ОбновлениеВерсииИБВМоделиСервиса") Тогда
МодульОбновлениеИнформационнойБазыСлужебныйВМоделиСервиса = ОбщегоНазначения.ОбщийМодуль("ОбновлениеИнформационнойБазыСлужебныйВМоделиСервиса");
МодульОбновлениеИнформационнойБазыСлужебныйВМоделиСервиса.ПередОбновлениемИнформационнойБазы();
// Установка привилегированного режима для возможности обновления ИБ в модели сервиса,
// в случае когда администратор области данных выполняет вход в область до завершения обновления области.
Если ОбщегоНазначения.РазделениеВключено() И ОбщегоНазначения.ДоступноИспользованиеРазделенныхДанных() Тогда
УстановитьПривилегированныйРежим(Истина);
КонецЕсли;
КонецЕсли;
// Загрузка и выгрузка сообщения обмена после перезапуска в связи с получением изменений конфигурации.
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ОбменДанными") Тогда
МодульОбменДаннымиСервер = ОбщегоНазначения.ОбщийМодуль("ОбменДаннымиСервер");
МодульОбменДаннымиСервер.ПередОбновлениемИнформационнойБазы(ПараметрыОбновления.ПриЗапускеКлиентскогоПриложения, ПараметрыОбновления.Перезапустить);
КонецЕсли;
Если НЕ ОбновлениеИнформационнойБазы.НеобходимоОбновлениеИнформационнойБазы() Тогда
Возврат "НеТребуется";
КонецЕсли;
Если ПараметрыОбновления.ВФоне Тогда
ДлительныеОперации.СообщитьПрогресс(1);
КонецЕсли;
ОписанияПодсистем = СтандартныеПодсистемыПовтИсп.ОписанияПодсистем();
Для каждого ИмяПодсистемы Из ОписанияПодсистем.Порядок Цикл
ОписаниеПодсистемы = ОписанияПодсистем.ПоИменам.Получить(ИмяПодсистемы);
Если НЕ ЗначениеЗаполнено(ОписаниеПодсистемы.ОсновнойСерверныйМодуль) Тогда
Продолжить;
КонецЕсли;
Модуль = ОбщегоНазначения.ОбщийМодуль(ОписаниеПодсистемы.ОсновнойСерверныйМодуль);
Модуль.ПередОбновлениемИнформационнойБазы();
КонецЦикла;
ОбновлениеИнформационнойБазыПереопределяемый.ПередОбновлениемИнформационнойБазы();
// Проверка наличия прав для обновления информационной базы.
Если НЕ ЕстьПраваНаОбновлениеИнформационнойБазы() Тогда
Сообщение = НСтр("ru = 'Недостаточно прав для обновления версии программы.'");
ЗаписатьОшибку(Сообщение);
ВызватьИсключение Сообщение;
КонецЕсли;
Если РежимОбновленияДанных = "ПереходСДругойПрограммы" Тогда
Сообщение = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Изменилось имя конфигурации на ""%1"".
|Будет выполнен переход с другой программы.'"),
Метаданные.Имя);
ИначеЕсли РежимОбновленияДанных = "ОбновлениеВерсии" Тогда
Сообщение = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Изменился номер версии конфигурации: с ""%1"" на ""%2"".
|Будет выполнено обновление информационной базы.'"),
ВерсияДанных, ВерсияМетаданных);
Иначе
Сообщение = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Выполняется начальное заполнение данных до версии ""%1"".'"),
ВерсияМетаданных);
КонецЕсли;
ЗаписатьИнформацию(Сообщение);
// Установка блокировки информационной базы.
БлокировкаУстановленаРанее = ПараметрыОбновления.УстановленнаяБлокировкаИБ <> Неопределено
И ПараметрыОбновления.УстановленнаяБлокировкаИБ.Установлена;
Если БлокировкаУстановленаРанее Тогда
ИтерацииОбновления = ИтерацииОбновления();
БлокировкаИБ = ПараметрыОбновления.УстановленнаяБлокировкаИБ;
Иначе
БлокировкаИБ = Неопределено;
ИтерацииОбновления = ЗаблокироватьИБ(БлокировкаИБ, ПараметрыОбновления.ИсключениеПриНевозможностиБлокировкиИБ);
Если БлокировкаИБ.Ошибка <> Неопределено Тогда
Возврат БлокировкаИБ.Ошибка;
КонецЕсли;
КонецЕсли;
ОперативноеОбновление = БлокировкаИБ.ОперативноеОбновление;
Попытка
Если РежимОбновленияДанных = "ПереходСДругойПрограммы" Тогда
ПерейтиСДругойПрограммы();
РежимОбновленияДанных = РежимОбновленияДанных();
ОперативноеОбновление = Ложь;
ИтерацииОбновления = ИтерацииОбновления();
КонецЕсли;
Исключение
Если Не БлокировкаУстановленаРанее Тогда
РазблокироватьИБ(БлокировкаИБ);
КонецЕсли;
ВызватьИсключение;
КонецПопытки;
Если ПараметрыОбновления.ВФоне Тогда
ДлительныеОперации.СообщитьПрогресс(10);
КонецЕсли;
Если Не ОбщегоНазначения.РазделениеВключено()
Или ОбщегоНазначения.ДоступноИспользованиеРазделенныхДанных() Тогда
СформироватьСписокОтложенныхОбработчиковОбновления(ИтерацииОбновления);
КонецЕсли;
Параметры = Новый Структура;
Параметры.Вставить("ХодВыполненияОбработчиков", КоличествоОбработчиковНаТекущуюВерсию(ИтерацииОбновления, РежимВыполненияОтложенногоОбновления));
Параметры.Вставить("ОперативноеОбновление", ОперативноеОбновление);
Параметры.Вставить("ВФоне", ПараметрыОбновления.ВФоне);
Параметры.Вставить("ПриЗапускеКлиентскогоПриложения", ПараметрыОбновления.ПриЗапускеКлиентскогоПриложения);
Параметры.Вставить("РежимВыполненияОтложенногоОбновления", РежимВыполненияОтложенногоОбновления);
Сообщение = НСтр("ru = 'Для обновления программы на новую версию будут выполнены обработчики: %1'");
Сообщение = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(Сообщение, Параметры.ХодВыполненияОбработчиков.ВсегоОбработчиков);
ЗаписатьИнформацию(Сообщение);
ПараметрЗапускаКлиента = ПараметрыСеанса.ПараметрыКлиентаНаСервере.Получить("ПараметрЗапуска");
ОтладкаОтложенногоОбновления = СтрНайти(НРег(ПараметрЗапускаКлиента), НРег("ОтладкаОтложенногоОбновления")) > 0;
ВыполнитьОтложенноеОбновлениеСейчас = Не ОтладкаОтложенногоОбновления
И РежимВыполненияОтложенногоОбновления = "Монопольно";
РежимВыполненияОтложенногоОбновления = РежимВыполненияОтложенногоОбновления(ПараметрыОбновления);
ВыполнитьОтложенноеОбновлениеСейчас = Не ОтладкаОтложенногоОбновления И РежимВыполненияОтложенногоОбновления = "Монопольно";
Попытка
ДополнительныеПараметры.Вставить("ВыполнитьОтложенноеОбновлениеСейчас", ВыполнитьОтложенноеОбновлениеСейчас);
ДополнительныеПараметры.Вставить("РежимВыполненияОтложенногоОбновления", РежимВыполненияОтложенногоОбновления);
// Выполняем все обработчики обновления для подсистем конфигурации.
Для Каждого ИтерацияОбновления Из ИтерацииОбновления Цикл
ИтерацияОбновления.ВыполненныеОбработчики = ВыполнитьИтерациюОбновления(ИтерацияОбновления, Параметры);
КонецЦикла;
// Очистка списка новых подсистем.
СведенияОбОбновлении = СведенияОбОбновленииИнформационнойБазы();
СведенияОбОбновлении.НовыеПодсистемы = Новый Массив;
ЗаполнитьДанныеДляПараллельногоОтложенногоОбновления(СведенияОбОбновлении, Параметры);
ЗаписатьСведенияОбОбновленииИнформационнойБазы(СведенияОбОбновлении);
// Для файловой базы отложенные обработчики выполняются в основном цикле обновления.
Если ВыполнитьОтложенноеОбновлениеСейчас Тогда
ВыполнитьОтложенноеОбновлениеСейчас(Параметры);
КонецЕсли;
Исключение
Если Не БлокировкаУстановленаРанее Тогда
РазблокироватьИБ(БлокировкаИБ);
КонецЕсли;
ВызватьИсключение;
КонецПопытки;
// Отключение монопольного режима.
Если Не БлокировкаУстановленаРанее Тогда
РазблокироватьИБ(БлокировкаИБ);
КонецЕсли;
Сообщение = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Обновление информационной базы на версию ""%1"" выполнено успешно.'"), ВерсияМетаданных);
ЗаписатьИнформацию(Сообщение);
ВыводитьОписаниеОбновлений = (РежимОбновленияДанных <> "НачальноеЗаполнение");
ОбновитьПовторноИспользуемыеЗначения();
// После обновления информационной базы.
//
ВыполнитьОбработчикиПослеОбновленияИнформационнойБазы(
ИтерацииОбновления,
Константы.ДетализироватьОбновлениеИБВЖурналеРегистрации.Получить(),
ВыводитьОписаниеОбновлений,
ОперативноеОбновление);
ОбновлениеИнформационнойБазыПереопределяемый.ПослеОбновленияИнформационнойБазы(
ВерсияДанных,
ВерсияМетаданных,
ИтерацииОбновления,
ВыводитьОписаниеОбновлений,
Не ОперативноеОбновление);
// Выгрузка сообщения обмена после перезапуска в связи с получением изменений конфигурации.
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ОбменДанными") Тогда
МодульОбменДаннымиСервер = ОбщегоНазначения.ОбщийМодуль("ОбменДаннымиСервер");
МодульОбменДаннымиСервер.ПослеОбновленияИнформационнойБазы();
КонецЕсли;
// Для клиент-серверной базы запланировать выполнение отложенных обработчиков обновления.
Если РежимВыполненияОтложенногоОбновления <> Неопределено
И РежимВыполненияОтложенногоОбновления = "Отложенно" Тогда
ЗапланироватьОтложенноеОбновление();
КонецЕсли;
ОпределитьВыводОписанияОбновлений(ВыводитьОписаниеОбновлений);
// Сброс неуспешного статуса обновления конфигурации при завершении обновления вручную (без скрипта).
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ОбновлениеКонфигурации") Тогда
МодульОбновлениеКонфигурации = ОбщегоНазначения.ОбщийМодуль("ОбновлениеКонфигурации");
МодульОбновлениеКонфигурации.ПослеОбновленияИнформационнойБазы();
КонецЕсли;
ОбновитьПовторноИспользуемыеЗначения();
УстановитьПривилегированныйРежим(Истина);
ПараметрЗапускаКлиента = ПараметрыСеанса.ПараметрыКлиентаНаСервере.Получить("ПараметрЗапуска");
Если СтрНайти(НРег(ПараметрЗапускаКлиента), НРег("ЗапуститьОбновлениеИнформационнойБазы")) > 0 Тогда
СтандартныеПодсистемыСервер.ЗарегистрироватьИзменениеПриоритетныхДанныхДляПодчиненныхУзловРИБ();
КонецЕсли;
УстановитьПривилегированныйРежим(Ложь);
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.УправлениеДоступом") Тогда
МодульУправлениеДоступомСлужебный = ОбщегоНазначения.ОбщийМодуль("УправлениеДоступомСлужебный");
МодульУправлениеДоступомСлужебный.ОбновитьДоступПослеОбновленияИнформационнойБазы(
ВыполнитьОтложенноеОбновлениеСейчас);
КонецЕсли;
УстановитьЗапускОбновленияИнформационнойБазы(Ложь);
ПараметрыСеанса.ВыполняетсяОбновлениеИБ = Ложь;
ВыполнитьДействияПриОбновленииИнформационнойБазы(ПараметрыОбновления, ДополнительныеПараметры);
ВыполнитьДействияПослеОбновленияИнформационнойБазы(ДополнительныеПараметры);
Возврат "Успешно";
@@ -1512,6 +1289,281 @@
#Область СлужебныеПроцедурыИФункции
Функция ДействияПередОбновлениемИнформационнойБазы(ПараметрыОбновления)
Если Не ПараметрыОбновления.ПриЗапускеКлиентскогоПриложения Тогда
Если Не ОбщегоНазначения.РазделениеВключено()
И ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ОбновлениеКонфигурации") Тогда
МодульОбновлениеКонфигурации = ОбщегоНазначения.ОбщийМодуль("ОбновлениеКонфигурации");
МодульОбновлениеКонфигурации.ПроверитьНаличиеУстаревшихИсправлений();
КонецЕсли;
Попытка
РегистрыСведений.ПараметрыРаботыПрограммы.ЗагрузитьОбновитьПараметрыРаботыПрограммы();
Исключение
ЗаписатьОшибку(ПодробноеПредставлениеОшибки(ИнформацияОбОшибке()));
ВызватьИсключение;
КонецПопытки;
КонецЕсли;
Результат = Новый Структура;
Результат.Вставить("Возврат", "");
// Определяем факт смены имени конфигурации.
РежимОбновленияДанных = РежимОбновленияДанных();
ВерсияМетаданных = Метаданные.Версия;
Если ПустаяСтрока(ВерсияМетаданных) Тогда
ВерсияМетаданных = "0.0.0.0";
КонецЕсли;
ВерсияДанных = ВерсияИБ(Метаданные.Имя);
// Перед обновлением информационной базы.
//
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.РаботаВМоделиСервиса.ОбновлениеВерсииИБВМоделиСервиса") Тогда
МодульОбновлениеИнформационнойБазыСлужебныйВМоделиСервиса = ОбщегоНазначения.ОбщийМодуль("ОбновлениеИнформационнойБазыСлужебныйВМоделиСервиса");
МодульОбновлениеИнформационнойБазыСлужебныйВМоделиСервиса.ПередОбновлениемИнформационнойБазы();
// Установка привилегированного режима для возможности обновления ИБ в модели сервиса,
// в случае когда администратор области данных выполняет вход в область до завершения обновления области.
Если ОбщегоНазначения.РазделениеВключено() И ОбщегоНазначения.ДоступноИспользованиеРазделенныхДанных() Тогда
УстановитьПривилегированныйРежим(Истина);
КонецЕсли;
КонецЕсли;
// Загрузка и выгрузка сообщения обмена после перезапуска в связи с получением изменений конфигурации.
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ОбменДанными") Тогда
МодульОбменДаннымиСервер = ОбщегоНазначения.ОбщийМодуль("ОбменДаннымиСервер");
МодульОбменДаннымиСервер.ПередОбновлениемИнформационнойБазы(ПараметрыОбновления.ПриЗапускеКлиентскогоПриложения, ПараметрыОбновления.Перезапустить);
КонецЕсли;
Если НЕ ОбновлениеИнформационнойБазы.НеобходимоОбновлениеИнформационнойБазы() Тогда
Результат.Возврат = "НеТребуется";
Возврат Результат;
КонецЕсли;
Если ПараметрыОбновления.ВФоне Тогда
ДлительныеОперации.СообщитьПрогресс(1);
КонецЕсли;
ОписанияПодсистем = СтандартныеПодсистемыПовтИсп.ОписанияПодсистем();
Для каждого ИмяПодсистемы Из ОписанияПодсистем.Порядок Цикл
ОписаниеПодсистемы = ОписанияПодсистем.ПоИменам.Получить(ИмяПодсистемы);
Если НЕ ЗначениеЗаполнено(ОписаниеПодсистемы.ОсновнойСерверныйМодуль) Тогда
Продолжить;
КонецЕсли;
Модуль = ОбщегоНазначения.ОбщийМодуль(ОписаниеПодсистемы.ОсновнойСерверныйМодуль);
Модуль.ПередОбновлениемИнформационнойБазы();
КонецЦикла;
ОбновлениеИнформационнойБазыПереопределяемый.ПередОбновлениемИнформационнойБазы();
// Проверка наличия прав для обновления информационной базы.
Если НЕ ЕстьПраваНаОбновлениеИнформационнойБазы() Тогда
Сообщение = НСтр("ru = 'Недостаточно прав для обновления версии программы.'");
ЗаписатьОшибку(Сообщение);
ВызватьИсключение Сообщение;
КонецЕсли;
Если РежимОбновленияДанных = "ПереходСДругойПрограммы" Тогда
Сообщение = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Изменилось имя конфигурации на ""%1"".
|Будет выполнен переход с другой программы.'"),
Метаданные.Имя);
ИначеЕсли РежимОбновленияДанных = "ОбновлениеВерсии" Тогда
Сообщение = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Изменился номер версии конфигурации: с ""%1"" на ""%2"".
|Будет выполнено обновление информационной базы.'"),
ВерсияДанных, ВерсияМетаданных);
Иначе
Сообщение = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Выполняется начальное заполнение данных до версии ""%1"".'"),
ВерсияМетаданных);
КонецЕсли;
ЗаписатьИнформацию(Сообщение);
// Установка блокировки информационной базы.
БлокировкаУстановленаРанее = ПараметрыОбновления.УстановленнаяБлокировкаИБ <> Неопределено
И ПараметрыОбновления.УстановленнаяБлокировкаИБ.Установлена;
Если БлокировкаУстановленаРанее Тогда
ИтерацииОбновления = ИтерацииОбновления();
БлокировкаИБ = ПараметрыОбновления.УстановленнаяБлокировкаИБ;
Иначе
БлокировкаИБ = Неопределено;
ИтерацииОбновления = ЗаблокироватьИБ(БлокировкаИБ, ПараметрыОбновления.ИсключениеПриНевозможностиБлокировкиИБ);
Если БлокировкаИБ.Ошибка <> Неопределено Тогда
Результат.Возврат = БлокировкаИБ.Ошибка;
Возврат Результат;
КонецЕсли;
КонецЕсли;
Результат.Вставить("РежимОбновленияДанных", РежимОбновленияДанных);
Результат.Вставить("ИтерацииОбновления", ИтерацииОбновления);
Результат.Вставить("БлокировкаИБ", БлокировкаИБ);
Результат.Вставить("БлокировкаУстановленаРанее", БлокировкаУстановленаРанее);
Результат.Вставить("ВерсияДанных", ВерсияДанных);
Результат.Вставить("ВерсияМетаданных", ВерсияМетаданных);
Возврат Результат;
КонецФункции
Функция ВыполнитьДействияПриОбновленииИнформационнойБазы(ПараметрыОбновления, ДополнительныеПараметры)
РежимОбновленияДанных = ДополнительныеПараметры.РежимОбновленияДанных;
ИтерацииОбновления = ДополнительныеПараметры.ИтерацииОбновления;
БлокировкаИБ = ДополнительныеПараметры.БлокировкаИБ;
БлокировкаУстановленаРанее = ДополнительныеПараметры.БлокировкаУстановленаРанее;
РежимВыполненияОтложенногоОбновления = ДополнительныеПараметры.РежимВыполненияОтложенногоОбновления;
ВыполнитьОтложенноеОбновлениеСейчас = ДополнительныеПараметры.ВыполнитьОтложенноеОбновлениеСейчас;
ОперативноеОбновление = БлокировкаИБ.ОперативноеОбновление;
Попытка
Если РежимОбновленияДанных = "ПереходСДругойПрограммы" Тогда
ПерейтиСДругойПрограммы();
РежимОбновленияДанных = РежимОбновленияДанных();
ОперативноеОбновление = Ложь;
ИтерацииОбновления = ИтерацииОбновления();
КонецЕсли;
Исключение
Если Не БлокировкаУстановленаРанее Тогда
РазблокироватьИБ(БлокировкаИБ);
КонецЕсли;
ВызватьИсключение;
КонецПопытки;
Если ПараметрыОбновления.ВФоне Тогда
ДлительныеОперации.СообщитьПрогресс(10);
КонецЕсли;
Если Не ОбщегоНазначения.РазделениеВключено()
Или ОбщегоНазначения.ДоступноИспользованиеРазделенныхДанных() Тогда
СформироватьСписокОтложенныхОбработчиковОбновления(ИтерацииОбновления);
КонецЕсли;
Параметры = Новый Структура;
Параметры.Вставить("ХодВыполненияОбработчиков", КоличествоОбработчиковНаТекущуюВерсию(ИтерацииОбновления, РежимВыполненияОтложенногоОбновления));
Параметры.Вставить("ОперативноеОбновление", ОперативноеОбновление);
Параметры.Вставить("ВФоне", ПараметрыОбновления.ВФоне);
Параметры.Вставить("ПриЗапускеКлиентскогоПриложения", ПараметрыОбновления.ПриЗапускеКлиентскогоПриложения);
Параметры.Вставить("РежимВыполненияОтложенногоОбновления", РежимВыполненияОтложенногоОбновления);
Сообщение = НСтр("ru = 'Для обновления программы на новую версию будут выполнены обработчики: %1'");
Сообщение = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(Сообщение, Параметры.ХодВыполненияОбработчиков.ВсегоОбработчиков);
ЗаписатьИнформацию(Сообщение);
Попытка
// Выполняем все обработчики обновления для подсистем конфигурации.
Для Каждого ИтерацияОбновления Из ИтерацииОбновления Цикл
ИтерацияОбновления.ВыполненныеОбработчики = ВыполнитьИтерациюОбновления(ИтерацияОбновления, Параметры);
КонецЦикла;
// Очистка списка новых подсистем.
СведенияОбОбновлении = СведенияОбОбновленииИнформационнойБазы();
СведенияОбОбновлении.НовыеПодсистемы = Новый Массив;
ЗаполнитьДанныеДляПараллельногоОтложенногоОбновления(СведенияОбОбновлении, Параметры);
ЗаписатьСведенияОбОбновленииИнформационнойБазы(СведенияОбОбновлении);
// Для файловой базы отложенные обработчики выполняются в основном цикле обновления.
Если ВыполнитьОтложенноеОбновлениеСейчас Тогда
ВыполнитьОтложенноеОбновлениеСейчас(Параметры);
КонецЕсли;
Исключение
Если Не БлокировкаУстановленаРанее Тогда
РазблокироватьИБ(БлокировкаИБ);
КонецЕсли;
ВызватьИсключение;
КонецПопытки;
КонецФункции
Процедура ВыполнитьДействияПослеОбновленияИнформационнойБазы(ДополнительныеПараметры)
РежимОбновленияДанных = ДополнительныеПараметры.РежимОбновленияДанных;
ИтерацииОбновления = ДополнительныеПараметры.ИтерацииОбновления;
БлокировкаИБ = ДополнительныеПараметры.БлокировкаИБ;
ОперативноеОбновление = ДополнительныеПараметры.БлокировкаИБ.ОперативноеОбновление;
ВерсияДанных = ДополнительныеПараметры.ВерсияДанных;
ВерсияМетаданных = ДополнительныеПараметры.ВерсияМетаданных;
БлокировкаУстановленаРанее = ДополнительныеПараметры.БлокировкаУстановленаРанее;
РежимВыполненияОтложенногоОбновления = ДополнительныеПараметры.РежимВыполненияОтложенногоОбновления;
ВыполнитьОтложенноеОбновлениеСейчас = ДополнительныеПараметры.ВыполнитьОтложенноеОбновлениеСейчас;
// Отключение монопольного режима.
Если Не БлокировкаУстановленаРанее Тогда
РазблокироватьИБ(БлокировкаИБ);
КонецЕсли;
Сообщение = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Обновление информационной базы на версию ""%1"" выполнено успешно.'"), ВерсияМетаданных);
ЗаписатьИнформацию(Сообщение);
ВыводитьОписаниеОбновлений = (РежимОбновленияДанных <> "НачальноеЗаполнение");
ОбновитьПовторноИспользуемыеЗначения();
// После обновления информационной базы.
//
ВыполнитьОбработчикиПослеОбновленияИнформационнойБазы(
ИтерацииОбновления,
Константы.ДетализироватьОбновлениеИБВЖурналеРегистрации.Получить(),
ВыводитьОписаниеОбновлений,
ОперативноеОбновление);
ОбновлениеИнформационнойБазыПереопределяемый.ПослеОбновленияИнформационнойБазы(
ВерсияДанных,
ВерсияМетаданных,
ИтерацииОбновления,
ВыводитьОписаниеОбновлений,
Не ОперативноеОбновление);
// Выгрузка сообщения обмена после перезапуска в связи с получением изменений конфигурации.
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ОбменДанными") Тогда
МодульОбменДаннымиСервер = ОбщегоНазначения.ОбщийМодуль("ОбменДаннымиСервер");
МодульОбменДаннымиСервер.ПослеОбновленияИнформационнойБазы();
КонецЕсли;
// Для клиент-серверной базы запланировать выполнение отложенных обработчиков обновления.
Если РежимВыполненияОтложенногоОбновления <> Неопределено
И РежимВыполненияОтложенногоОбновления = "Отложенно" Тогда
ЗапланироватьОтложенноеОбновление();
КонецЕсли;
ОпределитьВыводОписанияОбновлений(ВыводитьОписаниеОбновлений);
// Сброс неуспешного статуса обновления конфигурации при завершении обновления вручную (без скрипта).
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ОбновлениеКонфигурации") Тогда
МодульОбновлениеКонфигурации = ОбщегоНазначения.ОбщийМодуль("ОбновлениеКонфигурации");
МодульОбновлениеКонфигурации.ПослеОбновленияИнформационнойБазы();
КонецЕсли;
ОбновитьПовторноИспользуемыеЗначения();
УстановитьПривилегированныйРежим(Истина);
ПараметрЗапускаКлиента = ПараметрыСеанса.ПараметрыКлиентаНаСервере.Получить("ПараметрЗапуска");
Если СтрНайти(НРег(ПараметрЗапускаКлиента), НРег("ЗапуститьОбновлениеИнформационнойБазы")) > 0 Тогда
СтандартныеПодсистемыСервер.ЗарегистрироватьИзменениеПриоритетныхДанныхДляПодчиненныхУзловРИБ();
КонецЕсли;
УстановитьПривилегированныйРежим(Ложь);
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.УправлениеДоступом") Тогда
МодульУправлениеДоступомСлужебный = ОбщегоНазначения.ОбщийМодуль("УправлениеДоступомСлужебный");
МодульУправлениеДоступомСлужебный.ОбновитьДоступПослеОбновленияИнформационнойБазы(
ВыполнитьОтложенноеОбновлениеСейчас);
КонецЕсли;
УстановитьЗапускОбновленияИнформационнойБазы(Ложь);
ПараметрыСеанса.ВыполняетсяОбновлениеИБ = Ложь;
КонецПроцедуры
// Возвращает признак разрешения использования многопоточного обновления.
// Многопоточное обновление можно включить в ОбновлениеИнформационнойБазыПереопределяемый.ПриОпределенииНастроек().
//
@@ -4903,6 +4955,12 @@
Процедура ВыполнитьОбработчикиПослеОбновленияИнформационнойБазы(Знач ИтерацииОбновления, Знач ЗаписыватьВЖурнал, ВыводитьОписаниеОбновлений, Знач ОперативноеОбновление)
// Установка привилегированного режима для возможности обновления ИБ в модели сервиса,
// в случае когда администратор области данных выполняет вход в область до завершения обновления области.
Если ОбщегоНазначения.РазделениеВключено() И ОбщегоНазначения.ДоступноИспользованиеРазделенныхДанных() Тогда
УстановитьПривилегированныйРежим(Истина);
КонецЕсли;
Для Каждого ИтерацияОбновления Из ИтерацииОбновления Цикл
Если ЗаписыватьВЖурнал Тогда
SSL/src/CommonModules/ОбновлениеИнформационнойБазыСлужебныйВМоделиСервиса/Module.bsl
+1 -1
View File
@@ -700,7 +700,7 @@
ПараметрыБлокировки.Начало = ТекущаяУниверсальнаяДата();
ПараметрыБлокировки.Сообщение = СообщениеБлокировки;
ПараметрыБлокировки.Установлена = Истина;
ПараметрыБлокировки.Эксклюзивная = Истина;
ПараметрыБлокировки.Эксклюзивная = Ложь;
ВерсияМетаданных = Метаданные.Версия;
Если ПустаяСтрока(ВерсияМетаданных) Тогда
SSL/src/CommonModules/РаботаСФайламиВТомахСлужебный/Module.bsl
+1
View File
@@ -16,6 +16,7 @@
//
Функция ЕстьТомаХраненияФайлов() Экспорт
УстановитьОтключениеБезопасногоРежима(Истина);
УстановитьПривилегированныйРежим(Истина);
Запрос = Новый Запрос;
SSL/src/CommonModules/РаботаСФайламиСлужебныйВызовСервера/Module.bsl
+7 -11
View File
@@ -1793,19 +1793,14 @@
| ФайлыВРабочемКаталоге.НаЧтение КАК ВРегистреНаЧтение,
| ВЫБОР
| КОГДА ТИПЗНАЧЕНИЯ(ФайлыВРабочемКаталоге.Файл) = ТИП(Справочник.ВерсииФайлов)
| ТОГДА ФайлыВРабочемКаталоге.Файл.Владелец
| ТОГДА ВЫРАЗИТЬ(ФайлыВРабочемКаталоге.Файл КАК Справочник.ВерсииФайлов).Владелец
| ИНАЧЕ ФайлыВРабочемКаталоге.Файл
| КОНЕЦ КАК Владелец,
| ВЫБОР
| КОГДА ТИПЗНАЧЕНИЯ(ФайлыВРабочемКаталоге.Файл) = ТИП(Справочник.ВерсииФайлов)
| ТОГДА ФайлыВРабочемКаталоге.Файл.НомерВерсии
| ТОГДА ВЫРАЗИТЬ(ФайлыВРабочемКаталоге.Файл КАК Справочник.ВерсииФайлов).НомерВерсии
| ИНАЧЕ 0
| КОНЕЦ КАК НомерВерсии,
| ВЫБОР
| КОГДА ТИПЗНАЧЕНИЯ(ФайлыВРабочемКаталоге.Файл) = ТИП(Справочник.ВерсииФайлов)
| ТОГДА ФайлыВРабочемКаталоге.Файл.Владелец.ВладелецФайла
| ИНАЧЕ ФайлыВРабочемКаталоге.Файл.ВладелецФайла
| КОНЕЦ КАК ВРегистреПапка
| КОНЕЦ КАК НомерВерсии
|ИЗ
| РегистрСведений.ФайлыВРабочемКаталоге КАК ФайлыВРабочемКаталоге
|ГДЕ
@@ -1813,16 +1808,17 @@
| И ФайлыВРабочемКаталоге.Пользователь = &Пользователь";
РезультатЗапроса = ЗапросВРегистр.Выполнить();
Если НЕ РезультатЗапроса.Пустой() Тогда
НайденныеСвойства.ФайлЕстьВРегистре = Истина;
Выборка = РезультатЗапроса.Выбрать();
Выборка.Следующий();
ЗаполнитьЗначенияСвойств(НайденныеСвойства, Выборка);
НайденныеСвойства.ФайлЕстьВРегистре = Истина;
НайденныеСвойства.ВРегистреПапка = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(
Выборка.Владелец, "ВладелецФайла");
КонецЕсли;
ЗафиксироватьТранзакцию();
SSL/src/CommonModules/РаботаСФайламиСлужебныйКлиент/Module.bsl
+44 -13
View File
@@ -1764,6 +1764,8 @@
Процедура ОсвободитьФайлБезВопроса(ДанныеФайла, УникальныйИдентификатор = Неопределено)
РаботаСФайламиСлужебныйВызовСервера.ОсвободитьФайл(ДанныеФайла, УникальныйИдентификатор);
ИзменитьКоличествоЗанятыхФайлов();
РасширениеПодключено = РасширениеРаботыСФайламиПодключено();
Если РасширениеПодключено Тогда
ПеререгистрироватьФайлВРабочемКаталоге(ДанныеФайла, Истина, ДанныеФайла.РабочийКаталогВладельца <> "");
@@ -2195,6 +2197,8 @@
Возврат;
КонецПопытки;
ИзменитьКоличествоЗанятыхФайлов();
ПараметрыВыполнения.Вставить("ВерсияОбновлена", ВерсияОбновлена);
НоваяВерсия = ПараметрыВыполнения.ДанныеФайла.ТекущаяВерсия;
@@ -2279,7 +2283,6 @@
// Продолжение процедуры (см. выше).
Процедура ЗакончитьРедактированиеСРасширениемПослеПоказаОповещения(Результат, ПараметрыВыполнения) Экспорт
Если ТипЗнч(Результат) = Тип("Структура") И Результат.БольшеНеЗадаватьЭтотВопрос Тогда
ОбщегоНазначенияВызовСервера.ХранилищеОбщихНастроекСохранить(
"НастройкиПрограммы", "ПоказыватьИнформациюЧтоФайлНеБылИзменен", Ложь,,, Истина);
@@ -2539,6 +2542,8 @@
Возврат;
КонецПопытки;
ИзменитьКоличествоЗанятыхФайлов();
Если ПараметрыВыполнения.ПоказыватьОповещение Тогда
Если Результат.Успешно Тогда
ШаблонПояснения = НСтр("ru = 'Файл ""%1""
@@ -3079,6 +3084,8 @@
|занят для редактирования.'"), Строка(ДанныеФайла.Ссылка)),
БиблиотекаКартинок.Информация32);
ИзменитьКоличествоЗанятыхФайлов(1);
ВернутьРезультат(ПараметрыВыполнения.ОбработчикРезультата, Истина);
КонецПроцедуры
@@ -3150,6 +3157,8 @@
ПараметрыВыполнения.МассивФайлов.Количество()),
БиблиотекаКартинок.Информация32);
ИзменитьКоличествоЗанятыхФайлов(ДанныеФайлов.Количество());
ВернутьРезультат(ПараметрыВыполнения.ОбработчикРезультата, Истина);
КонецПроцедуры
@@ -3196,6 +3205,9 @@
ПараметрыВыполнения.ДанныеФайла, ТекстОшибки, ПараметрыВыполнения.УникальныйИдентификатор, ПараметрыВыполнения.РабочийКаталогВладельца);
ПараметрыВыполнения.Вставить("ФайлУжеРедактируетТекущийПользователь", РезультатПолучения.ФайлУжеРедактируетТекущийПользователь);
Если Не ПараметрыВыполнения.ФайлУжеРедактируетТекущийПользователь Тогда
ИзменитьКоличествоЗанятыхФайлов(1);
КонецЕсли;
Если Не РезультатПолучения.ДанныеПолучены Тогда
СтандартнаяОбработка = Истина;
@@ -3218,6 +3230,7 @@
КонецЕсли;
ДанныеФайла = ПараметрыВыполнения.ДанныеФайла; // см. РаботаСФайламиСлужебныйВызовСервера.ДанныеФайла
ПоказатьОповещениеПользователя(
НСтр("ru = 'Редактирование файла'"),
ПараметрыВыполнения.ДанныеФайла.НавигационнаяСсылка,
@@ -3660,8 +3673,7 @@
БиблиотекаКартинок.Информация32);
КонецЕсли;
КоличествоЗанятыхФайлов = СтандартныеПодсистемыКлиент.ПараметрКлиента("КоличествоЗанятыхФайлов");
СтандартныеПодсистемыКлиент.УстановитьПараметрКлиента("КоличествоЗанятыхФайлов", КоличествоЗанятыхФайлов - 1);
ИзменитьКоличествоЗанятыхФайлов();
КонецЕсли;
@@ -4299,6 +4311,8 @@
Строка(ПараметрыВыполнения.ДанныеФайла.Ссылка)),
БиблиотекаКартинок.Информация32);
ИзменитьКоличествоЗанятыхФайлов(1);
ВернутьРезультат(ПараметрыВыполнения.ОбработчикРезультата, ПараметрыВыполнения.ДанныеФайла);
КонецПроцедуры
@@ -7206,12 +7220,12 @@
Процедура ЗакончитьРедактированиеСОповещениемЗавершение(Результат, ПараметрыВыполнения) Экспорт
Если Результат = Истина Тогда
Оповестить("Запись_Файл", Новый Структура("Событие", "ЗаконченоРедактирование"), ПараметрыВыполнения.ПараметрКоманды);
ОповеститьОбИзменении(ПараметрыВыполнения.ПараметрКоманды);
Оповестить("Запись_Файл", Новый Структура("Событие", "ДанныеФайлаИзменены"), ПараметрыВыполнения.ПараметрКоманды);
Оповестить("Запись_Файл", Новый Структура("Событие", "ВерсияСохранена"), ПараметрыВыполнения.ПараметрКоманды);
КоличествоЗанятыхФайлов = СтандартныеПодсистемыКлиент.ПараметрКлиента("КоличествоЗанятыхФайлов");
СтандартныеПодсистемыКлиент.УстановитьПараметрКлиента("КоличествоЗанятыхФайлов", КоличествоЗанятыхФайлов - 1);
КонецЕсли;
ВернутьРезультат(ПараметрыВыполнения.ОбработчикРезультата, Результат);
@@ -7287,14 +7301,16 @@
Процедура ЗакончитьРедактированиеМассиваФайловСОповещениемЗавершение(Результат, ПараметрыВыполнения) Экспорт
Если Результат = Истина Тогда
Для Каждого ФайлСсылка Из ПараметрыВыполнения.МассивФайлов Цикл
Оповестить("Запись_Файл", Новый Структура("Событие", "ЗаконченоРедактирование"), ФайлСсылка);
ОповеститьОбИзменении(ФайлСсылка);
Оповестить("Запись_Файл", Новый Структура("Событие", "ДанныеФайлаИзменены"), ФайлСсылка);
Оповестить("Запись_Файл", Новый Структура("Событие", "ВерсияСохранена"), ФайлСсылка);
КоличествоЗанятыхФайлов = СтандартныеПодсистемыКлиент.ПараметрКлиента("КоличествоЗанятыхФайлов");
СтандартныеПодсистемыКлиент.УстановитьПараметрКлиента("КоличествоЗанятыхФайлов", КоличествоЗанятыхФайлов - 1);
КонецЦикла;
КонецЕсли;
КонецПроцедуры
@@ -7367,8 +7383,6 @@
ОповеститьОбИзменении(ПараметрыВыполнения.ОбъектСсылка);
Оповестить("Запись_Файл", Новый Структура("Событие", "ДанныеФайлаИзменены"), ПараметрыВыполнения.ОбъектСсылка);
Оповестить("Запись_Файл", Новый Структура("Событие", "ФайлРедактировался"), ПараметрыВыполнения.ОбъектСсылка);
КоличествоЗанятыхФайлов = СтандартныеПодсистемыКлиент.ПараметрКлиента("КоличествоЗанятыхФайлов");
СтандартныеПодсистемыКлиент.УстановитьПараметрКлиента("КоличествоЗанятыхФайлов", КоличествоЗанятыхФайлов + 1);
КонецЕсли;
ВернутьРезультат(ПараметрыВыполнения.ОбработчикРезультата, Неопределено);
@@ -7477,10 +7491,10 @@
Процедура ОсвободитьФайлСОповещениемОдинФайлЗавершение(Результат, ПараметрыВыполнения) Экспорт
Если Результат = Истина Тогда
ОповеститьОбИзменении(ПараметрыВыполнения.ПараметрКоманды);
Оповестить("Запись_Файл", Новый Структура("Событие", "ДанныеФайлаИзменены"), ПараметрыВыполнения.ПараметрКоманды);
КоличествоЗанятыхФайлов = СтандартныеПодсистемыКлиент.ПараметрКлиента("КоличествоЗанятыхФайлов");
СтандартныеПодсистемыКлиент.УстановитьПараметрКлиента("КоличествоЗанятыхФайлов", КоличествоЗанятыхФайлов - 1);
КонецЕсли;
ВернутьРезультат(ПараметрыВыполнения.ОбработчикРезультата, Неопределено);
@@ -9088,7 +9102,7 @@
Возврат Неопределено;
КонецЕсли;
КоличествоЗанятыхФайлов = СтандартныеПодсистемыКлиент.ПараметрКлиента("КоличествоЗанятыхФайлов");
КоличествоЗанятыхФайлов = КоличествоЗанятыхФайлов();
Если Не КоличествоЗанятыхФайлов > 0 Тогда
Возврат Неопределено;
КонецЕсли;
@@ -9115,6 +9129,23 @@
КонецФункции
// Возвращает значение параметра клиента КоличествоЗанятыхФайлов.
//
Функция КоличествоЗанятыхФайлов()
Возврат СтандартныеПодсистемыКлиент.ПараметрКлиента("КоличествоЗанятыхФайлов");
КонецФункции
// Изменяет значение параметр клиента КоличествоЗанятыхФайлов.
//
Процедура ИзменитьКоличествоЗанятыхФайлов(ЗначениеИзменения = -1) Экспорт
СтандартныеПодсистемыКлиент.УстановитьПараметрКлиента(
"КоличествоЗанятыхФайлов", КоличествоЗанятыхФайлов() + ЗначениеИзменения);
КонецПроцедуры
// Возвращаемое значение:
// Структура - со свойствами:
// * Путь - Строка - .
@@ -10084,7 +10115,7 @@
Контекст.Вставить("Файл", ?(ТипЗнч(Файл) = Тип("Файл"), Файл, Новый Файл(Файл)));
Контекст.Результат.Вставить("Файл", Контекст.Файл);
ЗаполнитьЗначенияСвойств(Контекст.СвойстваДляПолучения, Файл);
ЗаполнитьЗначенияСвойств(Контекст.СвойстваДляПолучения, Контекст.Файл);
Контекст.Файл.НачатьПроверкуСуществования(Новый ОписаниеОповещения(
"ОбработатьФайлПослеПроверкиСуществования", ЭтотОбъект, Контекст,
"ОбработатьФайлПослеОшибки", ЭтотОбъект));
SSL/src/CommonModules/СклонениеПредставленийОбъектов/Module.bsl
+1 -1
View File
@@ -473,7 +473,7 @@
Функция HTTPЗапросКСервисуСклонения(СклоняемыйТекст)
ТекстЗапроса = "/russian/declension?s=" + СклоняемыйТекст;
ТекстЗапроса = "/russian/declension?s=" + КодироватьСтроку(СклоняемыйТекст, СпособКодированияСтроки.КодировкаURL);
УстановитьПривилегированныйРежим(Истина);
ВладелецТокена = ОбщегоНазначения.ИдентификаторОбъектаМетаданных("РегистрСведений.СклоненияПредставленийОбъектов");
SSL/src/CommonModules/УправлениеДоступомСлужебный/Module.bsl
+417 -222
View File
File diff suppressed because it is too large. Load diff
SSL/src/CommonModules/УправлениеКонтактнойИнформацией/Module.bsl
+3
View File
@@ -3421,6 +3421,9 @@
Иначе
Элемент.Вид = ВидПоляФормы.ПолеВвода;
Если ИнформацияОВидеКИ.ВидРедактирования = "Диалог" Тогда
Элемент.РедактированиеТекста = Ложь;
КонецЕсли;
Элемент.УстановитьДействие("Очистка", "Подключаемый_КонтактнаяИнформацияОчистка");
Если ИнформацияОВидеКИ.Тип = Перечисления.ТипыКонтактнойИнформации.Адрес Тогда
SSL/src/CommonModules/ФайловаяСистемаКлиент/Module.bsl
+1 -1
View File
@@ -679,7 +679,7 @@
ОписаниеОповещения = Новый ОписаниеОповещения(
"ПоказатьДиалогВыбораПриПодключенииРасширенияРаботыСФайлами", ФайловаяСистемаСлужебныйКлиент, Контекст);
ПодключитьРасширениеДляРаботыСФайлами(ОписаниеОповещения);
ПодключитьРасширениеДляРаботыСФайлами(ОписаниеОповещения, , Ложь);
КонецПроцедуры
SSL/src/CommonModules/ЦентрМониторинга/Module.bsl
+10
View File
@@ -10,6 +10,16 @@
#Область ПрограммныйИнтерфейсОбщий
// Проверяет состояние подсистемы.
// Возвращаемое значение:
// Булево - Истина включен, Ложь выключен.
//
Функция ЦентрМониторингаВключен() Экспорт
ПараметрыЦентраМониторинга = Новый Структура("ВключитьЦентрМониторинга, ЦентрОбработкиИнформацииОПрограмме");
ПараметрыЦентраМониторинга = ЦентрМониторингаСлужебный.ПолучитьПараметрыЦентраМониторингаВнешнийВызов(ПараметрыЦентраМониторинга);
Возврат ПараметрыЦентраМониторинга.ВключитьЦентрМониторинга ИЛИ ПараметрыЦентраМониторинга.ЦентрОбработкиИнформацииОПрограмме;
КонецФункции
// Включает подсистему ЦентрМониторинга.
//
Процедура ВключитьПодсистему() Экспорт
SSL/src/CommonModules/ШаблоныСообщенийСлужебный/Module.bsl
+1 -1
View File
@@ -1412,7 +1412,7 @@
Если ПараметрыТекстаСообщения[ИмяУзлаОбщихРеквизитов()] <> Неопределено Тогда
ЗаполнитьОбщиеРеквизиты(ПараметрыТекстаСообщения[ИмяУзлаОбщихРеквизитов()]);
Сообщение.ЗначенияОбщихРеквизитов = ПараметрыТекстаСообщения[ШаблоныСообщенийСлужебный.ИмяУзлаОбщихРеквизитов()];
Сообщение.ЗначенияОбщихРеквизитов = ПараметрыТекстаСообщения[ИмяУзлаОбщихРеквизитов()];
КонецЕсли;
Возврат Сообщение;
SSL/src/CommonModules/ЭлектроннаяПодписьСлужебный/Module.bsl
+2 -3
View File
@@ -1650,8 +1650,7 @@
ПарольДоступаКЗакрытомуКлючу,
ПараметрыКомпоненты.ТипПодписи,
ПараметрыКомпоненты.Открепленная,
ПараметрыКомпоненты.ВключениеСертификатовВПодпись,
ПараметрыКомпоненты.ТипВходныхДанных);
ПараметрыКомпоненты.ВключениеСертификатовВПодпись);
Исключение
ВызватьИсключение НСтр("ru = 'Ошибка вызова метода CMSSign компоненты XMLDSig.'") + Символы.ПС + ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
КонецПопытки;
@@ -1660,7 +1659,7 @@
ВызватьИсключение НСтр("ru = 'Ошибка вызова метода CMSSign компоненты XMLDSig.'") + Символы.ПС + ОбъектКомпоненты.GetLastError();
КонецЕсли;
Возврат Base64Значение(SignatureValue);
Возврат SignatureValue;
КонецФункции
SSL/src/CommonModules/ЭлектроннаяПодписьСлужебныйКлиент/Module.bsl
+2 -3
View File
@@ -4094,8 +4094,7 @@
Контекст.МенеджерКриптографии.ПарольДоступаКЗакрытомуКлючу,
ПараметрыCMSSign.ТипПодписи,
ПараметрыCMSSign.Открепленная,
ПараметрыCMSSign.ВключениеСертификатовВПодпись,
ПараметрыCMSSign.ТипВходныхДанных);
ПараметрыCMSSign.ВключениеСертификатовВПодпись);
Исключение
ЗавершитьОперациюСОшибкой(
Контекст,
@@ -4121,7 +4120,7 @@
Возврат;
КонецЕсли;
ВыполнитьОбработкуОповещения(Контекст.ОповещенияПриЗавершении.Успех, Base64Значение(SignatureValue));
ВыполнитьОбработкуОповещения(Контекст.ОповещенияПриЗавершении.Успех, SignatureValue);
КонецПроцедуры
SSL/src/CommonTemplates/КомпонентаПоискаСтрок/Template.addin
BIN
View File
Binary file not shown.
SSL/src/Configuration/Configuration.mdo
+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="ce1f7408-9fbf-44e6-9595-af80aacd29a1">
<mdclass:Configuration xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="a5d160c8-3ea8-45fe-a4c3-44b882fe0b7d">
<name>БиблиотекаСтандартныхПодсистем</name>
<synonym>
<key>ru</key>
<value>Библиотека стандартных подсистем, редакция 3.1</value>
</synonym>
<containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="1c066d4b-c5c5-402f-a851-2c93e0436757"/>
<containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="13b39546-3382-4dd8-863a-294124694f02"/>
<containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="2cd16646-3f6c-4bf0-9037-6ed0d91058b0"/>
<containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="9389be0f-2886-40f2-bac6-91dc2d1a9f3f"/>
<containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="4ceb5233-4408-4f27-8e48-648719ad642c"/>
<containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="b52c5fb5-a272-4c02-9e15-55b491c7df49"/>
<containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="4b932d0f-2d32-4574-a8d5-43d9639968e7"/>
<containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="652cd616-4c7a-413a-ba16-45542810ca42"/>
<containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="c1671bff-3b22-4c2e-802d-963c9d75e2c7"/>
<containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="6bf44744-5a00-4f23-85bd-2edaa4551ae1"/>
<containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="c6b0f633-b898-4a0c-90d2-abe086ad665e"/>
<containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="41a7441f-2cc6-490b-904c-18014f3c6837"/>
<containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="c486ab09-1f34-4277-961d-3344c3acca67"/>
<containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="45d66710-9ace-41b1-ba6c-3c90b8706c54"/>
<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.1.2.264</version>
<version>3.1.2.281</version>
<updateCatalogAddress>http://downloads.v8.1c.ru/tmplts/</updateCatalogAddress>
<includeHelpInContents>true</includeHelpInContents>
<usedMobileApplicationFunctionalities>
SSL/src/Configuration/ParentConfigurations.bin
+1 -1
View File
@@ -1 +1 @@
{6,1,1,043d3e7b-0f53-4902-89ab-faafee832418,1,9e592f47-5b1d-4a89-94b3-86f46884656f,"3.1.2.264","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",5912,1,0,ce1f7408-9fbf-44e6-9595-af80aacd29a1,ce1f7408-9fbf-44e6-9595-af80aacd29a1,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,e8b248d9-9049-456a-9c7d-7a0462cc67ab,e8b248d9-9049-456a-9c7d-7a0462cc67ab,1,0,d4562287-440d-4462-9de2-7097ccbf3764,d4562287-440d-4462-9de2-7097ccbf3764,1,0,1983fe34-c984-4659-ba41-0e94504f8989,1983fe34-c984-4659-ba41-0e94504f8989,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,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,1,0,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,1,0,4009cb3a-6754-481f-911b-907558cea38a,4009cb3a-6754-481f-911b-907558cea38a,1,0,653a7fd8-91c7-49aa-aa63-45da087e0d0a,653a7fd8-91c7-49aa-aa63-45da087e0d0a,1,0,d7cf3981-cf63-4a21-868b-8175a7704a8f,d7cf3981-cf63-4a21-868b-8175a7704a8f,1,0,0ae93712-74e8-41c7-8f2d-4dfc8983697d,0ae93712-74e8-41c7-8f2d-4dfc8983697d,1,0,9e4dfdfa-ec05-4c9e-89bd-fc24f60f2678,9e4dfdfa-ec05-4c9e-89bd-fc24f60f2678,1,0,64f548c8-c1fc-434e-b3ee-5be367ead1db,64f548c8-c1fc-434e-b3ee-5be367ead1db,1,0,cd592a5d-b184-4558-8a28-7079ccf28b89,cd592a5d-b184-4558-8a28-7079ccf28b89,1,0,2009c673-c1a5-45fc-8da2-a36c435085a6,2009c673-c1a5Line truncated
{6,1,1,dc54fc03-58ea-45c4-abde-905b99fccc30,1,02413631-2e44-4156-98e7-f6fb9f956a99,"3.1.2.281","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",5912,1,0,a5d160c8-3ea8-45fe-a4c3-44b882fe0b7d,a5d160c8-3ea8-45fe-a4c3-44b882fe0b7d,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,e8b248d9-9049-456a-9c7d-7a0462cc67ab,e8b248d9-9049-456a-9c7d-7a0462cc67ab,1,0,d4562287-440d-4462-9de2-7097ccbf3764,d4562287-440d-4462-9de2-7097ccbf3764,1,0,1983fe34-c984-4659-ba41-0e94504f8989,1983fe34-c984-4659-ba41-0e94504f8989,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,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,1,0,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,1,0,4009cb3a-6754-481f-911b-907558cea38a,4009cb3a-6754-481f-911b-907558cea38a,1,0,653a7fd8-91c7-49aa-aa63-45da087e0d0a,653a7fd8-91c7-49aa-aa63-45da087e0d0a,1,0,d7cf3981-cf63-4a21-868b-8175a7704a8f,d7cf3981-cf63-4a21-868b-8175a7704a8f,1,0,0ae93712-74e8-41c7-8f2d-4dfc8983697d,0ae93712-74e8-41c7-8f2d-4dfc8983697d,1,0,9e4dfdfa-ec05-4c9e-89bd-fc24f60f2678,9e4dfdfa-ec05-4c9e-89bd-fc24f60f2678,1,0,64f548c8-c1fc-434e-b3ee-5be367ead1db,64f548c8-c1fc-434e-b3ee-5be367ead1db,1,0,cd592a5d-b184-4558-8a28-7079ccf28b89,cd592a5d-b184-4558-8a28-7079ccf28b89,1,0,2009c673-c1a5-45fc-8da2-a36c435085a6,2009c673-c1a5Line truncated
SSL/src/Constants/КоличествоПотоковОбновленияДоступа/КоличествоПотоковОбновленияДоступа.mdo
+2 -2
View File
@@ -19,8 +19,8 @@
</type>
<toolTip>
<key>ru</key>
<value>Максимальное количество фоновых заданий, которые можно запустить параллельно при обновлении доступа.
Рекомендуется делать их не более чем Количество логических процессоров.
<value>Максимальное количество фоновых заданий при обновлении.
Рекомендуется до 50-75% от количества ядер, доступных кластеру серверов (подробнее см. в справке).
Если указано более одного потока, то запускается еще один управляющий поток.</value>
</toolTip>
<minValue xsi:type="core:StringValue">
SSL/src/DataProcessors/ЗаявлениеНаВыпускНовогоКвалифицированногоСертификата/Forms/Форма/Module.bsl
+7 -2
View File
@@ -3430,11 +3430,16 @@
Возврат;
КонецЕсли;
ШаблонОшибки = НСтр("ru = 'Не удалось выполнить операцию по причине:
|%1
|
|Возможно, операция отменена или завершилась неудачей в программе электронной подписи.
|Повторите попытку.'");
Ошибка = Новый Структура;
Ошибка.Вставить("ПоказатьИнструкцию", Истина);
Ошибка.Вставить("ОписаниеОшибки", СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Не удалось выполнить операцию по причине:
|%1'"), ПредставлениеОшибкиДляПользователя(ИнформацияОбОшибке)));
ШаблонОшибки, ПредставлениеОшибкиДляПользователя(ИнформацияОбОшибке)));
ЭлектроннаяПодписьСлужебныйКлиент.ПоказатьОшибкуОбращенияКПрограмме(
НСтр("ru = 'Создание ключа электронной подписи'"), "", Ошибка,
SSL/src/DataProcessors/РаботаСФайлами/Forms/ПрисоединенныеФайлы/Module.bsl
+8 -6
View File
@@ -364,8 +364,9 @@
И ПараметрыПеретаскивания.Значение.Количество() > 0 Тогда
ПеретаскиваемыйФайл = ПараметрыПеретаскивания.Значение[0];
ВладелецФайловСовпадает = ВладелецФайловСовпадает(Параметры.ВладелецФайла, ПеретаскиваемыйФайл);
Если ТипЗнч(ПеретаскиваемыйФайл) <> Тип("Файл") Тогда
ВладелецФайловСовпадает = ВладелецФайловСовпадает(Параметры.ВладелецФайла, ПеретаскиваемыйФайл);
Если ВозможностьСоздаватьГруппыФайлов
И ТипЗнч(ПеретаскиваемыйФайл) = ТипСправочникаСФайлами
И ВладелецФайловСовпадает(Параметры.ВладелецФайла, ПеретаскиваемыйФайл) Тогда
@@ -373,6 +374,8 @@
Возврат;
КонецЕсли;
КонецЕсли;
СтандартнаяОбработка = Ложь;
Для Каждого ПеретаскиваемыйФайл Из ПараметрыПеретаскивания.Значение Цикл
@@ -381,11 +384,8 @@
МассивИменФайлов.Добавить(ПеретаскиваемыйФайл.ПолноеИмя);
ВладелецСправочникФайлы = Истина;
Иначе
МассивИменФайлов.Добавить(ПеретаскиваемыйФайл);
КонецЕсли;
КонецЦикла;
@@ -401,10 +401,8 @@
Если МассивИменФайлов.Количество() > 0 Тогда
Если ВладелецСправочникФайлы = Истина Тогда
РаботаСФайламиСлужебныйКлиент.ДобавитьФайлыПеретаскиванием(
Параметры.ВладелецФайла, УникальныйИдентификатор, МассивИменФайлов);
Иначе
Действие = ?(ПараметрыПеретаскивания.Действие = ДействиеПеретаскивания.Копирование,
@@ -1635,6 +1633,8 @@
КонецЕсли;
УдалитьКомандуИзМассива(ИменаКоманд, "Редактировать");
КонецЕсли;
УдалитьКомандуИзМассива(ИменаКоманд, "Занять");
УдалитьКомандуИзМассива(ИменаКоманд, "УстановитьПометкуУдаления");
УдалитьКомандуИзМассива(ИменаКоманд, "КонтекстноеМенюУстановитьПометкуУдаления");
УдалитьКомандыЭП(ИменаКоманд);
@@ -1676,6 +1676,7 @@
УдалитьКомандуИзМассива(ИменаКоманд, "Освободить");
УдалитьКомандуИзМассива(ИменаКоманд, "Редактировать");
УдалитьКомандуИзМассива(ИменаКоманд, "ОбновитьИзФайлаНаДиске");
УдалитьКомандуИзМассива(ИменаКоманд, "Занять");
КонецЕсли;
Если ФайлЗашифрован Тогда
@@ -1683,6 +1684,7 @@
УдалитьКомандуИзМассива(ИменаКоманд, "ЗакончитьРедактирование");
УдалитьКомандуИзМассива(ИменаКоманд, "Освободить");
УдалитьКомандуИзМассива(ИменаКоманд, "Редактировать");
УдалитьКомандуИзМассива(ИменаКоманд, "Занять");
УдалитьКомандуИзМассива(ИменаКоманд, "ОбновитьИзФайлаНаДиске");
SSL/src/DataProcessors/РаботаСФайлами/Forms/ПрисоединенныйФайл/Module.bsl
+1
View File
@@ -729,6 +729,7 @@
ОсвободитьФайл();
ОповеститьОбИзменении(СсылкаНаТекущийОбъект);
Оповестить("Запись_Файл", Новый Структура("Событие", "РедактированиеОтменено"), СсылкаНаТекущийОбъект);
РаботаСФайламиСлужебныйКлиент.ИзменитьКоличествоЗанятыхФайлов();
КонецПроцедуры
SSL/src/DataProcessors/РезультатыОбновленияПрограммы/Forms/ИндикацияХодаОтложенногоОбновленияИБ/Form.form
+7 -3
View File
@@ -1333,9 +1333,13 @@
<id>246</id>
<title>
<key>ru</key>
<value>&lt;b>• &lt;/>&lt;b>Работа пользователей&lt;/> - данные обрабатываются медленнее, но меньше нагрузка на сервер и влияние на работу пользователей в программе.
&lt;b>• &lt;/>&lt;b>Обработка данных&lt;/> - выше скорость обработки данных, но выше нагрузка на сервер, а так же существенное замедление работы пользователей в программе. Рекомендуется использовать в тех случаях, когда необходимо быстрее получить доступ к обрабатываемым данным.
&lt;b>• Количество потоков&lt;/> - это количество одновременно выполняющихся обработчиков обновления. Рекомендуемое значение равно количеству ядер процессора сервера (следует учитывать требования назначения функциональности для сервиса заданий). Значение по умолчанию равно 8.</value>
<value>&lt;b>● &lt;/>&lt;b>Работа пользователей&lt;/> - данные обрабатываются медленнее, но меньше нагрузка на сервер и влияние на работу пользователей в программе.
&lt;b>● &lt;/>&lt;b>Обработка данных&lt;/> - выше скорость обработки данных, но выше нагрузка на сервер, а так же существенное замедление работы пользователей в программе. Рекомендуется использовать в тех случаях, когда необходимо быстрее получить доступ к обрабатываемым данным.
&lt;b>● &lt;/>&lt;fontsize 8>&lt;b>Количество&lt;/>&lt;/>&lt;b> потоков&lt;/> - это количество одновременно выполняющихся обработчиков обновления. Значение по умолчанию равно 8. Рекомендуемое значение:
&lt;b> •&lt;/> для штатного обновления до 50-75% от количества ядер, доступных кластеру серверов;
&lt;b> •&lt;/> для форсированного обновления в период минимальной активности пользователей - столько ядер, сколько доступно кластеру серверов.
См. также &lt;link http://1c.ru/news/info.jsp?id=25491>ограничение 12 ядер на сервер для версии ПРОФ платформы 1С:Предприятие&lt;/> и &quot;&lt;link https://v8.1c.ru/priobretenie-i-vnedrenie/otvety-na-tipovye-voprosy-po-litsenzirovaniyu-1s-predpriyatiya-8/>Какие ядра процессора следует считать — реальные или виртуальные?&lt;/>&quot;.
</value>
</title>
<formatted>true</formatted>
<type>Label</type>
SSL/src/DocumentJournals/Взаимодействия/Forms/ФормаСписка/Module.bsl
+20 -1
View File
@@ -3600,7 +3600,26 @@
&НаКлиенте
Процедура СоздатьНовоеВзаимодействие(ТипОбъекта)
ВзаимодействияКлиент.СоздатьНовоеВзаимодействие(ТипОбъекта,, ЭтотОбъект);
ПараметрыСоздания = Новый Структура;
Если ИмяТекущейПанелиНавигации = "СтраницаКонтакт" Тогда
ТекущиеДанные = Элементы.КонтактыПанелиНавигации.ТекущиеДанные;
Если ТекущиеДанные <> Неопределено Тогда
ПараметрыСоздания.Вставить("ЗначенияЗаполнения", Новый Структура("Контакт", ТекущиеДанные.Контакт));
КонецЕсли;
ИначеЕсли ИмяТекущейПанелиНавигации = "СтраницаПредмет" Тогда
ТекущиеДанные = Элементы.ПредметыПанельНавигации.ТекущиеДанные;
Если ТекущиеДанные <> Неопределено Тогда
ПараметрыСоздания.Вставить("ЗначенияЗаполнения", Новый Структура("Предмет", ТекущиеДанные.Предмет));
КонецЕсли;
ИначеЕсли ИмяТекущейПанелиНавигации = "СтраницаПапки" Тогда
ТекущиеДанные = Элементы.Папки.ТекущиеДанные;
Если ТекущиеДанные <> Неопределено Тогда
ПараметрыСоздания.Вставить("ЗначенияЗаполнения", Новый Структура("УчетнаяЗапись", ТекущиеДанные.УчетнаяЗапись));
КонецЕсли;
КонецЕсли;
ВзаимодействияКлиент.СоздатьНовоеВзаимодействие(ТипОбъекта, ПараметрыСоздания, ЭтотОбъект);
КонецПроцедуры
SSL/src/InformationRegisters/ОбновлениеКлючейДоступаКДанным/Forms/ОбновлениеДоступаНаУровнеЗаписей/Help/ru.html
+25 -2
View File
@@ -2,8 +2,31 @@
<div>Наблюдение за ходом обновления выполняется по ссылке <b>Обновление доступа на уровне записей</b> в разделе <b>Администрирование - Настройки пользователей и прав - Группы доступа</b>. </div>
<div><br></div>
<div>Ссылка становится доступной, если включен вариант работы <b>Производительный</b> (в разделе <b>Администрирование - Настройки пользователей и прав - Группы доступа</b>). После включения производительного варианта работы продолжает работать стандартное ограничение доступа до тех пор, пока обновление доступа не завершится первый раз. После этого происходит автоматическое переключение в режим повышенной производительности (в качестве признака используется константа <b>Первое обновление доступа завершилось</b>).</div>
<h3 style="font-size: 13.4399995803833px;">Запуск обновления доступом на уровне записей</h3>
<div>Если регламентные задания заблокированы, тогда нужно нажать <b>Запустить сейчас</b> и дождаться завершения. Перед этим рекомендуется указать количество потоков обновление доступа, равное количеству ядер процессора, чтобы обновление прошло быстрее. После изменения количества потоков нужно остановить обновление (нажать <b>Отменить</b>) и продолжить (нажать <b>Запустить сейчас</b>).<br><div>Регламентное задание выполняется по две минуты с паузой 15 сек до завершения обновления. При нажатии <b>Запустить сейчас</b>, обновление выполняется непрерывно до конца. Когда обновление доступа завершено, регламентное задание автоматически выключается, а при планировании обновления автоматически включается.</div></div>
<h3 style="font-size: 13.4399995803833px;">Запуск обновления доступа на уровне записей</h3>
<div>
<div>Если регламентные задания заблокированы, тогда нужно нажать <b>Запустить
сейчас</b> и дождаться завершения. Перед этим рекомендуется указать количество
потоков обновления доступа:</div>
<ul><li>для штатного обновления до 50-75% от количества ядер, доступных кластеру
серверов;
</li>
<li>для форсированного обновления в период минимальной активности пользователей
- столько ядер, сколько доступно кластеру серверов.</li></ul><p>См. также <a href="http://1c.ru/news/info.jsp?id=25491">ограничение 12 ядер
на сервер для версии ПРОФ платформы 1С:Предприятие</a> и "<a href="https://v8.1c.ru/priobretenie-i-vnedrenie/otvety-na-tipovye-voprosy-po-litsenzirovaniyu-1s-predpriyatiya-8/">Какие
ядра процессора следует считать — реальные или виртуальные?</a>".</p>
<p>После изменения количества потоков с 1 на 2 или более или обратно на 1 поток
нужно остановить обновление (нажать <b>Отменить</b>) и продолжить
(нажать <b>Запустить сейчас</b>). В остальных случаях текущее количество фоновых
заданий изменится без перезапуска.</p>
<p>Регламентное задание выполняется по две минуты с паузой 15 сек до завершения
обновления. При нажатии <b>Запустить сейчас</b>, обновление выполняется
непрерывно до конца. Когда обновление завершено, регламентное задание
автоматически выключается при очередном запуске (но не ранее 15 сек после
завершения), а при планировании обновления автоматически включается. <span style="font-size: 11px;">Сообщение,
например, "(завершено в <strong>09:05:03</strong> за
1 мин 5 сек)" означает момент завершения последнего запуска с выполнением
заданий. Запуск с пустым списком заданий не меняет это
сообщение.</span></p></div>
<h3 style="font-size: 13.4399995803833px;">Обновление прогресса</h3>
<div>Для обновления информации о прогрессе включен флажок <b>Автообновление</b> с периодом 3 сек. Если фактическое время обновления превысит указанный период, что обычно происходит на больших базах, тогда период будет автоматически увеличен до фактического времени обновления. При необходимости, период можно уменьшить до требуемого значения. С помощью ссылки можно <b>Обновить прогресс</b> или <b>Отменить</b> обновление прогресса в текущий момент. </div>
<h3 style="font-size: 13.4399995803833px;">Прогресс обновления по отдельным спискам</h3>
SSL/src/InformationRegisters/ОбновлениеКлючейДоступаКДанным/Forms/ОбновлениеДоступаНаУровнеЗаписей/Module.bsl
+4 -2
View File
@@ -391,7 +391,7 @@
Элементы.ОбновлениеДоступаЗапрещено.Видимость = Состояние.ОбновлениеДоступаЗапрещено;
Элементы.РегламентноеЗаданиеОтключено.Видимость = Не Состояние.ОбновлениеДоступаЗапрещено
И Состояние.РегламентноеЗаданиеОтключено И Не Состояние.ОбновлениеДоступаВыполняется;
И Состояние.РегламентноеЗаданиеОтключено И Не Состояние.ОбновлениеДоступаВыполняется И ВсегоОбновлено <> 100;
ТекстОшибкиОбновленияДоступа = Состояние.ТекстОшибкиОбновленияДоступа;
@@ -530,7 +530,9 @@
УправлениеДоступомСлужебный.ОграничиватьДоступНаУровнеЗаписейУниверсально(Истина, Истина));
Состояние.Вставить("ПоследнееЗавершениеОбновленияДоступа",
ПоследнееОбновлениеДоступа.ДатаЗавершенияНаСервере);
?(ЗначениеЗаполнено(ПоследнееОбновлениеДоступа.ДатаПолногоЗавершения),
ПоследнееОбновлениеДоступа.ДатаПолногоЗавершения,
ПоследнееОбновлениеДоступа.ДатаЗавершенияНаСервере));
Состояние.Вставить("ПоследнееВыполнениеПродолжительность",
ВремяВыполненияСтрокой(ПоследнееОбновлениеДоступа.ПоследнееВыполнениеСекунд));
SSL/src/InformationRegisters/ПараметрыОграниченияДоступа/ManagerModule.bsl
+22 -4
View File
@@ -118,12 +118,10 @@
КонецЦикла;
КонецЕсли;
Если Не ТребуетсяОбновление Тогда
Возврат;
КонецЕсли;
Если ТребуетсяОбновление Тогда
УправлениеДоступомСлужебный.ЗапланироватьОбновлениеПараметровОграниченияДоступа(
"ЗапланироватьОбновлениеДоступаПоИзменениямКонфигурации");
КонецЕсли;
ВерсияИБ = ОбновлениеИнформационнойБазыСлужебный.ВерсияИБ("СтандартныеПодсистемы");
@@ -155,6 +153,13 @@
ЗапланироватьОбновление_00_00268406("ПереходНаВерсиюБСП_3.0.3.168");
КонецЕсли;
Если ОбщегоНазначенияКлиентСервер.СравнитьВерсии(ВерсияИБ, "3.0.3.190") < 0
Или ОбщегоНазначенияКлиентСервер.СравнитьВерсии(ВерсияИБ, "3.1.2.1") > 0
И ОбщегоНазначенияКлиентСервер.СравнитьВерсии(ВерсияИБ, "3.1.2.269") < 0 Тогда
ЗапланироватьОбновление_00_00263154("ПереходНаВерсиюБСП_3.0.3.190");
КонецЕсли;
КонецПроцедуры
// Для процедуры ОбновитьДанныеРегистраПоИзменениямКонфигурации.
@@ -243,6 +248,19 @@
КонецПроцедуры
// Для процедуры ОбновитьДанныеРегистраПоИзменениямКонфигурации.
Процедура ЗапланироватьОбновление_00_00263154(Описание)
ПараметрыПланирования = УправлениеДоступомСлужебный.ПараметрыПланированияОбновленияДоступа(Ложь);
ПараметрыПланирования.РазрешенныеКлючиДоступа = Ложь;
ПараметрыПланирования.ЭтоПродолжениеОбновления = Истина;
ПараметрыПланирования.Описание = Описание;
УправлениеДоступомСлужебный.ЗапланироватьОбновлениеДоступа("Справочник.НаборыГруппДоступа",
ПараметрыПланирования);
КонецПроцедуры
// Для процедуры ОбновитьВерсиюТекстовОграниченияДоступа.
Функция ВерсияТекстовОграниченияДоступа()
SSL/src/Roles/АдминистраторСистемы/Rights.rights
+87 -87
View File
@@ -3165,6 +3165,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>
@@ -3945,93 +4032,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>Constant.ИспользоватьСервисСклоненияMorpher</name>
<right>
SSL/src/Roles/БазовыеПраваВнешнихПользователейБСП/Rights.rights
+22
View File
@@ -1062,6 +1062,17 @@
<value>true</value>
</right>
</object>
<object>
<name>SessionParameter.ИнтерактивнаяПроверкаЗаполненияКонтактнойИнформации</name>
<right>
<name>Get</name>
<value>true</value>
</right>
<right>
<name>Set</name>
<value>true</value>
</right>
</object>
<object>
<name>InformationRegister.ПользовательскиеМакетыПечати</name>
<right>
@@ -1587,6 +1598,17 @@
<value>true</value>
</right>
</object>
<object>
<name>SessionParameter.ИнтерактивнаяПроверкаЗаполненияСвойств</name>
<right>
<name>Get</name>
<value>true</value>
</right>
<right>
<name>Set</name>
<value>true</value>
</right>
</object>
<object>
<name>Constant.ИспользоватьНапоминанияПользователя</name>
<right>
SSL/src/Roles/ПолныеПрава/Rights.rights
+39 -39
View File
@@ -4430,6 +4430,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>
@@ -5456,45 +5495,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>Constant.ИспользоватьСервисСклоненияMorpher</name>
<right>
SSL/src/Roles/ПросмотрЖурналаРегистрации/Rights.rights
+7 -7
View File
@@ -3,13 +3,6 @@
<setForNewObjects>false</setForNewObjects>
<setForAttributesByDefault>true</setForAttributesByDefault>
<independentRightsOfChildObjects>false</independentRightsOfChildObjects>
<object>
<name>DataProcessor.ЖурналРегистрации.Command.ЖурналРегистрации</name>
<right>
<name>View</name>
<value>true</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
@@ -41,6 +34,13 @@
<value>true</value>
</right>
</object>
<object>
<name>DataProcessor.ЖурналРегистрации.Command.ЖурналРегистрации</name>
<right>
<name>View</name>
<value>true</value>
</right>
</object>
<object>
<name>DataProcessor.ЖурналРегистрации</name>
<right>