3_0_1_298

This commit is contained in:
Компания 1С committed 2018-10-25 00:48:00 +03:00
1 parent f19aef9c3e
commit 9672edb6d0
25 files changed
+740 -336

No files matched your search

@@ -3,6 +3,10 @@
&НаКлиенте &НаКлиенте
Процедура ОбработкаКоманды(ПараметрКоманды, ПараметрыВыполненияКоманды) Процедура ОбработкаКоманды(ПараметрКоманды, ПараметрыВыполненияКоманды)
Если ТипЗнч(ПараметрыВыполненияКоманды.Источник) = Тип("УправляемаяФорма") Тогда
ПараметрыВыполненияКоманды.Источник.Закрыть();
КонецЕсли;
ОбменДаннымиКлиент.УдалитьНастройкуСинхронизации(ПараметрКоманды); ОбменДаннымиКлиент.УдалитьНастройкуСинхронизации(ПараметрКоманды);
КонецПроцедуры КонецПроцедуры
@@ -56,8 +56,7 @@
ОбновитьДанныеМонитораВФоне(); ОбновитьДанныеМонитораВФоне();
ИначеЕсли ИмяСобытия = "ЗакрытаФормаПомощникаСозданияОбменаДанными" ИначеЕсли ИмяСобытия = "ЗакрытаФормаПомощникаСозданияОбменаДанными" Тогда
Или ИмяСобытия = "ЗакрытаФормаУдаленияНастройкиСинхронизации" Тогда
ОбновитьДанныеМонитораИнтерактивно(); ОбновитьДанныеМонитораИнтерактивно();
@@ -606,7 +605,6 @@
Элементы.ПанельСписокПриложений.ТекущаяСтраница = Элементы.СтраницаОжидание; Элементы.ПанельСписокПриложений.ТекущаяСтраница = Элементы.СтраницаОжидание;
Элементы.КоманднаяПанель.Доступность = Ложь; Элементы.КоманднаяПанель.Доступность = Ложь;
ДлительныеОперацииКлиент.ИнициализироватьПараметрыОбработчикаОжидания( ДлительныеОперацииКлиент.ИнициализироватьПараметрыОбработчикаОжидания(
ПараметрыОбработчикаОжиданияПолученияСпискаПриложений); ПараметрыОбработчикаОжиданияПолученияСпискаПриложений);
@@ -10888,5 +10888,6 @@
<event>OnUpdateUserSettingSetAtServer</event> <event>OnUpdateUserSettingSetAtServer</event>
<name>ПриОбновленииСоставаПользовательскихНастроекНаСервере</name> <name>ПриОбновленииСоставаПользовательскихНастроекНаСервере</name>
</handlers> </handlers>
<settingsForm>Settings</settingsForm>
</extInfo> </extInfo>
</form:Form> </form:Form>
@@ -908,7 +908,10 @@
АдресСтруктура = СтрокаJSONВСтруктуру(Адрес); АдресСтруктура = СтрокаJSONВСтруктуру(Адрес);
КонецЕсли; КонецЕсли;
ИдентификаторАдресногоОбъекта = ?(ЗначениеЗаполнено(АдресСтруктура.ID), АдресСтруктура.ID, ""); ИдентификаторАдресногоОбъекта = "";
Если ТипЗнч(АдресСтруктура) = Тип("Структура") И АдресСтруктура.Свойство("ID") И ЗначениеЗаполнено(АдресСтруктура.ID) Тогда
ИдентификаторАдресногоОбъекта = АдресСтруктура.ID;
КонецЕсли;
Возврат КодыАдресаИКодыКЛАДР(АдресСтруктура, ИдентификаторАдресногоОбъекта, Источник) Возврат КодыАдресаИКодыКЛАДР(АдресСтруктура, ИдентификаторАдресногоОбъекта, Источник)
@@ -5977,6 +5980,7 @@
Процедура ОбработатьОшибкуОбращенияКВебСервису(Результат, Знач Ответ, ИнформацияОбОшибке, ТекстURL) Процедура ОбработатьОшибкуОбращенияКВебСервису(Результат, Знач Ответ, ИнформацияОбОшибке, ТекстURL)
Если Ответ = Неопределено Тогда Если Ответ = Неопределено Тогда
Результат.Отказ = Истина;
Возврат; Возврат;
КонецЕсли; КонецЕсли;
@@ -2948,7 +2948,12 @@
ПоддерживаемыеВерсии = ВерсииФорматаОбмена(УзелИнформационнойБазы); ПоддерживаемыеВерсии = ВерсииФорматаОбмена(УзелИнформационнойБазы);
Результат = (ПоддерживаемыеВерсии[ПроверяемаяВерсия] <> Неопределено); Для Каждого ПоддерживаемаяВерсия Из ПоддерживаемыеВерсии Цикл
Если СравнитьВерсии(ПоддерживаемаяВерсия.Ключ, ПроверяемаяВерсия) >= 0 Тогда
Результат = Истина;
Прервать;
КонецЕсли;
КонецЦикла;
Иначе Иначе
ВерсияФорматаКорреспондента = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(УзелИнформационнойБазы, "ВерсияФорматаОбмена"); ВерсияФорматаКорреспондента = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(УзелИнформационнойБазы, "ВерсияФорматаОбмена");
@@ -32,7 +32,7 @@
Процедура ПриДобавленииПодсистемы(Описание) Экспорт Процедура ПриДобавленииПодсистемы(Описание) Экспорт
Описание.Имя = "СтандартныеПодсистемы"; Описание.Имя = "СтандартныеПодсистемы";
Описание.Версия = "3.0.1.293"; Описание.Версия = "3.0.1.298";
Описание.РежимВыполненияОтложенныхОбработчиков = "Параллельно"; Описание.РежимВыполненияОтложенныхОбработчиков = "Параллельно";
Описание.ПараллельноеОтложенноеОбновлениеСВерсии = "2.3.3.0"; Описание.ПараллельноеОтложенноеОбновлениеСВерсии = "2.3.3.0";
@@ -2227,7 +2227,7 @@
ОбщиеПараметры.Вставить("ЗапрашиватьПодтверждениеПриЗавершенииПрограммы", Истина); ОбщиеПараметры.Вставить("ЗапрашиватьПодтверждениеПриЗавершенииПрограммы", Истина);
ОбщиеПараметры.Вставить("ОтключитьИдентификаторыОбъектовМетаданных", Ложь); ОбщиеПараметры.Вставить("ОтключитьИдентификаторыОбъектовМетаданных", Ложь);
ОбщиеПараметры.Вставить("РекомендуемыйОбъемОперативнойПамяти", 2); ОбщиеПараметры.Вставить("РекомендуемыйОбъемОперативнойПамяти", 2);
ОбщиеПараметры.Вставить("МинимальнаяВерсияПлатформы", "8.3.12.1595"); ОбщиеПараметры.Вставить("МинимальнаяВерсияПлатформы", "8.3.12.1412");
ОбщиеПараметры.Вставить("РекомендуемаяВерсияПлатформы", "8.3.12.1595"); ОбщиеПараметры.Вставить("РекомендуемаяВерсияПлатформы", "8.3.12.1595");
// Устарело, следует использовать свойства МинимальнаяВерсияПлатформы и РекомендуемаяВерсияПлатформы: // Устарело, следует использовать свойства МинимальнаяВерсияПлатформы и РекомендуемаяВерсияПлатформы:
ОбщиеПараметры.Вставить("МинимальноНеобходимаяВерсияПлатформы", ""); ОбщиеПараметры.Вставить("МинимальноНеобходимаяВерсияПлатформы", "");
@@ -558,7 +558,8 @@
ПрисоединенныйФайл.Родитель = ГруппаФайлов; ПрисоединенныйФайл.Родитель = ГруппаФайлов;
КонецЕсли; КонецЕсли;
ИспользованиеПолнотекстовогоПоиска = Метаданные.СвойстваОбъектов.ИспользованиеПолнотекстовогоПоиска.Использовать;
ИзвлекатьТекст = Метаданные.Справочники[ИмяСправочника].ПолнотекстовыйПоиск = ИспользованиеПолнотекстовогоПоиска;
Если ПрисоединенныйФайл.ТипХраненияФайла = Перечисления.ТипыХраненияФайлов.ВИнформационнойБазе Тогда Если ПрисоединенныйФайл.ТипХраненияФайла = Перечисления.ТипыХраненияФайлов.ВИнформационнойБазе Тогда
НачатьТранзакцию(); НачатьТранзакцию();
Попытка Попытка
@@ -567,10 +568,15 @@
ПрисоединенныйФайл.Том = Справочники.ТомаХраненияФайлов.ПустаяСсылка(); ПрисоединенныйФайл.Том = Справочники.ТомаХраненияФайлов.ПустаяСсылка();
ПрисоединенныйФайл.ПутьКФайлу = ""; ПрисоединенныйФайл.ПутьКФайлу = "";
РезультатИзвлеченияТекста = РаботаСФайламиСлужебный.ИзвлечьТекст(АдресВременногоХранилищаТекста, Если ИзвлекатьТекст Тогда
ДвоичныеДанные, ПрисоединенныйФайл.Расширение); РезультатИзвлеченияТекста = РаботаСФайламиСлужебный.ИзвлечьТекст(АдресВременногоХранилищаТекста,
ПрисоединенныйФайл.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста; ДвоичныеДанные, ПрисоединенныйФайл.Расширение);
ПрисоединенныйФайл.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище; ПрисоединенныйФайл.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста;
ПрисоединенныйФайл.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище;
Иначе
ПрисоединенныйФайл.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен;
ПрисоединенныйФайл.ТекстХранилище = Новый ХранилищеЗначения("");
КонецЕсли;
ПрисоединенныйФайл.Автор = Автор; ПрисоединенныйФайл.Автор = Автор;
ПрисоединенныйФайл.Заполнить(Неопределено); ПрисоединенныйФайл.Заполнить(Неопределено);
@@ -610,10 +616,15 @@
ПрисоединенныйФайл.Том = СведенияОФайле.Том; ПрисоединенныйФайл.Том = СведенияОФайле.Том;
ПрисоединенныйФайл.ПутьКФайлу = СведенияОФайле.ПутьКФайлу; ПрисоединенныйФайл.ПутьКФайлу = СведенияОФайле.ПутьКФайлу;
РезультатИзвлеченияТекста = РаботаСФайламиСлужебный.ИзвлечьТекст(АдресВременногоХранилищаТекста, Если ИзвлекатьТекст Тогда
ДвоичныеДанные, ПрисоединенныйФайл.Расширение); РезультатИзвлеченияТекста = РаботаСФайламиСлужебный.ИзвлечьТекст(АдресВременногоХранилищаТекста,
ПрисоединенныйФайл.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста; ДвоичныеДанные, ПрисоединенныйФайл.Расширение);
ПрисоединенныйФайл.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище; ПрисоединенныйФайл.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста;
ПрисоединенныйФайл.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище;
Иначе
ПрисоединенныйФайл.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен;
ПрисоединенныйФайл.ТекстХранилище = Новый ХранилищеЗначения("");
КонецЕсли;
ПрисоединенныйФайл.Автор = Автор; ПрисоединенныйФайл.Автор = Автор;
ПрисоединенныйФайл.Заполнить(Неопределено); ПрисоединенныйФайл.Заполнить(Неопределено);
@@ -1410,13 +1410,22 @@
КонецЕсли; КонецЕсли;
КонецЕсли; КонецЕсли;
МетаданныеФайла = Метаданные.НайтиПоТипу(ТипЗнч(ФайлСсылка));
ИспользованиеПолнотекстовогоПоиска = Метаданные.СвойстваОбъектов.ИспользованиеПолнотекстовогоПоиска.Использовать;
Если Не Зашифровать И АдресВременногоХранилищаТекстаТекущейВерсии <> "" Тогда Если Не Зашифровать И АдресВременногоХранилищаТекстаТекущейВерсии <> "" Тогда
РезультатИзвлеченияТекста = ИзвлечьТекст(АдресВременногоХранилищаТекстаТекущейВерсии);
ФайлОбъект.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста; Если МетаданныеФайла.ПолнотекстовыйПоиск = ИспользованиеПолнотекстовогоПоиска Тогда
ФайлОбъект.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище; РезультатИзвлеченияТекста = ИзвлечьТекст(АдресВременногоХранилищаТекстаТекущейВерсии);
ФайлОбъект.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста;
ФайлОбъект.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище;
Иначе
ФайлОбъект.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен;
ФайлОбъект.ТекстХранилище = Новый ХранилищеЗначения("");
КонецЕсли;
КонецЕсли; КонецЕсли;
МетаданныеФайла = Метаданные.НайтиПоТипу(ТипЗнч(ФайлСсылка));
ВозможностьХранитьВерсии = ОбщегоНазначения.ЕстьРеквизитОбъекта("ТекущаяВерсия", МетаданныеФайла); ВозможностьХранитьВерсии = ОбщегоНазначения.ЕстьРеквизитОбъекта("ТекущаяВерсия", МетаданныеФайла);
Если Не ФайлОбъект.ХранитьВерсии Или (ВозможностьХранитьВерсии И Не ЗначениеЗаполнено(ФайлОбъект.ТекущаяВерсия)) Тогда Если Не ФайлОбъект.ХранитьВерсии Или (ВозможностьХранитьВерсии И Не ЗначениеЗаполнено(ФайлОбъект.ТекущаяВерсия)) Тогда
ОбновитьДвоичныеДанныеФайлаНаСервере(ФайлОбъект, АдресВременногоХранилищаОсновногоФайла); ОбновитьДвоичныеДанныеФайлаНаСервере(ФайлОбъект, АдресВременногоХранилищаОсновногоФайла);
@@ -1650,10 +1659,19 @@
ФайлИлиВерсияОбъект.Заблокировать(); ФайлИлиВерсияОбъект.Заблокировать();
Если Не ПустаяСтрока(АдресВременногоХранилищаТекста) Тогда Если Не ПустаяСтрока(АдресВременногоХранилищаТекста) Тогда
РезультатИзвлеченияТекста = ИзвлечьТекст(АдресВременногоХранилищаТекста);
ФайлИлиВерсияОбъект.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста; МетаданныеФайла = Метаданные.НайтиПоТипу(ФайлИлиВерсияСсылка);
ФайлИлиВерсияОбъект.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище; ИспользованиеПолнотекстовогоПоиска = Метаданные.СвойстваОбъектов.ИспользованиеПолнотекстовогоПоиска.Использовать;
Если МетаданныеФайла.ПолнотекстовыйПоиск = ИспользованиеПолнотекстовогоПоиска Тогда
РезультатИзвлеченияТекста = ИзвлечьТекст(АдресВременногоХранилищаТекста);
ФайлИлиВерсияОбъект.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста;
ФайлИлиВерсияОбъект.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище;
Иначе
ФайлИлиВерсияОбъект.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен;
ФайлИлиВерсияОбъект.ТекстХранилище = Новый ХранилищеЗначения("");
КонецЕсли;
УдалитьИзВременногоХранилища(АдресВременногоХранилищаТекста); УдалитьИзВременногоХранилища(АдресВременногоХранилищаТекста);
КонецЕсли; КонецЕсли;
Если РезультатИзвлечения = "НеИзвлечен" Тогда Если РезультатИзвлечения = "НеИзвлечен" Тогда
@@ -3786,13 +3804,16 @@
// //
Процедура Расшифровать(Знач ПрисоединенныйФайл, Знач РасшифрованныеДанные) Экспорт Процедура Расшифровать(Знач ПрисоединенныйФайл, Знач РасшифрованныеДанные) Экспорт
ИспользованиеПолнотекстовогоПоиска = Метаданные.СвойстваОбъектов.ИспользованиеПолнотекстовогоПоиска.Использовать;
НачатьТранзакцию(); НачатьТранзакцию();
Попытка Попытка
МетаданныеСправочника = Метаданные.НайтиПоТипу(ТипЗнч(ПрисоединенныйФайл));
Если Справочники.ТипВсеСсылки().СодержитТип(ТипЗнч(ПрисоединенныйФайл)) Тогда Если Справочники.ТипВсеСсылки().СодержитТип(ТипЗнч(ПрисоединенныйФайл)) Тогда
ПрисоединенныйФайлОбъект = ПрисоединенныйФайл.ПолучитьОбъект(); ПрисоединенныйФайлОбъект = ПрисоединенныйФайл.ПолучитьОбъект();
БлокировкаДанных = Новый БлокировкаДанных; БлокировкаДанных = Новый БлокировкаДанных;
ЭлементБлокировкиДанных = БлокировкаДанных.Добавить(Метаданные.НайтиПоТипу(ТипЗнч(ПрисоединенныйФайл)).ПолноеИмя()); ЭлементБлокировкиДанных = БлокировкаДанных.Добавить(МетаданныеСправочника.ПолноеИмя());
ЭлементБлокировкиДанных.УстановитьЗначение("Ссылка", ПрисоединенныйФайл); ЭлементБлокировкиДанных.УстановитьЗначение("Ссылка", ПрисоединенныйФайл);
БлокировкаДанных.Заблокировать(); БлокировкаДанных.Заблокировать();
Иначе Иначе
@@ -3808,11 +3829,15 @@
РеквизитыЗначения.Вставить("Зашифрован", Ложь); РеквизитыЗначения.Вставить("Зашифрован", Ложь);
ДвоичныеДанные = ПолучитьИзВременногоХранилища(РасшифрованныеДанные.АдресВременногоХранилища); ДвоичныеДанные = ПолучитьИзВременногоХранилища(РасшифрованныеДанные.АдресВременногоХранилища);
Если МетаданныеСправочника.ПолнотекстовыйПоиск = ИспользованиеПолнотекстовогоПоиска Тогда
РезультатИзвлеченияТекста = ИзвлечьТекст(РасшифрованныеДанные.АдресВременногоХранилищаТекста, ДвоичныеДанные, РезультатИзвлеченияТекста = ИзвлечьТекст(РасшифрованныеДанные.АдресВременногоХранилищаТекста, ДвоичныеДанные,
ПрисоединенныйФайл.Расширение); ПрисоединенныйФайл.Расширение);
ПрисоединенныйФайлОбъект.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста; ПрисоединенныйФайлОбъект.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста;
РеквизитыЗначения.Вставить("ТекстХранилище", РезультатИзвлеченияТекста.ИзвлеченныйТекст); РеквизитыЗначения.Вставить("ТекстХранилище", РезультатИзвлеченияТекста.ИзвлеченныйТекст);
Иначе
ПрисоединенныйФайлОбъект.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен;
РеквизитыЗначения.Вставить("ТекстХранилище", Новый ХранилищеЗначения(""));
КонецЕсли;
ОбновитьДвоичныеДанныеФайлаНаСервере(ПрисоединенныйФайлОбъект, ДвоичныеДанные, РеквизитыЗначения); ОбновитьДвоичныеДанныеФайлаНаСервере(ПрисоединенныйФайлОбъект, ДвоичныеДанные, РеквизитыЗначения);
@@ -4523,15 +4548,17 @@
КонецЕсли; КонецЕсли;
Версия.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен; Версия.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен;
ИспользованиеПолнотекстовогоПоиска = Метаданные.СвойстваОбъектов.ИспользованиеПолнотекстовогоПоиска.Использовать;
Если ТипЗнч(СведенияОФайле.АдресВременногоХранилищаТекста) = Тип("ХранилищеЗначения") Тогда Если Метаданные.Справочники.ВерсииФайлов.ПолнотекстовыйПоиск = ИспользованиеПолнотекстовогоПоиска Тогда
// При создании Файла из шаблона хранилище значения копируется напрямую. Если ТипЗнч(СведенияОФайле.АдресВременногоХранилищаТекста) = Тип("ХранилищеЗначения") Тогда
Версия.ТекстХранилище = СведенияОФайле.АдресВременногоХранилищаТекста; // При создании Файла из шаблона хранилище значения копируется напрямую.
Версия.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.Извлечен; Версия.ТекстХранилище = СведенияОФайле.АдресВременногоХранилищаТекста;
ИначеЕсли Не ПустаяСтрока(СведенияОФайле.АдресВременногоХранилищаТекста) Тогда Версия.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.Извлечен;
РезультатИзвлеченияТекста = ИзвлечьТекст(СведенияОФайле.АдресВременногоХранилищаТекста); ИначеЕсли Не ПустаяСтрока(СведенияОФайле.АдресВременногоХранилищаТекста) Тогда
Версия.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище; РезультатИзвлеченияТекста = ИзвлечьТекст(СведенияОФайле.АдресВременногоХранилищаТекста);
Версия.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста; Версия.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище;
Версия.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста;
КонецЕсли;
КонецЕсли; КонецЕсли;
Версия.Заполнить(Неопределено); Версия.Заполнить(Неопределено);
@@ -4630,10 +4657,17 @@
ДвоичныеДанные = ПолучитьИзВременногоХранилища(ИнформацияОФайле.АдресФайлаВоВременномХранилище); ДвоичныеДанные = ПолучитьИзВременногоХранилища(ИнформацияОФайле.АдресФайлаВоВременномХранилище);
РезультатИзвлеченияТекста = ИзвлечьТекст(ИнформацияОФайле.АдресВременногоХранилищаТекста, ДвоичныеДанные, МетаданныеФайла = Метаданные.НайтиПоТипу(ТипЗнч(ПрисоединенныйФайл));
ПрисоединенныйФайл.Расширение); ИспользованиеПолнотекстовогоПоиска = Метаданные.СвойстваОбъектов.ИспользованиеПолнотекстовогоПоиска.Использовать;
РеквизитыЗначения.Вставить("СтатусИзвлеченияТекста", РезультатИзвлеченияТекста.СтатусИзвлеченияТекста); Если МетаданныеФайла.ПолнотекстовыйПоиск = ИспользованиеПолнотекстовогоПоиска Тогда
РеквизитыЗначения.Вставить("ТекстХранилище", РезультатИзвлеченияТекста.ТекстХранилище); РезультатИзвлеченияТекста = ИзвлечьТекст(ИнформацияОФайле.АдресВременногоХранилищаТекста, ДвоичныеДанные,
ПрисоединенныйФайл.Расширение);
РеквизитыЗначения.Вставить("СтатусИзвлеченияТекста", РезультатИзвлеченияТекста.СтатусИзвлеченияТекста);
РеквизитыЗначения.Вставить("ТекстХранилище", РезультатИзвлеченияТекста.ТекстХранилище);
Иначе
РеквизитыЗначения.Вставить("СтатусИзвлеченияТекста", Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен);
РеквизитыЗначения.Вставить("ТекстХранилище", Новый ХранилищеЗначения(""));
КонецЕсли;
ОбновитьДвоичныеДанныеФайлаНаСервере(ПрисоединенныйФайл, ДвоичныеДанные, РеквизитыЗначения); ОбновитьДвоичныеДанныеФайлаНаСервере(ПрисоединенныйФайл, ДвоичныеДанные, РеквизитыЗначения);
@@ -4688,6 +4722,7 @@
ТекущаяВерсияПутьКФайлу = Неопределено; ТекущаяВерсияПутьКФайлу = Неопределено;
МетаданныеОбъекта = Метаданные.НайтиПоТипу(ТипЗнч(ФайлСсылка)); МетаданныеОбъекта = Метаданные.НайтиПоТипу(ТипЗнч(ФайлСсылка));
ВозможностьХранитьВерсии = ОбщегоНазначения.ЕстьРеквизитОбъекта("ТекущаяВерсия", МетаданныеОбъекта); ВозможностьХранитьВерсии = ОбщегоНазначения.ЕстьРеквизитОбъекта("ТекущаяВерсия", МетаданныеОбъекта);
ИспользованиеПолнотекстовогоПоиска = Метаданные.СвойстваОбъектов.ИспользованиеПолнотекстовогоПоиска.Использовать;
ВерсияСсылкаДляСравненияРазмера = ВерсияСсылка; ВерсияСсылкаДляСравненияРазмера = ВерсияСсылка;
Если ВерсияСсылка <> Неопределено Тогда Если ВерсияСсылка <> Неопределено Тогда
@@ -4819,11 +4854,16 @@
КонецЕсли; КонецЕсли;
РезультатИзвлеченияТекста = ИзвлечьТекст(СведенияОФайле.АдресВременногоХранилищаТекста); Если МетаданныеОбъекта.ПолнотекстовыйПоиск = ИспользованиеПолнотекстовогоПоиска Тогда
Версия.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище; РезультатИзвлеченияТекста = ИзвлечьТекст(СведенияОФайле.АдресВременногоХранилищаТекста);
Версия.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста; Версия.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище;
Если СведенияОФайле.НовыйСтатусИзвлеченияТекста <> Неопределено Тогда Версия.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста;
Версия.СтатусИзвлеченияТекста = СведенияОФайле.НовыйСтатусИзвлеченияТекста; Если СведенияОФайле.НовыйСтатусИзвлеченияТекста <> Неопределено Тогда
Версия.СтатусИзвлеченияТекста = СведенияОФайле.НовыйСтатусИзвлеченияТекста;
КонецЕсли;
Иначе
Версия.ТекстХранилище = Новый ХранилищеЗначения("");
Версия.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен;
КонецЕсли; КонецЕсли;
Версия.Заполнить(Неопределено); Версия.Заполнить(Неопределено);
@@ -4863,10 +4903,15 @@
Знач АдресВременногоХранилищаТекста, Знач АдресВременногоХранилищаТекста,
УникальныйИдентификатор = Неопределено) Экспорт УникальныйИдентификатор = Неопределено) Экспорт
ИспользованиеПолнотекстовогоПоиска = Метаданные.СвойстваОбъектов.ИспользованиеПолнотекстовогоПоиска.Использовать;
НачатьТранзакцию(); НачатьТранзакцию();
Попытка Попытка
МетаданныеСправочника = Метаданные.НайтиПоТипу(ТипЗнч(ФайлСсылка));
БлокировкаДанных = Новый БлокировкаДанных; БлокировкаДанных = Новый БлокировкаДанных;
ЭлементБлокировкиДанных = БлокировкаДанных.Добавить(Метаданные.НайтиПоТипу(ТипЗнч(ФайлСсылка)).ПолноеИмя()); ЭлементБлокировкиДанных = БлокировкаДанных.Добавить(МетаданныеСправочника.ПолноеИмя());
ЭлементБлокировкиДанных.УстановитьЗначение("Ссылка", ФайлСсылка); ЭлементБлокировкиДанных.УстановитьЗначение("Ссылка", ФайлСсылка);
БлокировкаДанных.Заблокировать(); БлокировкаДанных.Заблокировать();
@@ -4875,14 +4920,18 @@
ЗаблокироватьДанныеДляРедактирования(ФайлОбъект.Ссылка, , УникальныйИдентификатор); ЗаблокироватьДанныеДляРедактирования(ФайлОбъект.Ссылка, , УникальныйИдентификатор);
ФайлОбъект.ТекущаяВерсия = Версия.Ссылка; ФайлОбъект.ТекущаяВерсия = Версия.Ссылка;
Если МетаданныеСправочника.ПолнотекстовыйПоиск = ИспользованиеПолнотекстовогоПоиска Тогда
Если ТипЗнч(АдресВременногоХранилищаТекста) = Тип("ХранилищеЗначения") Тогда Если ТипЗнч(АдресВременногоХранилищаТекста) = Тип("ХранилищеЗначения") Тогда
// При создании Файла из шаблона хранилище значения копируется напрямую. // При создании Файла из шаблона хранилище значения копируется напрямую.
ФайлОбъект.ТекстХранилище = АдресВременногоХранилищаТекста; ФайлОбъект.ТекстХранилище = АдресВременногоХранилищаТекста;
Иначе
РезультатИзвлеченияТекста = ИзвлечьТекст(АдресВременногоХранилищаТекста);
ФайлОбъект.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище;
ФайлОбъект.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста;
КонецЕсли;
Иначе Иначе
РезультатИзвлеченияТекста = ИзвлечьТекст(АдресВременногоХранилищаТекста); ФайлОбъект.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен;
ФайлОбъект.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище; ФайлОбъект.ТекстХранилище = Новый ХранилищеЗначения("");
ФайлОбъект.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста;
КонецЕсли; КонецЕсли;
ФайлОбъект.Записать(); ФайлОбъект.Записать();
@@ -793,13 +793,21 @@
Файл.ИндексКартинки = РаботаСФайламиСлужебныйКлиентСервер.ПолучитьИндексПиктограммыФайла(Неопределено); Файл.ИндексКартинки = РаботаСФайламиСлужебныйКлиентСервер.ПолучитьИндексПиктограммыФайла(Неопределено);
Файл.ХранитьВерсии = СведенияОФайле.ХранитьВерсии; Файл.ХранитьВерсии = СведенияОФайле.ХранитьВерсии;
Если ТипЗнч(СведенияОФайле.АдресВременногоХранилищаТекста) = Тип("ХранилищеЗначения") Тогда ИспользованиеПолнотекстовогоПоиска = Метаданные.СвойстваОбъектов.ИспользованиеПолнотекстовогоПоиска.Использовать;
// При создании Файла из шаблона хранилище значения копируется напрямую. Если Метаданные.Справочники[СведенияОФайле.ИмяСправочникаХранилищаФайлов].ПолнотекстовыйПоиск = ИспользованиеПолнотекстовогоПоиска Тогда
Файл.ТекстХранилище = СведенияОФайле.АдресВременногоХранилищаТекста;
ИначеЕсли Не ПустаяСтрока(СведенияОФайле.АдресВременногоХранилищаТекста) Тогда Если ТипЗнч(СведенияОФайле.АдресВременногоХранилищаТекста) = Тип("ХранилищеЗначения") Тогда
РезультатИзвлеченияТекста = РаботаСФайламиСлужебный.ИзвлечьТекст(СведенияОФайле.АдресВременногоХранилищаТекста); // При создании Файла из шаблона хранилище значения копируется напрямую.
Файл.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище; Файл.ТекстХранилище = СведенияОФайле.АдресВременногоХранилищаТекста;
Файл.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста; ИначеЕсли Не ПустаяСтрока(СведенияОФайле.АдресВременногоХранилищаТекста) Тогда
РезультатИзвлеченияТекста = РаботаСФайламиСлужебный.ИзвлечьТекст(СведенияОФайле.АдресВременногоХранилищаТекста);
Файл.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище;
Файл.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста;
КонецЕсли;
Иначе
Файл.ТекстХранилище = Новый ХранилищеЗначения("");
Файл.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен;
КонецЕсли; КонецЕсли;
Файл.Заполнить(Неопределено); Файл.Заполнить(Неопределено);
@@ -858,7 +866,8 @@
ТекущаяВерсияТом = Неопределено; ТекущаяВерсияТом = Неопределено;
ТекущаяВерсияПутьКФайлу = Неопределено; ТекущаяВерсияПутьКФайлу = Неопределено;
СправочникПоддерживаетВозможностьХранитьВерсии = ОбщегоНазначения.ЕстьРеквизитОбъекта("ТекущаяВерсия", Метаданные.НайтиПоТипу(ТипЗнч(ФайлСсылка))); МетаданныеСправочника = Метаданные.НайтиПоТипу(ТипЗнч(ФайлСсылка));
СправочникПоддерживаетВозможностьХранитьВерсии = ОбщегоНазначения.ЕстьРеквизитОбъекта("ТекущаяВерсия", МетаданныеСправочника);
ВерсияСсылкаДляСравненияРазмера = ВерсияСсылка; ВерсияСсылкаДляСравненияРазмера = ВерсияСсылка;
Если ВерсияСсылка <> Неопределено Тогда Если ВерсияСсылка <> Неопределено Тогда
@@ -980,22 +989,29 @@
КонецЕсли; КонецЕсли;
Если СведенияОФайле.АдресВременногоХранилищаТекста <> Неопределено Тогда ИспользованиеПолнотекстовогоПоиска = Метаданные.СвойстваОбъектов.ИспользованиеПолнотекстовогоПоиска.Использовать;
Если РаботаСФайламиСлужебный.ИзвлекатьТекстыФайловНаСервере() Тогда Если МетаданныеСправочника.ПолнотекстовыйПоиск = ИспользованиеПолнотекстовогоПоиска Тогда
Версия.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен;
Если СведенияОФайле.АдресВременногоХранилищаТекста <> Неопределено Тогда
Если РаботаСФайламиСлужебный.ИзвлекатьТекстыФайловНаСервере() Тогда
Версия.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен;
Иначе
РезультатИзвлеченияТекста = РаботаСФайламиСлужебный.ИзвлечьТекст(СведенияОФайле.АдресВременногоХранилищаТекста);
Версия.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище;
Версия.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста;
КонецЕсли;
Иначе Иначе
РезультатИзвлеченияТекста = РаботаСФайламиСлужебный.ИзвлечьТекст(СведенияОФайле.АдресВременногоХранилищаТекста); Версия.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен;
Версия.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище;
Версия.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста;
КонецЕсли; КонецЕсли;
Если СведенияОФайле.НовыйСтатусИзвлеченияТекста <> Неопределено Тогда
Версия.СтатусИзвлеченияТекста = СведенияОФайле.НовыйСтатусИзвлеченияТекста;
КонецЕсли;
Иначе Иначе
Версия.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен; Версия.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен;
КонецЕсли; КонецЕсли;
Если СведенияОФайле.НовыйСтатусИзвлеченияТекста <> Неопределено Тогда
Версия.СтатусИзвлеченияТекста = СведенияОФайле.НовыйСтатусИзвлеченияТекста;
КонецЕсли;
Если Версия.Размер = 0 Тогда Если Версия.Размер = 0 Тогда
Если ТипХраненияФайлов = Перечисления.ТипыХраненияФайлов.ВИнформационнойБазе Тогда Если ТипХраненияФайлов = Перечисления.ТипыХраненияФайлов.ВИнформационнойБазе Тогда
ДвоичныеДанныеФайла = ХранилищеФайла.Получить(); ДвоичныеДанныеФайла = ХранилищеФайла.Получить();
@@ -1204,24 +1220,35 @@
Знач АдресВременногоХранилищаТекста, Знач АдресВременногоХранилищаТекста,
УникальныйИдентификатор = Неопределено) УникальныйИдентификатор = Неопределено)
ИспользованиеПолнотекстовогоПоиска = Метаданные.СвойстваОбъектов.ИспользованиеПолнотекстовогоПоиска.Использовать;
НачатьТранзакцию(); НачатьТранзакцию();
Попытка Попытка
МетаданныеСправочника = Метаданные.НайтиПоТипу(ТипЗнч(ФайлСсылка));
БлокировкаДанных = Новый БлокировкаДанных; БлокировкаДанных = Новый БлокировкаДанных;
ЭлементБлокировкиДанных = БлокировкаДанных.Добавить(Метаданные.НайтиПоТипу(ТипЗнч(ФайлСсылка)).ПолноеИмя()); ЭлементБлокировкиДанных = БлокировкаДанных.Добавить(МетаданныеСправочника.ПолноеИмя());
ЭлементБлокировкиДанных.УстановитьЗначение("Ссылка", ФайлСсылка); ЭлементБлокировкиДанных.УстановитьЗначение("Ссылка", ФайлСсылка);
БлокировкаДанных.Заблокировать(); БлокировкаДанных.Заблокировать();
ФайлОбъект = ФайлСсылка.ПолучитьОбъект(); ФайлОбъект = ФайлСсылка.ПолучитьОбъект();
ЗаблокироватьДанныеДляРедактирования(ФайлОбъект.Ссылка, , УникальныйИдентификатор); ЗаблокироватьДанныеДляРедактирования(ФайлОбъект.Ссылка, , УникальныйИдентификатор);
РезультатИзвлеченияТекста = РаботаСФайламиСлужебный.ИзвлечьТекст(АдресВременногоХранилищаТекста); Если МетаданныеСправочника.ПолнотекстовыйПоиск = ИспользованиеПолнотекстовогоПоиска Тогда
ФайлОбъект.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста; РезультатИзвлеченияТекста = РаботаСФайламиСлужебный.ИзвлечьТекст(АдресВременногоХранилищаТекста);
ФайлОбъект.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище; ФайлОбъект.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста;
ФайлОбъект.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище;
Иначе
ФайлОбъект.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен;
ФайлОбъект.ТекстХранилище = Новый ХранилищеЗначения("");
КонецЕсли;
ФайлОбъект.Записать(); ФайлОбъект.Записать();
РазблокироватьДанныеДляРедактирования(ФайлОбъект.Ссылка, УникальныйИдентификатор); РазблокироватьДанныеДляРедактирования(ФайлОбъект.Ссылка, УникальныйИдентификатор);
ЗафиксироватьТранзакцию(); ЗафиксироватьТранзакцию();
Исключение Исключение
ОтменитьТранзакцию(); ОтменитьТранзакцию();
ВызватьИсключение; ВызватьИсключение;
@@ -3703,8 +3730,9 @@
КонецЕсли; КонецЕсли;
Текст = ""; Текст = "";
НачатьТранзакцию(); ИспользованиеПолнотекстовогоПоиска = Метаданные.СвойстваОбъектов.ИспользованиеПолнотекстовогоПоиска.Использовать;
НачатьТранзакцию();
Попытка Попытка
БлокировкаВерсии = Новый БлокировкаДанных; БлокировкаВерсии = Новый БлокировкаДанных;
ЭлементБлокировкиДанных = БлокировкаВерсии.Добавить(Метаданные.НайтиПоТипу(ТипЗнч(ВерсияСсылка)).ПолноеИмя()); ЭлементБлокировкиДанных = БлокировкаВерсии.Добавить(Метаданные.НайтиПоТипу(ТипЗнч(ВерсияСсылка)).ПолноеИмя());
@@ -3712,18 +3740,22 @@
БлокировкаВерсии.Заблокировать(); БлокировкаВерсии.Заблокировать();
ВерсияОбъект = ВерсияСсылка.ПолучитьОбъект(); ВерсияОбъект = ВерсияСсылка.ПолучитьОбъект();
Если МетаданныеВерсии.ПолнотекстовыйПоиск = ИспользованиеПолнотекстовогоПоиска Тогда
Если Не ПустаяСтрока(АдресВременногоХранилищаТекста) Тогда
Если Не ПустаяСтрока(АдресВременногоХранилищаТекста) Тогда Если Не ЭтоАдресВременногоХранилища(АдресВременногоХранилищаТекста) Тогда
ВерсияОбъект.ТекстХранилище = Новый ХранилищеЗначения(АдресВременногоХранилищаТекста, Новый СжатиеДанных(9));
ВерсияОбъект.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.Извлечен;
Иначе
РезультатИзвлеченияТекста = РаботаСФайламиСлужебный.ИзвлечьТекст(АдресВременногоХранилищаТекста);
ВерсияОбъект.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище;
ВерсияОбъект.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста;
КонецЕсли;
Если Не ЭтоАдресВременногоХранилища(АдресВременногоХранилищаТекста) Тогда
ВерсияОбъект.ТекстХранилище = Новый ХранилищеЗначения(АдресВременногоХранилищаТекста, Новый СжатиеДанных(9));
ВерсияОбъект.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.Извлечен;
Иначе
РезультатИзвлеченияТекста = РаботаСФайламиСлужебный.ИзвлечьТекст(АдресВременногоХранилищаТекста);
ВерсияОбъект.ТекстХранилище = РезультатИзвлеченияТекста.ТекстХранилище;
ВерсияОбъект.СтатусИзвлеченияТекста = РезультатИзвлеченияТекста.СтатусИзвлеченияТекста;
КонецЕсли; КонецЕсли;
Иначе
ВерсияОбъект.ТекстХранилище = Новый ХранилищеЗначения("");
ВерсияОбъект.СтатусИзвлеченияТекста = Перечисления.СтатусыИзвлеченияТекстаФайлов.НеИзвлечен;
КонецЕсли; КонецЕсли;
Если РезультатИзвлечения = "НеИзвлечен" Тогда Если РезультатИзвлечения = "НеИзвлечен" Тогда
@@ -2569,7 +2569,7 @@
// Проверка настройки совместимости конфигурации с версией платформы. // Проверка настройки совместимости конфигурации с версией платформы.
СистемнаяИнформация = Новый СистемнаяИнформация; СистемнаяИнформация = Новый СистемнаяИнформация;
МинимальнаяВерсияПлатформы = "8.3.12.1595"; МинимальнаяВерсияПлатформы = "8.3.12.1412";
Если ОбщегоНазначенияКлиентСервер.СравнитьВерсии(СистемнаяИнформация.ВерсияПриложения, МинимальнаяВерсияПлатформы) < 0 Тогда Если ОбщегоНазначенияКлиентСервер.СравнитьВерсии(СистемнаяИнформация.ВерсияПриложения, МинимальнаяВерсияПлатформы) < 0 Тогда
ВызватьИсключение СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку( ВызватьИсключение СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Для запуска необходима версия платформы 1С:Предприятие %1 или выше.'"), МинимальнаяВерсияПлатформы); НСтр("ru = 'Для запуска необходима версия платформы 1С:Предприятие %1 или выше.'"), МинимальнаяВерсияПлатформы);
@@ -1273,7 +1273,7 @@
Или ОграничиватьДоступНаУровнеЗаписейУниверсально(Истина) Тогда Или ОграничиватьДоступНаУровнеЗаписейУниверсально(Истина) Тогда
Обработчик = Обработчики.Добавить(); Обработчик = Обработчики.Добавить();
Обработчик.Версия = "3.0.1.285"; Обработчик.Версия = "3.0.1.295";
Обработчик.Процедура = "РегистрыСведений.ПараметрыОграниченияДоступа.ОбработатьДанныеДляПереходаНаНовуюВерсию1"; Обработчик.Процедура = "РегистрыСведений.ПараметрыОграниченияДоступа.ОбработатьДанныеДляПереходаНаНовуюВерсию1";
Обработчик.РежимВыполнения = "Отложенно"; Обработчик.РежимВыполнения = "Отложенно";
Обработчик.ЗапускатьИВПодчиненномУзлеРИБСФильтрами = Истина; Обработчик.ЗапускатьИВПодчиненномУзлеРИБСФильтрами = Истина;
@@ -7497,8 +7497,14 @@
Если Не ПередЗаписью Если Не ПередЗаписью
И ПараметрыОграничения.Свойство("ТекстЗапросаЭлементовДанныхСУстаревшимРазрешеннымКлючом") Тогда И ПараметрыОграничения.Свойство("ТекстЗапросаЭлементовДанныхСУстаревшимРазрешеннымКлючом") Тогда
УстановитьОтключениеБезопасногоРежима(Истина);
УстановитьПривилегированныйРежим(Истина);
ОбновитьКлючиДоступаЭлементовДанныхПриЗаписи(Источник.Ссылка, ОбновитьКлючиДоступаЭлементовДанныхПриЗаписи(Источник.Ссылка,
ПараметрыОграничения, ИдентификаторТранзакции,,, Источник); ПараметрыОграничения, ИдентификаторТранзакции,,, Источник);
УстановитьПривилегированныйРежим(Ложь);
УстановитьОтключениеБезопасногоРежима(Ложь);
КонецЕсли; КонецЕсли;
Возврат; Возврат;
КонецЕсли; КонецЕсли;
@@ -18918,6 +18924,16 @@
Прервать; Прервать;
КонецЕсли; КонецЕсли;
КонецЦикла; КонецЦикла;
Для Каждого Тип Из Поле.ТипыСохраненияКлючейДоступа Цикл
Если СвойстваПоля.ТипыСохраненияЗначений.Найти(Тип) <> Неопределено
Или СвойстваПоля.ТипыСохраненияГруппЗначений.Найти(Тип) <> Неопределено
Или СвойстваПоля.ТипыСохраненияТипов.Найти(Тип) <> Неопределено
Или СвойстваПоля.ТипыСохраненияТипаЗапрещенный.Найти(Тип) <> Неопределено
Или СвойстваПоля.ТипыСохраненияТипаРазрешенный.Найти(Тип) <> Неопределено Тогда
Совместимо = Ложь;
Прервать;
КонецЕсли;
КонецЦикла;
Если Не Совместимо Тогда Если Не Совместимо Тогда
Продолжить; Продолжить;
КонецЕсли; КонецЕсли;
@@ -18932,6 +18948,15 @@
Прервать; Прервать;
КонецЕсли; КонецЕсли;
КонецЦикла; КонецЦикла;
Для Каждого Тип Из Поле.ТипыСохраненияГруппЗначений Цикл
Если СвойстваПоля.ТипыСохраненияЗначений.Найти(Тип) <> Неопределено
Или СвойстваПоля.ТипыСохраненияТипов.Найти(Тип) <> Неопределено
Или СвойстваПоля.ТипыСохраненияТипаЗапрещенный.Найти(Тип) <> Неопределено
Или СвойстваПоля.ТипыСохраненияТипаРазрешенный.Найти(Тип) <> Неопределено Тогда
Совместимо = Ложь;
Прервать;
КонецЕсли;
КонецЦикла;
Если Не Совместимо Тогда Если Не Совместимо Тогда
Продолжить; Продолжить;
КонецЕсли; КонецЕсли;
+9 -9
View File
@@ -1,17 +1,17 @@
<?xml version="1.0" encoding="UTF-8"?> <?xml version="1.0" encoding="UTF-8"?>
<mdclass:Configuration xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="e0192c1a-1a8f-4f2f-8bf6-c666af79b516"> <mdclass:Configuration xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="8c9b684c-3d4e-4f43-b95d-c7c4add4b47e">
<name>БиблиотекаСтандартныхПодсистем</name> <name>БиблиотекаСтандартныхПодсистем</name>
<synonym> <synonym>
<key>ru</key> <key>ru</key>
<value>Библиотека стандартных подсистем, редакция 3.0</value> <value>Библиотека стандартных подсистем, редакция 3.0</value>
</synonym> </synonym>
<containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="f4d1daa8-c9b9-43fa-ad7f-081858d57a65"/> <containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="2a2f7260-d3df-4624-8804-50d6c6021a4c"/>
<containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="29841a31-ec1b-4310-95c9-761d9f82a16b"/> <containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="6329d81b-04d4-496b-9554-4f3a33e97abc"/>
<containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="71faa0e3-c7ef-4a0e-8100-25b41ebcdc90"/> <containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="040daacc-d091-4aab-a236-3d7c92b756ae"/>
<containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="22223a79-df90-4b28-8ce2-5b032ba3539c"/> <containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="929d8405-df3e-49f5-b1d2-6a207a80c1d5"/>
<containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="24fd29a9-8cbe-4578-8032-658155efd3e1"/> <containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="308c06e9-28d3-4319-952c-91b16b0777e1"/>
<containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="c402c9d1-1a29-4df5-82f7-89cf697afed5"/> <containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="88dcf112-03ef-45b4-bd8b-d3d8e1662abf"/>
<containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="893fa6fe-31a2-4a48-8d0a-b815a59c03b4"/> <containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="52f9cf44-2860-4aa7-9854-24c78e7a0925"/>
<defaultRunMode>ManagedApplication</defaultRunMode> <defaultRunMode>ManagedApplication</defaultRunMode>
<usePurposes>PersonalComputer</usePurposes> <usePurposes>PersonalComputer</usePurposes>
<scriptVariant>Russian</scriptVariant> <scriptVariant>Russian</scriptVariant>
@@ -19,7 +19,7 @@
<defaultRoles>Role.АдминистраторСистемы</defaultRoles> <defaultRoles>Role.АдминистраторСистемы</defaultRoles>
<defaultRoles>Role.ИнтерактивноеОткрытиеВнешнихОтчетовИОбработок</defaultRoles> <defaultRoles>Role.ИнтерактивноеОткрытиеВнешнихОтчетовИОбработок</defaultRoles>
<vendor>Фирма &quot;1С&quot;</vendor> <vendor>Фирма &quot;1С&quot;</vendor>
<version>3.0.1.293</version> <version>3.0.1.298</version>
<updateCatalogAddress>http://downloads.v8.1c.ru/tmplts/</updateCatalogAddress> <updateCatalogAddress>http://downloads.v8.1c.ru/tmplts/</updateCatalogAddress>
<includeHelpInContents>true</includeHelpInContents> <includeHelpInContents>true</includeHelpInContents>
<usedMobileApplicationFunctionalities> <usedMobileApplicationFunctionalities>
@@ -1 +1 @@
{6,1,1,4794279a-5f41-4b48-9ff5-08ee63f2dffa,1,821d6886-97c1-466e-bd76-ccf7578b034e,"3.0.1.293","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",5876,1,0,e0192c1a-1a8f-4f2f-8bf6-c666af79b516,e0192c1a-1a8f-4f2f-8bf6-c666af79b516,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-74e8Line truncated {6,1,1,9f2aa679-0be8-4706-8801-f822aded5374,1,4d649df2-7a6d-4bb2-9d8c-09efc8da7773,"3.0.1.298","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",5876,1,0,8c9b684c-3d4e-4f43-b95d-c7c4add4b47e,8c9b684c-3d4e-4f43-b95d-c7c4add4b47e,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-74e8Line truncated
@@ -9355,6 +9355,7 @@
КонецЦикла; КонецЦикла;
// после загрузки // после загрузки
Отказ = Ложь;
Если ЕстьОбработчикПослеЗагрузки Тогда Если ЕстьОбработчикПослеЗагрузки Тогда
Попытка Попытка
@@ -9379,6 +9380,10 @@
КонецЕсли; КонецЕсли;
Если Отказ Тогда
Возврат Неопределено;
КонецЕсли;
Если Объект <> Неопределено Тогда Если Объект <> Неопределено Тогда
ПолучениеЭлемента = ПолучениеЭлементаДанных.Авто; ПолучениеЭлемента = ПолучениеЭлементаДанных.Авто;
@@ -3,6 +3,137 @@
<items xsi:type="form:FormGroup"> <items xsi:type="form:FormGroup">
<name>ПанельОсновная</name> <name>ПанельОсновная</name>
<id>1</id> <id>1</id>
<items xsi:type="form:FormGroup">
<name>СтраницаПолучениеПараметровКорреспондента</name>
<id>65</id>
<items xsi:type="form:FormGroup">
<name>ГруппаОжидание1</name>
<id>67</id>
<items xsi:type="form:Decoration">
<name>Декорация4</name>
<id>69</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<extendedTooltip>
<name>Декорация4РасширеннаяПодсказка</name>
<id>71</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>Декорация4КонтекстноеМеню</name>
<id>70</id>
<autoFill>true</autoFill>
</contextMenu>
<width>6</width>
<autoMaxWidth>true</autoMaxWidth>
<height>2</height>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:PictureDecorationExtInfo">
<picture xsi:type="core:PictureRef">
<picture>CommonPicture.ДлительнаяОперация48</picture>
</picture>
</extInfo>
</items>
<items xsi:type="form:Decoration">
<name>Декорация8</name>
<id>72</id>
<title>
<key>ru</key>
<value>Выполняется получение параметров корреспондента.
Пожалуйста, подождите...</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<extendedTooltip>
<name>Декорация8РасширеннаяПодсказка</name>
<id>74</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>Декорация8КонтекстноеМеню</name>
<id>73</id>
<autoFill>true</autoFill>
</contextMenu>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</items>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<title>
<key>ru</key>
<value>Ожидание</value>
</title>
<extendedTooltip>
<name>ГруппаОжидание1РасширеннаяПодсказка</name>
<id>68</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<type>UsualGroup</type>
<extInfo xsi:type="form:UsualGroupExtInfo">
<group>AlwaysHorizontal</group>
<verticalAlign>Center</verticalAlign>
<behavior>Auto</behavior>
<representation>WeakSeparation</representation>
<showLeftMargin>true</showLeftMargin>
<united>true</united>
<throughAlign>Auto</throughAlign>
<currentRowUse>Auto</currentRowUse>
</extInfo>
</items>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<title>
<key>ru</key>
<value>Страница получение параметров корреспондента</value>
</title>
<extendedTooltip>
<name>СтраницаПолучениеПараметровКорреспондентаРасширеннаяПодсказка</name>
<id>66</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<type>Page</type>
<extInfo xsi:type="form:PageGroupExtInfo">
<group>Vertical</group>
<showTitle>auto</showTitle>
<scrollOnCompress>false</scrollOnCompress>
</extInfo>
</items>
<items xsi:type="form:FormGroup"> <items xsi:type="form:FormGroup">
<name>СтраницаНачало</name> <name>СтраницаНачало</name>
<id>5</id> <id>5</id>
@@ -1162,10 +1293,10 @@
</edit> </edit>
</attributes> </attributes>
<attributes> <attributes>
<name>ПараметрыОбработчикаОжиданияУдаленияНастройкиСинхронизации</name> <name>ПараметрыОбработчикаОжидания</name>
<title> <title>
<key>ru</key> <key>ru</key>
<value>Параметры обработчика ожидания удаления настройки синхронизации</value> <value>Параметры обработчика ожидания</value>
</title> </title>
<id>10</id> <id>10</id>
<valueType/> <valueType/>
@@ -1177,27 +1308,10 @@
</edit> </edit>
</attributes> </attributes>
<attributes> <attributes>
<name>РазрешенияУдалены</name> <name>ПараметрыОбработчика</name>
<title> <title>
<key>ru</key> <key>ru</key>
<value>Разрешения удалены</value> <value>Параметры обработчика</value>
</title>
<id>11</id>
<valueType>
<types>Boolean</types>
</valueType>
<view>
<common>true</common>
</view>
<edit>
<common>true</common>
</edit>
</attributes>
<attributes>
<name>ПараметрыОбработчикаУдаленияНастройкиСинхронизации</name>
<title>
<key>ru</key>
<value>Параметры обработчика удаления настройки синхронизации</value>
</title> </title>
<id>12</id> <id>12</id>
<valueType/> <valueType/>
@@ -1281,6 +1395,23 @@
<common>true</common> <common>true</common>
</edit> </edit>
</attributes> </attributes>
<attributes>
<name>ПолучитьПараметрыКорреспондента</name>
<title>
<key>ru</key>
<value>Получить параметры корреспондента</value>
</title>
<id>17</id>
<valueType>
<types>Boolean</types>
</valueType>
<view>
<common>true</common>
</view>
<edit>
<common>true</common>
</edit>
</attributes>
<formCommands> <formCommands>
<name>КомандаДалее</name> <name>КомандаДалее</name>
<title> <title>
@@ -7,7 +7,6 @@
Возврат; Возврат;
КонецЕсли; КонецЕсли;
// Отключать синхронизацию данных может только администратор обмена (для абонента).
ОбменДаннымиСервер.ПроверитьВозможностьАдминистрированияОбменов(); ОбменДаннымиСервер.ПроверитьВозможностьАдминистрированияОбменов();
ИнициализироватьРеквизитыФормы(); ИнициализироватьРеквизитыФормы();
@@ -24,7 +23,7 @@
&НаКлиенте &НаКлиенте
Процедура ПередЗакрытием(Отказ, ЗавершениеРаботы, ТекстПредупреждения, СтандартнаяОбработка) Процедура ПередЗакрытием(Отказ, ЗавершениеРаботы, ТекстПредупреждения, СтандартнаяОбработка)
ТекстПредупреждения = НСтр("ru = 'Не выполнять удаление настройки синхронизации данных?'"); ТекстПредупреждения = НСтр("ru = 'Отказаться от удаления настройки синхронизации данных?'");
ОбщегоНазначенияКлиент.ПоказатьПодтверждениеЗакрытияПроизвольнойФормы( ОбщегоНазначенияКлиент.ПоказатьПодтверждениеЗакрытияПроизвольнойФормы(
ЭтотОбъект, Отказ, ЗавершениеРаботы, ТекстПредупреждения, "ЗакрытьФормуБезусловно"); ЭтотОбъект, Отказ, ЗавершениеРаботы, ТекстПредупреждения, "ЗакрытьФормуБезусловно");
@@ -52,7 +51,7 @@
Процедура КомандаГотово(Команда) Процедура КомандаГотово(Команда)
ЗакрытьФормуБезусловно = Истина; ЗакрытьФормуБезусловно = Истина;
Закрыть(УзелОбмена); Закрыть();
КонецПроцедуры КонецПроцедуры
@@ -78,10 +77,10 @@
Если ПродолжитьОжидание Тогда Если ПродолжитьОжидание Тогда
ДлительныеОперацииКлиент.ИнициализироватьПараметрыОбработчикаОжидания( ДлительныеОперацииКлиент.ИнициализироватьПараметрыОбработчикаОжидания(
ПараметрыОбработчикаОжиданияУдаленияНастройкиСинхронизации); ПараметрыОбработчикаОжидания);
ПодключитьОбработчикОжидания("ПриОжиданииУдаленияНастройкиСинхронизации", ПодключитьОбработчикОжидания("ПриОжиданииУдаленияНастройкиСинхронизации",
ПараметрыОбработчикаОжиданияУдаленияНастройкиСинхронизации.ТекущийИнтервал, Истина); ПараметрыОбработчикаОжидания.ТекущийИнтервал, Истина);
Иначе Иначе
ПриЗавершенииУдаленияНастройкиСинхронизации(); ПриЗавершенииУдаленияНастройкиСинхронизации();
КонецЕсли; КонецЕсли;
@@ -93,15 +92,15 @@
ПродолжитьОжидание = Ложь; ПродолжитьОжидание = Ложь;
ПриОжиданииУдаленияНастройкиСинхронизацииНаСервере(ЭтоОбменСПриложениемВСервисе, ПриОжиданииУдаленияНастройкиСинхронизацииНаСервере(ЭтоОбменСПриложениемВСервисе,
ПараметрыОбработчикаУдаленияНастройкиСинхронизации, ПродолжитьОжидание); ПараметрыОбработчика, ПродолжитьОжидание);
Если ПродолжитьОжидание Тогда Если ПродолжитьОжидание Тогда
ДлительныеОперацииКлиент.ОбновитьПараметрыОбработчикаОжидания(ПараметрыОбработчикаОжиданияУдаленияНастройкиСинхронизации); ДлительныеОперацииКлиент.ОбновитьПараметрыОбработчикаОжидания(ПараметрыОбработчикаОжидания);
ПодключитьОбработчикОжидания("ПриОжиданииУдаленияНастройкиСинхронизации", ПодключитьОбработчикОжидания("ПриОжиданииУдаленияНастройкиСинхронизации",
ПараметрыОбработчикаОжиданияУдаленияНастройкиСинхронизации.ТекущийИнтервал, Истина); ПараметрыОбработчикаОжидания.ТекущийИнтервал, Истина);
Иначе Иначе
ПараметрыОбработчикаОжиданияУдаленияНастройкиСинхронизации = Неопределено; ПараметрыОбработчикаОжидания = Неопределено;
ПриЗавершенииУдаленияНастройкиСинхронизации(); ПриЗавершенииУдаленияНастройкиСинхронизации();
КонецЕсли; КонецЕсли;
@@ -167,7 +166,7 @@
КонецЕсли; КонецЕсли;
МодульПомощникУдаленияНастройки.ПриНачалеУдаленияНастройкиСинхронизации(НастройкиУдаления, МодульПомощникУдаленияНастройки.ПриНачалеУдаленияНастройкиСинхронизации(НастройкиУдаления,
ПараметрыОбработчикаУдаленияНастройкиСинхронизации, ПродолжитьОжидание); ПараметрыОбработчика, ПродолжитьОжидание);
КонецПроцедуры КонецПроцедуры
@@ -208,7 +207,7 @@
СтатусЗавершения = Неопределено; СтатусЗавершения = Неопределено;
МодульПомощникУдаленияНастройки.ПриЗавершенииУдаленияНастройкиСинхронизации( МодульПомощникУдаленияНастройки.ПриЗавершенииУдаленияНастройкиСинхронизации(
ПараметрыОбработчикаУдаленияНастройкиСинхронизации, СтатусЗавершения); ПараметрыОбработчика, СтатусЗавершения);
Если СтатусЗавершения.Отказ Тогда Если СтатусЗавершения.Отказ Тогда
НастройкаУдалена = Ложь; НастройкаУдалена = Ложь;
@@ -228,34 +227,37 @@
#Область ИнициализацияФормыПриСоздании #Область ИнициализацияФормыПриСоздании
&НаСервере
Процедура УстановитьЗаголовкиЭлементовФормы()
Элементы.УдалитьНастройкуВКорреспонденте.Заголовок = СтрЗаменить(Элементы.УдалитьНастройкуВКорреспонденте.Заголовок,
"%НаименованиеКорреспондента%", НаименованиеКорреспондента);
КонецПроцедуры
&НаСервере &НаСервере
Процедура ИнициализироватьРеквизитыФормы() Процедура ИнициализироватьРеквизитыФормы()
УзелОбмена = Параметры.УзелОбмена; УзелОбмена = Параметры.УзелОбмена;
ИмяПланаОбмена = Параметры.ИмяПланаОбмена;
ОбластьДанныхКорреспондента = Параметры.ОбластьДанныхКорреспондента; Параметры.Свойство("ИмяПланаОбмена", ИмяПланаОбмена);
НаименованиеКорреспондента = Параметры.НаименованиеКорреспондента; Если Не ЗначениеЗаполнено(ИмяПланаОбмена) Тогда
ЭтоОбменСПриложениемВСервисе = Параметры.ЭтоОбменСПриложениемВСервисе; ИмяПланаОбмена = ОбменДаннымиПовтИсп.ПолучитьИмяПланаОбмена(УзелОбмена);
КонецЕсли;
МодельСервиса = ОбщегоНазначения.РазделениеВключено() МодельСервиса = ОбщегоНазначения.РазделениеВключено()
И ОбщегоНазначения.ДоступноИспользованиеРазделенныхДанных(); И ОбщегоНазначения.ДоступноИспользованиеРазделенныхДанных();
Параметры.Свойство("ОбластьДанныхКорреспондента", ОбластьДанныхКорреспондента);
Параметры.Свойство("НаименованиеКорреспондента", НаименованиеКорреспондента);
Параметры.Свойство("ЭтоОбменСПриложениемВСервисе", ЭтоОбменСПриложениемВСервисе);
Если Не ЗначениеЗаполнено(НаименованиеКорреспондента) Тогда
НаименованиеКорреспондента = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(УзелОбмена, "Наименование");
КонецЕсли;
ВидТранспорта = РегистрыСведений.НастройкиТранспортаОбменаДанными.ВидТранспортаСообщенийОбменаПоУмолчанию(УзелОбмена); ВидТранспорта = РегистрыСведений.НастройкиТранспортаОбменаДанными.ВидТранспортаСообщенийОбменаПоУмолчанию(УзелОбмена);
ПодключениеOnline = (ВидТранспорта = Перечисления.ВидыТранспортаСообщенийОбмена.COM ПодключениеOnline = (ВидТранспорта = Перечисления.ВидыТранспортаСообщенийОбмена.COM
Или ВидТранспорта = Перечисления.ВидыТранспортаСообщенийОбмена.WS); Или ВидТранспорта = Перечисления.ВидыТранспортаСообщенийОбмена.WS);
УдалитьНастройкуВКорреспонденте = ПодключениеOnline; УдалитьНастройкуВКорреспонденте = ПодключениеOnline;
УстановитьЗаголовкиЭлементовФормы(); ПолучитьПараметрыКорреспондента = МодельСервиса
И Не Параметры.Свойство("ЭтоОбменСПриложениемВСервисе")
И Не ВидТранспорта = Перечисления.ВидыТранспортаСообщенийОбмена.WS
И Не ВидТранспорта = Перечисления.ВидыТранспортаСообщенийОбмена.WSПассивныйРежим;
ЗаполнитьТаблицуПереходов(); ЗаполнитьТаблицуПереходов();
@@ -283,6 +285,12 @@
ТаблицаПереходов.Очистить(); ТаблицаПереходов.Очистить();
Если ПолучитьПараметрыКорреспондента Тогда
НовыйПереход = ДобавитьСтрокуТаблицыПереходов("СтраницаПолучениеПараметровКорреспондента", "СтраницаНавигацияОжидание");
НовыйПереход.ДлительнаяОперация = Истина;
НовыйПереход.ИмяОбработчикаДлительнойОперации = "СтраницаПолучениеПараметровКорреспондента_ДлительнаяОперация";
КонецЕсли;
НовыйПереход = ДобавитьСтрокуТаблицыПереходов("СтраницаНачало", "СтраницаНавигацияНачало"); НовыйПереход = ДобавитьСтрокуТаблицыПереходов("СтраницаНачало", "СтраницаНавигацияНачало");
НовыйПереход.ИмяОбработчикаПриОткрытии = "СтраницаНачало_ПриОткрытии"; НовыйПереход.ИмяОбработчикаПриОткрытии = "СтраницаНачало_ПриОткрытии";
@@ -300,11 +308,22 @@
#Область ОбработчикиСобытийПереходов #Область ОбработчикиСобытийПереходов
&НаКлиенте
Функция Подключаемый_СтраницаПолучениеПараметровКорреспондента_ДлительнаяОперация(Отказ, ПерейтиДалее)
ПерейтиДалее = Ложь;
ПриНачалеПолученияСпискаПриложений();
КонецФункции
&НаКлиенте &НаКлиенте
Функция Подключаемый_СтраницаНачало_ПриОткрытии(Отказ, ПропуститьСтраницу, ЭтоПереходДалее) Функция Подключаемый_СтраницаНачало_ПриОткрытии(Отказ, ПропуститьСтраницу, ЭтоПереходДалее)
Элементы.ГруппаНачалоДополнительно.Видимость = ПодключениеOnline; Элементы.ГруппаНачалоДополнительно.Видимость = ПодключениеOnline;
Элементы.УдалитьНастройкуВКорреспонденте.Заголовок = СтрЗаменить(Элементы.УдалитьНастройкуВКорреспонденте.Заголовок,
"%НаименованиеКорреспондента%", НаименованиеКорреспондента);
КонецФункции КонецФункции
&НаКлиенте &НаКлиенте
@@ -610,6 +629,114 @@
#КонецОбласти #КонецОбласти
&НаКлиенте
Процедура ПриНачалеПолученияСпискаПриложений()
ПараметрыОбработчика = Неопределено;
ПродолжитьОжидание = Ложь;
ПриНачалеПолученияСпискаПриложенийНаСервере(ПараметрыОбработчика, ПродолжитьОжидание);
Если ПродолжитьОжидание Тогда
ДлительныеОперацииКлиент.ИнициализироватьПараметрыОбработчикаОжидания(ПараметрыОбработчикаОжидания);
ПодключитьОбработчикОжидания("ПриОжиданииПолученияСпискаПриложений",
ПараметрыОбработчикаОжидания.ТекущийИнтервал, Истина);
Иначе
ПриЗавершенииПолученияСпискаПриложений();
КонецЕсли;
КонецПроцедуры
&НаКлиенте
Процедура ПриОжиданииПолученияСпискаПриложений()
ПродолжитьОжидание = Ложь;
ПриОжиданииПолученияСпискаПриложенийНаСервере(ПараметрыОбработчика, ПродолжитьОжидание);
Если ПродолжитьОжидание Тогда
ДлительныеОперацииКлиент.ОбновитьПараметрыОбработчикаОжидания(ПараметрыОбработчикаОжидания);
ПодключитьОбработчикОжидания("ПриОжиданииПолученияСпискаПриложений",
ПараметрыОбработчикаОжидания.ТекущийИнтервал, Истина);
Иначе
ПараметрыОбработчикаОжидания = Неопределено;
ПриЗавершенииПолученияСпискаПриложений();
КонецЕсли;
КонецПроцедуры
&НаКлиенте
Процедура ПриЗавершенииПолученияСпискаПриложений()
ПерейтиДалее = Истина;
ПриЗавершенииПолученияСпискаПриложенийНаСервере(ПерейтиДалее);
Если ПерейтиДалее Тогда
ИзменитьПорядковыйНомерПерехода(+1);
КонецЕсли;
КонецПроцедуры
&НаСервереБезКонтекста
Процедура ПриНачалеПолученияСпискаПриложенийНаСервере(ПараметрыОбработчика, ПродолжитьОжидание)
МодульПомощникНастройки = ОбменДаннымиСервер.МодульПомощникНастройкиСинхронизацииДанныхМеждуПриложениямиВИнтернете();
Если МодульПомощникНастройки = Неопределено Тогда
ПродолжитьОжидание = Ложь;
Возврат;
КонецЕсли;
ПараметрыПомощника = Новый Структура("Режим", "НастроенныеОбмены");
МодульПомощникНастройки.ПриНачалеПолученияСпискаПриложений(ПараметрыПомощника,
ПараметрыОбработчика, ПродолжитьОжидание);
КонецПроцедуры
&НаСервереБезКонтекста
Процедура ПриОжиданииПолученияСпискаПриложенийНаСервере(ПараметрыОбработчика, ПродолжитьОжидание)
МодульПомощникНастройки = ОбменДаннымиСервер.МодульПомощникНастройкиСинхронизацииДанныхМеждуПриложениямиВИнтернете();
Если МодульПомощникНастройки = Неопределено Тогда
ПродолжитьОжидание = Ложь;
Возврат;
КонецЕсли;
МодульПомощникНастройки.ПриОжиданииПолученияСпискаПриложений(
ПараметрыОбработчика, ПродолжитьОжидание);
КонецПроцедуры
&НаСервере
Процедура ПриЗавершенииПолученияСпискаПриложенийНаСервере(ПерейтиДалее)
МодульПомощникНастройки = ОбменДаннымиСервер.МодульПомощникНастройкиСинхронизацииДанныхМеждуПриложениямиВИнтернете();
Если МодульПомощникНастройки = Неопределено Тогда
Возврат;
КонецЕсли;
СтатусЗавершения = Неопределено;
МодульПомощникНастройки.ПриЗавершенииПолученияСпискаПриложений(ПараметрыОбработчика, СтатусЗавершения);
Если Не СтатусЗавершения.Отказ Тогда
ТаблицаПриложений = СтатусЗавершения.Результат;
СтрокаПриложение = ТаблицаПриложений.Найти(УзелОбмена, "Корреспондент");
Если Не СтрокаПриложение = Неопределено Тогда
ЭтоОбменСПриложениемВСервисе = Истина;
ОбластьДанныхКорреспондента = СтрокаПриложение.ОбластьДанных;
НаименованиеКорреспондента = СтрокаПриложение.НаименованиеПриложения;
КонецЕсли;
Иначе
ОбщегоНазначенияКлиентСервер.СообщитьПользователю(СтатусЗавершения.СообщениеОбОшибке);
ПерейтиДалее = Ложь;
КонецЕсли;
КонецПроцедуры
&НаКлиенте &НаКлиенте
Процедура ПослеУдаленияРазрешений(Результат, УзелИнформационнойБазы) Экспорт Процедура ПослеУдаленияРазрешений(Результат, УзелИнформационнойБазы) Экспорт
@@ -1,7 +1,7 @@
'use strict' 'use strict'
// Example: // Example:
// wscript.exe <this-file> /ConnectionString:"File=""C:\1c\db\ssl\master"";Usr=""Администратор"";Pwd=""" /COMConnectorName:"v83.COMConnector" /FixFileNames:"" /RemoveFixNames:"e16605f0-ddc8-4ed2-be25-d572043a1a32" // wscript.exe <this-file> /ConnectionString:"File='C:\1c\db\ssl\master';Usr='Администратор';Pwd=''" /COMConnectorName:"v83.COMConnector" /FixFileNames:"" /RemoveFixNames:"e16605f0-ddc8-4ed2-be25-d572043a1a32"
try { try {
var ConnectionString = WScript.Arguments.Named.Item('ConnectionString') var ConnectionString = WScript.Arguments.Named.Item('ConnectionString')
@@ -239,7 +239,6 @@
Если ПисьмоHTML Тогда Если ПисьмоHTML Тогда
Если СтруктураВложений.Количество() > 0 Тогда Если СтруктураВложений.Количество() > 0 Тогда
// "Прокидываем" вложенные картинки.
ТелоПисьма = Новый Структура(); ТелоПисьма = Новый Структура();
ТелоПисьма.Вставить("ТекстHTML", РезультатТекст); ТелоПисьма.Вставить("ТекстHTML", РезультатТекст);
ТелоПисьма.Вставить("СтруктураВложений", СтруктураВложений); ТелоПисьма.Вставить("СтруктураВложений", СтруктураВложений);
@@ -213,23 +213,19 @@
// Если вид транспорта не указан (ВидТранспортаОбмена = Неопределено), // Если вид транспорта не указан (ВидТранспортаОбмена = Неопределено),
// то получает настройки всех видов транспорта, заведенных в системе. // то получает настройки всех видов транспорта, заведенных в системе.
// //
// Параметры:
// Нет.
//
// Возвращаемое значение:
//
//
Функция НастройкиТранспорта(Знач Корреспондент, Знач ВидТранспортаОбмена = Неопределено) Экспорт Функция НастройкиТранспорта(Знач Корреспондент, Знач ВидТранспортаОбмена = Неопределено) Экспорт
УстановитьПривилегированныйРежим(Истина); УстановитьПривилегированныйРежим(Истина);
Если ОбщегоНазначения.РазделениеВключено() МенеджерЗаписи = СоздатьМенеджерЗаписи();
И ОбщегоНазначения.ДоступноИспользованиеРазделенныхДанных() Тогда МенеджерЗаписи.Корреспондент = Корреспондент;
МенеджерЗаписи.Прочитать();
Возврат РегистрыСведений["НастройкиТранспортаОбменаОбластиДанных"].НастройкиТранспорта(Корреспондент);
Иначе
Если МенеджерЗаписи.Выбран() Тогда
Возврат НастройкиТранспортаОбмена(Корреспондент, ВидТранспортаОбмена); Возврат НастройкиТранспортаОбмена(Корреспондент, ВидТранспортаОбмена);
ИначеЕсли ОбщегоНазначения.РазделениеВключено()
И ОбщегоНазначения.ДоступноИспользованиеРазделенныхДанных() Тогда
Возврат РегистрыСведений["НастройкиТранспортаОбменаОбластиДанных"].НастройкиТранспорта(Корреспондент);
КонецЕсли; КонецЕсли;
КонецФункции КонецФункции
@@ -241,7 +237,22 @@
// Возвращаемое значение функции. // Возвращаемое значение функции.
ВидТранспортаСообщений = Неопределено; ВидТранспортаСообщений = Неопределено;
Если ОбщегоНазначения.РазделениеВключено() Запрос = Новый Запрос(
"ВЫБРАТЬ
| НастройкиТранспорта.ВидТранспортаСообщенийОбменаПоУмолчанию КАК ВидТранспортаСообщенийОбменаПоУмолчанию
|ИЗ
| РегистрСведений.НастройкиТранспортаОбменаДанными КАК НастройкиТранспорта
|ГДЕ
| НастройкиТранспорта.Корреспондент = &Корреспондент");
Запрос.УстановитьПараметр("Корреспондент", Корреспондент);
Выборка = Запрос.Выполнить().Выбрать();
Если Выборка.Следующий() Тогда
ВидТранспортаСообщений = Выборка.ВидТранспортаСообщенийОбменаПоУмолчанию;
КонецЕсли;
Если ВидТранспортаСообщений = Неопределено
И ОбщегоНазначения.РазделениеВключено()
И ОбщегоНазначения.ДоступноИспользованиеРазделенныхДанных() Тогда И ОбщегоНазначения.ДоступноИспользованиеРазделенныхДанных() Тогда
Запрос = Новый Запрос( Запрос = Новый Запрос(
"ВЫБРАТЬ "ВЫБРАТЬ
@@ -252,20 +263,13 @@
| ПО (НастройкиТранспортаОбластейДанных.КонечнаяТочкаКорреспондента = НастройкиТранспортаОбластиДанных.КонечнаяТочкаКорреспондента) | ПО (НастройкиТранспортаОбластейДанных.КонечнаяТочкаКорреспондента = НастройкиТранспортаОбластиДанных.КонечнаяТочкаКорреспондента)
|ГДЕ |ГДЕ
| НастройкиТранспортаОбластиДанных.Корреспондент = &Корреспондент"); | НастройкиТранспортаОбластиДанных.Корреспондент = &Корреспондент");
Иначе Запрос.УстановитьПараметр("Корреспондент", Корреспондент);
Запрос = Новый Запрос(
"ВЫБРАТЬ Выборка = Запрос.Выполнить().Выбрать();
| НастройкиТранспорта.ВидТранспортаСообщенийОбменаПоУмолчанию КАК ВидТранспортаСообщенийОбменаПоУмолчанию Если Выборка.Следующий() Тогда
|ИЗ ВидТранспортаСообщений = Выборка.ВидТранспортаСообщенийОбменаПоУмолчанию;
| РегистрСведений.НастройкиТранспортаОбменаДанными КАК НастройкиТранспорта КонецЕсли;
|ГДЕ
| НастройкиТранспорта.Корреспондент = &Корреспондент");
КонецЕсли;
Запрос.УстановитьПараметр("Корреспондент", Корреспондент);
Выборка = Запрос.Выполнить().Выбрать();
Если Выборка.Следующий() Тогда
ВидТранспортаСообщений = Выборка.ВидТранспортаСообщенийОбменаПоУмолчанию;
КонецЕсли; КонецЕсли;
Возврат ВидТранспортаСообщений; Возврат ВидТранспортаСообщений;
@@ -229,6 +229,15 @@
Иначе Иначе
ДопСвойстваНастроек = НовыеНастройкиКД.ДополнительныеСвойства; ДопСвойстваНастроек = НовыеНастройкиКД.ДополнительныеСвойства;
КонецЕсли; КонецЕсли;
Если Форма.ТипФормыОтчета = ТипФормыОтчета.Основная
И (Форма.РежимРасшифровки
Или (Форма.КлючТекущегоВарианта <> "Main"
И Форма.КлючТекущегоВарианта <> "Основной")) Тогда
ДопСвойстваНастроек.Вставить("ОтчетИнициализирован", Истина);
КонецЕсли;
ЗагруженнаяСхема = ОбщегоНазначенияКлиентСервер.СвойствоСтруктуры(ДопСвойстваНастроек, "СхемаКомпоновкиДанных"); ЗагруженнаяСхема = ОбщегоНазначенияКлиентСервер.СвойствоСтруктуры(ДопСвойстваНастроек, "СхемаКомпоновкиДанных");
Если ТипЗнч(ЗагруженнаяСхема) = Тип("ДвоичныеДанные") Тогда Если ТипЗнч(ЗагруженнаяСхема) = Тип("ДвоичныеДанные") Тогда
ЭтоЗагруженнаяСхема = Истина; ЭтоЗагруженнаяСхема = Истина;
@@ -3353,6 +3353,93 @@
<value>true</value> <value>true</value>
</right> </right>
</object> </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> <object>
<name>InformationRegister.УдалитьЗамерыВремени3</name> <name>InformationRegister.УдалитьЗамерыВремени3</name>
<right> <right>
@@ -5163,93 +5250,6 @@
<value>true</value> <value>true</value>
</right> </right>
</object> </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> <object>
<name>DataProcessor.ОценкаПроизводительности.Command.НастройкиОценкиПроизводительности</name> <name>DataProcessor.ОценкаПроизводительности.Command.НастройкиОценкиПроизводительности</name>
<right> <right>
@@ -28,6 +28,37 @@
<value>true</value> <value>true</value>
</right> </right>
</object> </object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<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>Output</name>
<value>true</value>
</right>
</object>
<object> <object>
<name>Catalog.РассылкиОтчетов</name> <name>Catalog.РассылкиОтчетов</name>
<right> <right>
@@ -76,37 +107,6 @@
<value>true</value> <value>true</value>
</right> </right>
</object> </object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<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>Output</name>
<value>true</value>
</right>
</object>
<restrictionTemplate> <restrictionTemplate>
<name>ДляОбъекта(ПолеОбъекта)</name> <name>ДляОбъекта(ПолеОбъекта)</name>
<condition>// ДляОбъекта(ПолеОбъекта = "") <condition>// ДляОбъекта(ПолеОбъекта = "")
@@ -4480,6 +4480,45 @@
<value>false</value> <value>false</value>
</right> </right>
</object> </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> <object>
<name>Catalog.РассылкиОтчетов</name> <name>Catalog.РассылкиОтчетов</name>
<right> <right>
@@ -6856,45 +6895,6 @@
<value>false</value> <value>false</value>
</right> </right>
</object> </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> <object>
<name>DataProcessor.ОценкаПроизводительности.Command.НастройкиОценкиПроизводительности</name> <name>DataProcessor.ОценкаПроизводительности.Command.НастройкиОценкиПроизводительности</name>
<right> <right>
@@ -3,13 +3,6 @@
<setForNewObjects>false</setForNewObjects> <setForNewObjects>false</setForNewObjects>
<setForAttributesByDefault>true</setForAttributesByDefault> <setForAttributesByDefault>true</setForAttributesByDefault>
<independentRightsOfChildObjects>false</independentRightsOfChildObjects> <independentRightsOfChildObjects>false</independentRightsOfChildObjects>
<object>
<name>DataProcessor.ЖурналРегистрации.Command.ЖурналРегистрации</name>
<right>
<name>View</name>
<value>true</value>
</right>
</object>
<object> <object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name> <name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right> <right>
@@ -41,6 +34,13 @@
<value>true</value> <value>true</value>
</right> </right>
</object> </object>
<object>
<name>DataProcessor.ЖурналРегистрации.Command.ЖурналРегистрации</name>
<right>
<name>View</name>
<value>true</value>
</right>
</object>
<object> <object>
<name>DataProcessor.ЖурналРегистрации</name> <name>DataProcessor.ЖурналРегистрации</name>
<right> <right>