3_0_1_331

SSL/src/Catalogs/ВнешниеКомпоненты/Forms/ФормаЭлемента/Module.bsl

@@ -262,8 +262,8 @@
 				           |Необходимо указать zip-архив с внешней компонентой.
 				           |Подробнее:'"),
 				ОписаниеОшибки),
-			Новый ФорматированнаяСтрока("http://its.1c.ru/db/metodtorg/content/3221/hdoc",,,, 
-				"http://its.1c.ru/db/metodtorg/content/3221/hdoc"), ".");
+			Новый ФорматированнаяСтрока("https://its.1c.ru/db/metod8dev/content/3221",,,, 
+				"https://its.1c.ru/db/metod8dev/content/3221"), ".");
 			
 		ПоказатьПредупреждение(Оповещение, СтрокаСПредупреждением);
 	КонецЕсли;

SSL/src/CommonModules/АдресныйКлассификаторВМоделиСервисаСлужебный/Module.bsl

@@ -190,7 +190,7 @@
 		КонецЦикла;
 		
 		Если СубъектыРФ.Количество() > 0 Тогда
-			АдресныйКлассификаторСлужебный.ЗагрузитьКлассификаторАдресов(СубъектыРФ, ОписаниеФайлов, Ложь);
+			АдресныйКлассификаторСлужебный.ЗагрузитьКлассификаторАдресов(СубъектыРФ, ОписаниеФайлов, Истина, Истина);
 		КонецЕсли;
 		
 	Исключение

SSL/src/CommonModules/АдресныйКлассификаторСлужебный/Module.bsl

@@ -1016,7 +1016,10 @@
 					КодКЛАДР = "0" + КодКЛАДР + "00";
 				ИначеЕсли СтрДлина(КодКЛАДР) = 15 Тогда
 					КодКЛАДР = КодКЛАДР + "00"; // добавляем признак актуальности
+				ИначеЕсли СтрДлина(КодКЛАДР) = 16 Тогда
+					КодКЛАДР = "0" + КодКЛАДР;
 				КонецЕсли;
+				
 				Результат.КодыАдреса.КодКЛАДР = КодКЛАДР;
 				СформироватьКодыКЛАДР(КодКЛАДР, Адрес, Результат.КодыКЛАДР);
 				КодКЛАДРЗаполнены = Истина;
@@ -1302,7 +1305,7 @@
 //                                                        хранилище.
 //    ОповещатьОПрогрессе - Булево      - Флаг оповещения о прогрессе (см ДлительныеОперации.СообщитьПрогресс).
 //
-Процедура ЗагрузитьКлассификаторАдресов(КодыСубъектовРФ, ОписаниеФайлов, ОповещатьОПрогрессе = Истина, ЗагружатьИсториюИзменений = Ложь) Экспорт
+Процедура ЗагрузитьКлассификаторАдресов(КодыСубъектовРФ, ОписаниеФайлов, ОповещатьОПрогрессе = Истина, ЗагружатьИсториюИзменений = Ложь, ЗагружатьПорциями = Ложь) Экспорт
 	
 	ДатаЗагрузки = ТекущаяУниверсальнаяДата();
 	
@@ -1410,11 +1413,11 @@
 			
 			ВерсияСубъектаРФ = ИнформацияОЗагрузкеВерсии(СубъектРФ).Версия;
 			
-			ЗагрузитьАдресныеОбъекты(СубъектРФ, КаталогФайлов, СлужебныеАдресныеСведения.Сведения);
-			ЗагрузитьДомаЗданияСтроения(СубъектРФ, КаталогФайлов, СлужебныеАдресныеСведения.Сведения);
+			ЗагрузитьАдресныеОбъекты(СубъектРФ, КаталогФайлов, ЗагружатьПорциями);
+			ЗагрузитьДомаЗданияСтроения(СубъектРФ, КаталогФайлов, ЗагружатьПорциями);
 			
 			Если ЗагружатьИсториюИзменений Тогда
-				ЗагрузитьИсториюАдресныхОбъектов(СубъектРФ, КаталогФайлов, СлужебныеАдресныеСведения.Сведения);
+				ЗагрузитьИсториюАдресныхОбъектов(СубъектРФ, КаталогФайлов, ЗагружатьПорциями);
 				ЗагрузитьПричиныИзмененияАдреса(СубъектРФ, КаталогФайлов, СлужебныеАдресныеСведения.Сведения);
 			КонецЕсли;
 			
@@ -3134,7 +3137,7 @@
 
 // Заполнение адреса по индексу из загруженных данных.
 // 
-Процедура ЗаполнитьАдресаПоПочтовомуИндексуКлассификатораВнутр(Результат, Индекс, ДополнительныеПараметры)
+Процедура ЗаполнитьАдресаПоПочтовомуИндексуКлассификатораВнутр(Результат, ПочтовыйИндекс, ДополнительныеПараметры)
 	
 	ТекстЗапроса = "ВЫБРАТЬ
 		|	ДомаЗданияСтроения.АдресныйОбъект КАК Идентификатор
@@ -3174,7 +3177,7 @@
 		|;
 		|
 		|////////////////////////////////////////////////////////////////////////////////
-		|ВЫБРАТЬ ПЕРВЫЕ 200
+		|ВЫБРАТЬ ПЕРВЫЕ 500
 		|	ЛОЖЬ КАК Муниципальный,
 		|	АдресныеОбъекты.Идентификатор КАК Идентификатор,
 		|	АдресныеОбъекты.Наименование + "" "" + АдресныеОбъекты.Сокращение + ВЫБОР
@@ -3215,7 +3218,7 @@
 		|
 		|ОБЪЕДИНИТЬ ВСЕ
 		|
-		|ВЫБРАТЬ ПЕРВЫЕ 200
+		|ВЫБРАТЬ ПЕРВЫЕ 500
 		|	ИСТИНА,
 		|	АдресныеОбъекты.Идентификатор,
 		|	АдресныеОбъекты.Наименование + "" "" + АдресныеОбъекты.Сокращение + ВЫБОР
@@ -3257,10 +3260,22 @@
 		|УПОРЯДОЧИТЬ ПО
 		|	Представление";
 	
-	
 	Запрос = Новый Запрос(ТекстЗапроса);
-	Запрос.УстановитьПараметр("ПочтовыйИндекс", Индекс);
-	Результат.Данные = Запрос.Выполнить().Выгрузить();
+	Запрос.УстановитьПараметр("ПочтовыйИндекс", ПочтовыйИндекс);
+	Данные = Запрос.Выполнить().Выгрузить();
+	
+	КэшПредставлений = Новый Соответствие;
+	Индекс = 0;
+	Пока Индекс < Данные.Количество() Цикл
+		Если КэшПредставлений.Получить(Данные.Получить(Индекс).Представление) <> Неопределено Тогда
+			Данные.Удалить(Индекс);
+		Иначе
+			КэшПредставлений.Вставить(Данные.Получить(Индекс).Представление, Истина);
+			Индекс = Индекс + 1;
+		КонецЕсли;
+	КонецЦикла;
+	
+	Результат.Данные = Данные;
 	
 КонецПроцедуры
 
@@ -5353,10 +5368,7 @@
 	Возврат Результат;
 КонецФункции
 
-Процедура ЗагрузитьАдресныеОбъекты(КодСубъектаРФ, КаталогФайлов, ВидыСведений)
-	
-	Набор = РегистрыСведений.АдресныеОбъекты.СоздатьНаборЗаписей();
-	Набор.Отбор.КодСубъектаРФ.Установить(КодСубъектаРФ);
+Процедура ЗагрузитьАдресныеОбъекты(КодСубъектаРФ, КаталогФайлов, ЗагружатьПорциями)
 	
 	ФайлЗагрузки = ФайлЗагрузкиСубъектаРФ(КодСубъектаРФ, КаталогФайлов, "ADDROBJ", "AddressObjects");
 	
@@ -5366,66 +5378,119 @@
 	КонецЕсли;
 	
 	ТекущаяЗапись =  ФайлЗагрузки.ФайлЧтения;
-	Пока ТекущаяЗапись.Прочитать() Цикл
+	Замещать = Истина;
+	КоличествоЗаписейВНаборе = 0;
+	РазмерПорции = МаксимальныйРазмерНабораЗаписей();
 	
-		Если ТекущаяЗапись.ТипУзла <> ТипУзлаXML.НачалоЭлемента Тогда
-			Продолжить;
-		КонецЕсли;
+	Набор = РегистрыСведений.АдресныеОбъекты.СоздатьНаборЗаписей();
+	Набор.Отбор.КодСубъектаРФ.Установить(КодСубъектаРФ);
 	
-		Запись = Набор.Добавить();
+	Попытка
 	
-		Запись.КодСубъектаРФ = КодСубъектаРФ;
-		Запись.Уровень       = ТекущаяЗапись.ЗначениеАтрибута("AOLEVEL");
-		Запись.Идентификатор = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("AOGUID"));
-		Если Запись.Уровень > 1 Тогда
-			Запись.РодительскийИдентификатор              = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("PARENTGUID"));
-			Запись.МуниципальныйРодительскийИдентификатор = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("PARENTGUIDMUN"));
-		КонецЕсли;
+		Пока ТекущаяЗапись.Прочитать() Цикл
 			
-		Запись.Наименование               = ТекущаяЗапись.ЗначениеАтрибута("FORMALNAME");
-		Запись.Сокращение                 = ТекущаяЗапись.ЗначениеАтрибута("SHORTNAME");
-		Запись.ДополнительныеАдресныеСведения = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("EXTRAGUID"));
-		Запись.КодКЛАДР                   = ТекущаяЗапись.ЗначениеАтрибута("CODE");
-	КонецЦикла;
+			Если ТекущаяЗапись.ТипУзла <> ТипУзлаXML.НачалоЭлемента Тогда
+				Продолжить;
+			КонецЕсли;
 			
-	ОбновлениеИнформационнойБазы.ЗаписатьДанные(Набор);
-	ЗакрытьФайлЗагрузкиСубъектаРФ(ФайлЗагрузки);
+			Запись = Набор.Добавить();
+			
+			Запись.КодСубъектаРФ = КодСубъектаРФ;
+			Запись.Уровень       = ТекущаяЗапись.ЗначениеАтрибута("AOLEVEL");
+			Запись.Идентификатор = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("AOGUID"));
+			Если Запись.Уровень > 1 Тогда
+				Запись.РодительскийИдентификатор              = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("PARENTGUID"));
+				Запись.МуниципальныйРодительскийИдентификатор = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("PARENTGUIDMUN"));
+			КонецЕсли;
+			
+			Запись.Наименование               = ТекущаяЗапись.ЗначениеАтрибута("FORMALNAME");
+			Запись.Сокращение                 = ТекущаяЗапись.ЗначениеАтрибута("SHORTNAME");
+			Запись.ДополнительныеАдресныеСведения = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("EXTRAGUID"));
+			Запись.КодКЛАДР                   = ТекущаяЗапись.ЗначениеАтрибута("CODE");
+			
+			Если ЗагружатьПорциями Тогда
+				Если КоличествоЗаписейВНаборе > РазмерПорции Тогда
+					
+					ОбновлениеИнформационнойБазы.ЗаписатьНаборЗаписей(Набор, Замещать);
+					Замещать = Ложь;
+					КоличествоЗаписейВНаборе = 0;
+					
+					Набор = РегистрыСведений.АдресныеОбъекты.СоздатьНаборЗаписей();
+					Набор.Отбор.КодСубъектаРФ.Установить(КодСубъектаРФ);
+					
+				Иначе
+					КоличествоЗаписейВНаборе = КоличествоЗаписейВНаборе + 1;
+				КонецЕсли;
+			КонецЕсли;
+			
+		КонецЦикла;
+		
+		ОбновлениеИнформационнойБазы.ЗаписатьНаборЗаписей(Набор, Замещать);
+		ЗакрытьФайлЗагрузкиСубъектаРФ(ФайлЗагрузки);
+	Исключение
+		
+		ЗакрытьФайлЗагрузкиСубъектаРФ(ФайлЗагрузки);
+		ВызватьИсключение;
+	КонецПопытки;
 	
 КонецПроцедуры
 
-Процедура ЗагрузитьДомаЗданияСтроения(КодСубъектаРФ, КаталогФайлов, ВидыСведений)
-	
-	ФайлЗагрузки = ФайлЗагрузкиСубъектаРФ(КодСубъектаРФ, КаталогФайлов, "HOUSE", "Houses");
-	ЗагрузитьДомаЗданияСтроенияОднимНабором(КодСубъектаРФ, ФайлЗагрузки);
-	
-КонецПроцедуры
-
-Процедура ЗагрузитьДомаЗданияСтроенияОднимНабором(КодСубъектаРФ, ФайлЗагрузки)
+Процедура ЗагрузитьДомаЗданияСтроения(КодСубъектаРФ, КаталогФайлов, ЗагружатьПорциями)
 	
 	Сжатие = Новый СжатиеДанных(9);
+	ФайлЗагрузки = ФайлЗагрузкиСубъектаРФ(КодСубъектаРФ, КаталогФайлов, "HOUSE", "Houses");
+	
+	ТекущаяЗапись = ФайлЗагрузки.ФайлЧтения;
 	
 	Набор = РегистрыСведений.ДомаЗданияСтроения.СоздатьНаборЗаписей();
 	Набор.Отбор.КодСубъектаРФ.Установить(КодСубъектаРФ);
 	
-	ТекущаяЗапись = ФайлЗагрузки.ФайлЧтения;
+	Замещать = Истина;
+	КоличествоЗаписейВНаборе = 0;
+	РазмерПорции = МаксимальныйРазмерНабораЗаписей();
 	
-	Пока ТекущаяЗапись.Прочитать() Цикл
+	Попытка
 		
-		Если ТекущаяЗапись.ТипУзла <> ТипУзлаXML.НачалоЭлемента Тогда
-			Продолжить;
-		КонецЕсли;
+		Пока ТекущаяЗапись.Прочитать() Цикл
 			
-		Запись = Набор.Добавить();
+			Если ТекущаяЗапись.ТипУзла <> ТипУзлаXML.НачалоЭлемента Тогда
+				Продолжить;
+			КонецЕсли;
 			
-		Запись.КодСубъектаРФ  = КодСубъектаРФ;
-		Запись.АдресныйОбъект = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("AOGUID"));
-		Запись.ДополнительныеАдресныеСведения = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("EXTRAGUID"));
-		Запись.Строения = Новый ХранилищеЗначения(ТекущаяЗапись.ЗначениеАтрибута("BUILDINGS"), Сжатие);
+			Запись = Набор.Добавить();
 			
-	КонецЦикла;
+			Запись.КодСубъектаРФ  = КодСубъектаРФ;
+			Запись.АдресныйОбъект = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("AOGUID"));
+			Запись.ДополнительныеАдресныеСведения = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("EXTRAGUID"));
+			Запись.Строения = Новый ХранилищеЗначения(ТекущаяЗапись.ЗначениеАтрибута("BUILDINGS"), Сжатие);
 			
-	ОбновлениеИнформационнойБазы.ЗаписатьДанные(Набор);
-	ЗакрытьФайлЗагрузкиСубъектаРФ(ФайлЗагрузки);
+			Если ЗагружатьПорциями Тогда
+				Если КоличествоЗаписейВНаборе > РазмерПорции Тогда
+					
+					ОбновлениеИнформационнойБазы.ЗаписатьНаборЗаписей(Набор, Замещать);
+					Замещать = Ложь;
+					КоличествоЗаписейВНаборе = 0;
+					
+					Набор = РегистрыСведений.ДомаЗданияСтроения.СоздатьНаборЗаписей();
+					Набор.Отбор.КодСубъектаРФ.Установить(КодСубъектаРФ);
+					
+				Иначе
+					
+					КоличествоЗаписейВНаборе = КоличествоЗаписейВНаборе + 1;
+					
+				КонецЕсли;
+			КонецЕсли;
+			
+		КонецЦикла;
+		
+		ОбновлениеИнформационнойБазы.ЗаписатьНаборЗаписей(Набор, Замещать);
+		ЗакрытьФайлЗагрузкиСубъектаРФ(ФайлЗагрузки);
+		
+	Исключение
+		
+		ЗакрытьФайлЗагрузкиСубъектаРФ(ФайлЗагрузки);
+		ВызватьИсключение;
+	КонецПопытки;
 	
 КонецПроцедуры
 
@@ -5473,7 +5538,7 @@
 	
 КонецПроцедуры
 
-Процедура ЗагрузитьИсториюАдресныхОбъектов(КодСубъектаРФ, КаталогФайлов, ВидыСведений)
+Процедура ЗагрузитьИсториюАдресныхОбъектов(КодСубъектаРФ, КаталогФайлов, ЗагружатьПорциями)
 	
 	ФайлЗагрузки = ФайлЗагрузкиСубъектаРФ(КодСубъектаРФ, КаталогФайлов, "ARCHOBJ", "ArchiveObjects");
 	
@@ -5482,46 +5547,75 @@
 		Возврат;
 	КонецЕсли;
 	
+	ТекущаяЗапись = ФайлЗагрузки.ФайлЧтения;
+	
+	Замещать = Истина;
+	КоличествоЗаписейВНаборе = 0;
+	РазмерПорции = МаксимальныйРазмерНабораЗаписей();
+	
 	Набор = РегистрыСведений.ИсторияАдресныхОбъектов.СоздатьНаборЗаписей();
 	Набор.Отбор.КодСубъектаРФ.Установить(КодСубъектаРФ);
 	
-	ТекущаяЗапись =  ФайлЗагрузки.ФайлЧтения;
+	Попытка
 	
-	Пока ТекущаяЗапись.Прочитать() Цикл
+		Пока ТекущаяЗапись.Прочитать() Цикл
 			
-		Если ТекущаяЗапись.ТипУзла <> ТипУзлаXML.НачалоЭлемента Тогда
-			Продолжить;
-		КонецЕсли;
+			Если ТекущаяЗапись.ТипУзла <> ТипУзлаXML.НачалоЭлемента Тогда
+				Продолжить;
+			КонецЕсли;
 			
-		Запись = Набор.Добавить();
+			Запись = Набор.Добавить();
 			
-		Запись.КодСубъектаРФ = КодСубъектаРФ;
-		Запись.Уровень       = ТекущаяЗапись.ЗначениеАтрибута("AOLEVEL");
+			Запись.КодСубъектаРФ = КодСубъектаРФ;
+			Запись.Уровень       = ТекущаяЗапись.ЗначениеАтрибута("AOLEVEL");
 			
-		Запись.Идентификатор = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("AOID"));
-		Запись.АдресныйОбъект = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("AOGUID"));
-		Запись.РодительскийИдентификатор = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("PARENTGUID"));
-		Запись.МуниципальныйРодительскийИдентификатор = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("PARENTGUIDMUN"));
-		Запись.ДополнительныеАдресныеСведения = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("EXTRAGUID"));
+			Запись.Идентификатор = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("AOID"));
+			Запись.АдресныйОбъект = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("AOGUID"));
+			Запись.РодительскийИдентификатор = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("PARENTGUID"));
+			Запись.МуниципальныйРодительскийИдентификатор = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("PARENTGUIDMUN"));
+			Запись.ДополнительныеАдресныеСведения = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("EXTRAGUID"));
 			
-		Запись.Наименование               = ТекущаяЗапись.ЗначениеАтрибута("FORMALNAME");
-		Запись.Сокращение                 = ТекущаяЗапись.ЗначениеАтрибута("SHORTNAME");
-		Запись.Операция                   = ТекущаяЗапись.ЗначениеАтрибута("OPERSTATUS");
+			Запись.Наименование               = ТекущаяЗапись.ЗначениеАтрибута("FORMALNAME");
+			Запись.Сокращение                 = ТекущаяЗапись.ЗначениеАтрибута("SHORTNAME");
+			Запись.Операция                   = ТекущаяЗапись.ЗначениеАтрибута("OPERSTATUS");
 			
-		Если ЗначениеЗаполнено(ТекущаяЗапись.ЗначениеАтрибута("STARTDATE")) Тогда
-			Запись.НачалоДействияЗаписи      = Дата(ТекущаяЗапись.ЗначениеАтрибута("STARTDATE"));
-		КонецЕсли;
+			Если ЗначениеЗаполнено(ТекущаяЗапись.ЗначениеАтрибута("STARTDATE")) Тогда
+				Запись.НачалоДействияЗаписи      = Дата(ТекущаяЗапись.ЗначениеАтрибута("STARTDATE"));
+			КонецЕсли;
 			
-		Если ЗначениеЗаполнено(ТекущаяЗапись.ЗначениеАтрибута("ENDDATE")) Тогда
-			Запись.ОкончаниеДействияЗаписи    = Дата(ТекущаяЗапись.ЗначениеАтрибута("ENDDATE"));
-		КонецЕсли;
+			Если ЗначениеЗаполнено(ТекущаяЗапись.ЗначениеАтрибута("ENDDATE")) Тогда
+				Запись.ОкончаниеДействияЗаписи    = Дата(ТекущаяЗапись.ЗначениеАтрибута("ENDDATE"));
+			КонецЕсли;
 			
-		Запись.ТекущийКодСубъектаРФ       = КодСубъектаРФ;
+			Запись.ТекущийКодСубъектаРФ       = КодСубъектаРФ;
 			
-	КонецЦикла;
+			Если ЗагружатьПорциями Тогда
+				Если КоличествоЗаписейВНаборе > РазмерПорции Тогда
 					
-	ОбновлениеИнформационнойБазы.ЗаписатьДанные(Набор);
-	ЗакрытьФайлЗагрузкиСубъектаРФ(ФайлЗагрузки);
+					ОбновлениеИнформационнойБазы.ЗаписатьНаборЗаписей(Набор, Замещать);
+					Замещать = Ложь;
+					КоличествоЗаписейВНаборе = 0;
+					
+					Набор = РегистрыСведений.ИсторияАдресныхОбъектов.СоздатьНаборЗаписей();
+					Набор.Отбор.КодСубъектаРФ.Установить(КодСубъектаРФ);
+					
+				Иначе
+					
+					КоличествоЗаписейВНаборе = КоличествоЗаписейВНаборе + 1;
+					
+				КонецЕсли;
+			КонецЕсли;
+			
+		КонецЦикла;
+	
+		ОбновлениеИнформационнойБазы.ЗаписатьНаборЗаписей(Набор, Замещать);
+		ЗакрытьФайлЗагрузкиСубъектаРФ(ФайлЗагрузки);
+		
+	Исключение
+		
+		ЗакрытьФайлЗагрузкиСубъектаРФ(ФайлЗагрузки);
+		ВызватьИсключение;
+	КонецПопытки;
 	
 КонецПроцедуры
 
@@ -7104,6 +7198,10 @@
 	Возврат СтрНайти(ВРег(Адрес),"РЕГИОН=") > 0;
 КонецФункции
 
+Функция МаксимальныйРазмерНабораЗаписей()
+	Возврат 3000;
+КонецФункции
+
 #КонецОбласти
 
 #КонецОбласти

SSL/src/CommonModules/ВариантыОтчетов/Module.bsl

@@ -4833,11 +4833,9 @@
 		Если ЭтоПредопределенный Тогда
 			ТекстОшибки = ТекстОшибки + Символы.ПС
 				+ НСтр("ru = 'Подробнее - см. процедуру ""НастроитьВариантыОтчетов"" модуля ""ВариантыОтчетовПереопределяемый"".'");
-			Уровень = ?(ВариантОбъект.Размещение.Количество() > 0, УровеньЖурналаРегистрации.Ошибка, УровеньЖурналаРегистрации.Информация);
-			ЗаписатьВЖурнал(Уровень, ТекстОшибки, ВариантОбъект.Ссылка);
-		Иначе
-			ЗаписатьВЖурнал(УровеньЖурналаРегистрации.Информация, ТекстОшибки, ВариантОбъект.Ссылка);
 		КонецЕсли;
+		ЗаписатьВЖурнал(УровеньЖурналаРегистрации.Информация, ТекстОшибки, ВариантОбъект.Ссылка);
+		
 		Возврат ТребуетсяЗапись; // Возникла проблема.
 	КонецЕсли;
 	

SSL/src/CommonModules/ОбменДаннымиXDTOСервер/Module.bsl

@@ -1460,11 +1460,25 @@
 					// Задача: получение ссылки.
 					// Идентификация: по УИД или УИД + поля поиска.
 					// Объект с полученной ссылкой (или с таким публичным идентификатором) существует.
+					ЗаписатьПриНеобходимостиПубличныйИдентификатор(
+						ДанныеИБ,
+						ПолученныеДанныеСсылка,
+						ДанныеXDTO.Ссылка.Значение,
+						КомпонентыОбмена.УзелКорреспондента,
+						ПравилоКонвертации);
+						
 					Возврат ДанныеИБ.Ссылка;
 				ИначеЕсли ВариантИдентификации = "ПоУникальномуИдентификатору" Тогда
 					// Задача: получение ссылки.
 					// Идентификация: по УИД.
 					// Объект с полученной ссылкой (или с таким публичным идентификатором) не найден.
+					ЗаписатьПриНеобходимостиПубличныйИдентификатор(
+						ДанныеИБ,
+						ПолученныеДанныеСсылка,
+						ДанныеXDTO.Ссылка.Значение,
+						КомпонентыОбмена.УзелКорреспондента,
+						ПравилоКонвертации);
+					
 					Возврат ПолученныеДанныеСсылка;
 				КонецЕсли;
 				

SSL/src/CommonModules/ОбновлениеИнформационнойБазы/Module.bsl

@@ -355,6 +355,7 @@
 		ПараметрыСеанса.ПараметрыОбработчикаОбновления = Новый ФиксированнаяСтруктура(НовыеПараметрыСеанса);
 	КонецЕсли;
 	
+	КопияДанных = Данные;
 	Если ДополнительныеПараметры = Неопределено Тогда
 		ДополнительныеПараметры = ДополнительныеПараметрыОтметкиОбработки();
 	КонецЕсли;
@@ -413,18 +414,23 @@
 			
 			Если ОбщегоНазначения.ЭтоРегистрСведений(МетаданныеОбъекта)
 				И МетаданныеОбъекта.РежимЗаписи = Метаданные.СвойстваОбъектов.РежимЗаписиРегистра.Независимый Тогда
-				
-				УстановитьНедостающиеОтборыВНаборе(Данные, МетаданныеОбъекта, Данные.Отбор);
+				Набор = ОбщегоНазначения.МенеджерОбъектаПоПолномуИмени(МетаданныеОбъекта.ПолноеИмя()).СоздатьНаборЗаписей();
+				Для Каждого ЭлементОтбора Из Данные.Отбор Цикл
+					Набор.Отбор[ЭлементОтбора.Имя].Значение = ЭлементОтбора.Значение;
+					Набор.Отбор[ЭлементОтбора.Имя].Использование = ЭлементОтбора.Использование;
+				КонецЦикла;
+				УстановитьНедостающиеОтборыВНаборе(Набор, МетаданныеОбъекта, Данные.Отбор);
 			ИначеЕсли ОбщегоНазначения.ЭтоОбъектСсылочногоТипа(МетаданныеОбъекта)
 				И Не ОбщегоНазначения.ЭтоСсылка(ТипЗначенияОбъекта)
 				И Данные.ЭтоНовый() Тогда
 				
 				Возврат;
-				
+			Иначе
+				Набор = Данные;
 			КонецЕсли;
 			
-			ПланыОбмена.УдалитьРегистрациюИзменений(Узел, Данные);
-			
+			ПланыОбмена.УдалитьРегистрациюИзменений(Узел, Набор);
+			КопияДанных = Набор;
 		Иначе
 			Для Каждого ЭлементМассива Из Данные Цикл
 				ПланыОбмена.УдалитьРегистрациюИзменений(Узел, ЭлементМассива);
@@ -434,7 +440,7 @@
 	КонецЕсли;
 	
 	Если Не ОбщегоНазначения.ЭтоПодчиненныйУзелРИБ() Тогда
-		РегистрыСведений.ДанныеОбработанныеВЦентральномУзлеРИБ.ОтметитьВыполнениеОбработки(Очередь, Данные, ДополнительныеПараметры); 
+		РегистрыСведений.ДанныеОбработанныеВЦентральномУзлеРИБ.ОтметитьВыполнениеОбработки(Очередь, КопияДанных, ДополнительныеПараметры); 
 	КонецЕсли;
 	
 КонецПроцедуры

SSL/src/CommonModules/ОбновлениеИнформационнойБазыБСП/Module.bsl

@@ -32,7 +32,7 @@
 Процедура ПриДобавленииПодсистемы(Описание) Экспорт
 	
 	Описание.Имя    = "СтандартныеПодсистемы";
-	Описание.Версия = "3.0.1.323";
+	Описание.Версия = "3.0.1.331";
 	Описание.РежимВыполненияОтложенныхОбработчиков = "Параллельно";
 	Описание.ПараллельноеОтложенноеОбновлениеСВерсии = "2.3.3.0";
 	

SSL/src/CommonModules/ОбновлениеКонфигурацииКлиент/Module.bsl

@@ -363,6 +363,7 @@
 	
 	ИмяИсполняемогоФайлаКонфигуратора = КаталогПрограммы + СтандартныеПодсистемыКлиент.ИмяИсполняемогоФайлаПриложения(Истина);
 	ИмяИсполняемогоФайлаКлиента = КаталогПрограммы + СтандартныеПодсистемыКлиент.ИмяИсполняемогоФайлаПриложения();
+	ПутьКCOMСоединителю = КаталогПрограммы() + "comcntr.dll";
 	
 	ИспользоватьCOMСоединитель = Не (ПараметрыРаботыКлиента.ЭтоБазоваяВерсияКонфигурации Или ПараметрыРаботыКлиента.ЭтоУчебнаяПлатформа);
 	
@@ -411,6 +412,7 @@
 	ОбластьПараметров = ТекстыМакетов.ОбластьПараметров;
 	ВставитьПараметрСкрипта("ИмяИсполняемогоФайлаКонфигуратора" , ИмяИсполняемогоФайлаКонфигуратора          , Истина, ОбластьПараметров);
 	ВставитьПараметрСкрипта("ИмяИсполняемогоФайлаКлиента"       , ИмяИсполняемогоФайлаКлиента                , Истина, ОбластьПараметров);
+	ВставитьПараметрСкрипта("ПутьКCOMСоединителю"               , ПутьКCOMСоединителю                        , Истина, ОбластьПараметров);
 	ВставитьПараметрСкрипта("ПараметрПутиКИнформационнойБазе"   , ПараметрПутиКИнформационнойБазе            , Истина, ОбластьПараметров);
 	ВставитьПараметрСкрипта("СтрокаПутиКФайлуИнформационнойБазы", СтрокаПутиКИнформационнойБазе              , Истина, ОбластьПараметров);
 	ВставитьПараметрСкрипта("СтрокаСоединенияИнформационнойБазы", СтрокаСоединенияИнформационнойБазы         , Истина, ОбластьПараметров);

SSL/src/CommonModules/ОбщегоНазначения/Module.bsl

@@ -2228,7 +2228,7 @@
 	ОбщиеПараметры.Вставить("ОтключитьИдентификаторыОбъектовМетаданных", Ложь);
 	ОбщиеПараметры.Вставить("РекомендуемыйОбъемОперативнойПамяти", 2);
 	ОбщиеПараметры.Вставить("МинимальнаяВерсияПлатформы", "8.3.12.1412");
-	ОбщиеПараметры.Вставить("РекомендуемаяВерсияПлатформы", "8.3.12.1595");
+	ОбщиеПараметры.Вставить("РекомендуемаяВерсияПлатформы", "8.3.12.1412");
 	// Устарело, следует использовать свойства МинимальнаяВерсияПлатформы и РекомендуемаяВерсияПлатформы:
 	ОбщиеПараметры.Вставить("МинимальноНеобходимаяВерсияПлатформы", "");
 	ОбщиеПараметры.Вставить("РаботаВПрограммеЗапрещена", Ложь); // Блокировать запуск, если версия ниже минимальной.

SSL/src/CommonModules/УправлениеДоступомСлужебный/Module.bsl

@@ -566,6 +566,7 @@
 	ПредопределенныеИдентификаторы = Новый Соответствие;
 	ЗначенияДоступа = Новый Массив;
 	ТипыИзмеренийРегистровКлючей = Новый Соответствие;
+	ТипыИзмеренийРегистраКлючей(ТипыИзмеренийРегистровКлючей, "КлючиДоступаКРегистрам");
 	
 	ТипыТаблицПоИменам = УправлениеДоступомСлужебныйПовтИсп.СинтаксисЯзыка().ТипыТаблиц.ПоИменам;
 	ЗначенияДоступа.Добавить(ИмяТипаСсылкиXML(Метаданные.Справочники.КлючиДоступа.ПолноеИмя(), ТипыТаблицПоИменам));
@@ -1288,7 +1289,7 @@
 	КонецЕсли;
 	
 	Обработчик = Обработчики.Добавить();
-	Обработчик.Версия = "3.0.1.304";
+	Обработчик.Версия = "3.0.1.330";
 	Обработчик.Процедура = "РегистрыСведений.ГруппыЗначенийДоступа.ОбработатьДанныеДляПереходаНаНовуюВерсию";
 	Обработчик.РежимВыполнения = "Отложенно";
 	Обработчик.Комментарий = НСтр("ru = 'Обновление данных по изменениям программы.'");
@@ -7338,15 +7339,7 @@
 		Возврат;
 	КонецЕсли;
 	
-	ТипыИзмерений = ТипыИзмеренийРегистровКлючей.Получить(ИмяРегистраКлючей);
-	Если ТипыИзмерений = Неопределено Тогда
-		ТипыИзмерений = Новый Структура;
-		ТипыИзмерений.Вставить("ИменаТипов", Новый Массив);
-		ТипыИзмерений.Вставить("ПоляРегистров", Новый Соответствие);
-		ТипыИзмерений.Вставить("ПоляРегистровПоТипам", Новый Соответствие);
-		ТипыИзмеренийРегистровКлючей.Вставить(ИмяРегистраКлючей, ТипыИзмерений);
-		ТипыИзмерений.ИменаТипов.Добавить("EnumRef.ДополнительныеЗначенияДоступа");
-	КонецЕсли;
+	ТипыИзмерений = ТипыИзмеренийРегистраКлючей(ТипыИзмеренийРегистровКлючей, ИмяРегистраКлючей);
 	
 	ИменаТипов           = ТипыИзмерений.ИменаТипов;
 	ПоляРегистровПоТипам = ТипыИзмерений.ПоляРегистровПоТипам;
@@ -7389,6 +7382,23 @@
 	
 КонецПроцедуры
 
+// Для функции НастройкиВнедрения и процедуры ДобавитьТипыИзмерения.
+Функция ТипыИзмеренийРегистраКлючей(ТипыИзмеренийРегистровКлючей, ИмяРегистраКлючей)
+	
+	ТипыИзмерений = ТипыИзмеренийРегистровКлючей.Получить(ИмяРегистраКлючей);
+	Если ТипыИзмерений = Неопределено Тогда
+		ТипыИзмерений = Новый Структура;
+		ТипыИзмерений.Вставить("ИменаТипов", Новый Массив);
+		ТипыИзмерений.Вставить("ПоляРегистров", Новый Соответствие);
+		ТипыИзмерений.Вставить("ПоляРегистровПоТипам", Новый Соответствие);
+		ТипыИзмеренийРегистровКлючей.Вставить(ИмяРегистраКлючей, ТипыИзмерений);
+		ТипыИзмерений.ИменаТипов.Добавить("EnumRef.ДополнительныеЗначенияДоступа");
+	КонецЕсли;
+	
+	Возврат ТипыИзмерений;
+	
+КонецФункции
+
 #Область ПроверкаДоступаПриИзменении
 
 // Для обработчиков подписок на событие ПередЗаписью.
@@ -18814,7 +18824,12 @@
 	КонецЕсли;
 	
 	Если ДополнительнаяТаблица <> Неопределено Тогда
-		ОпорныеПоля.ПоДополнительнымТаблицам.Вставить(ДополнительнаяТаблица, ИмяОпорногоПоля);
+		ИменаОпорныхПолей = ОпорныеПоля.ПоДополнительнымТаблицам.Получить(ДополнительнаяТаблица);
+		Если ИменаОпорныхПолей = Неопределено Тогда
+			ИменаОпорныхПолей = Новый Массив;
+			ОпорныеПоля.ПоДополнительнымТаблицам.Вставить(ДополнительнаяТаблица, ИменаОпорныхПолей);
+		КонецЕсли;
+		ИменаОпорныхПолей.Добавить(ИмяОпорногоПоля);
 	КонецЕсли;
 	
 	Если ОпорныеПоля.Список.НайтиПоЗначению(ИмяОпорногоПоля) = Неопределено Тогда
@@ -18855,16 +18870,18 @@
 	
 	Если СвойстваПоля <> Неопределено Тогда
 		ИмяОпорногоПоля = ОпорныеПоля.ПоСвойствамПолей.Получить(СвойстваПоля);
+		Если ИмяОпорногоПоля <> Неопределено Тогда
+			ОпорныеПоля.Список.НайтиПоЗначению(ИмяОпорногоПоля).Пометка = Истина;
+		КонецЕсли;
 	Иначе
-		ИмяОпорногоПоля = ОпорныеПоля.ПоДополнительнымТаблицам.Получить(ДополнительнаяТаблица);
+		ИменаОпорныхПолей = ОпорныеПоля.ПоДополнительнымТаблицам.Получить(ДополнительнаяТаблица);
+		Если ИменаОпорныхПолей <> Неопределено Тогда
+			Для Каждого ИмяОпорногоПоля Из ИменаОпорныхПолей Цикл
+				ОпорныеПоля.Список.НайтиПоЗначению(ИмяОпорногоПоля).Пометка = Истина;
+			КонецЦикла;
+		КонецЕсли;
 	КонецЕсли;
 	
-	Если ИмяОпорногоПоля = Неопределено Тогда
-		Возврат;
-	КонецЕсли;
-	
-	ОпорныеПоля.Список.НайтиПоЗначению(ИмяОпорногоПоля).Пометка = Истина;
-	
 КонецПроцедуры
 
 // Для процедуры ЗаполнитьГруппыПолейИДополнительныхТаблиц.
@@ -19062,6 +19079,28 @@
 				Прервать;
 			КонецЕсли;
 		КонецЦикла;
+		// Вместо простых типов сохраняется значения ТипРазрешенный или ТипЗапрещенный,
+		// поэтому сохранение запрещеного простого типа несовместимо с остальными вариантами.
+		Для Каждого Тип Из СвойстваПоля.ТипыСохраненияТипаЗапрещенный Цикл
+			Если Не ЭтоПростойТип(Тип) Тогда
+				Продолжить;
+			КонецЕсли;
+			Если Поле.ТипыСохраненияТипов.Найти(Тип)           <> Неопределено
+			 Или Поле.ТипыСохраненияТипаРазрешенный.Найти(Тип) <> Неопределено Тогда
+				Совместимо = Ложь;
+				Прервать;
+			КонецЕсли;
+		КонецЦикла;
+		Для Каждого Тип Из Поле.ТипыСохраненияТипаЗапрещенный Цикл
+			Если Не ЭтоПростойТип(Тип) Тогда
+				Продолжить;
+			КонецЕсли;
+			Если СвойстваПоля.ТипыСохраненияТипов.Найти(Тип)           <> Неопределено
+			 Или СвойстваПоля.ТипыСохраненияТипаРазрешенный.Найти(Тип) <> Неопределено Тогда
+				Совместимо = Ложь;
+				Прервать;
+			КонецЕсли;
+		КонецЦикла;
 		Если Не Совместимо Тогда
 			Продолжить;
 		КонецЕсли;
@@ -22051,7 +22090,7 @@
 			Возврат "
 			|И (Шапка?.Значение? = ЕСТЬNULL(ТипыКонфигурации?.Ссылка,
 			|						ЗНАЧЕНИЕ(Справочник.ИдентификаторыОбъектовМетаданных.ПустаяСсылка)))";
-		Иначе
+		ИначеЕсли СвойстваПоля.ТипыСохраненияТиповКонфигурации.Количество() = 0 Тогда
 			Возврат "
 			|И (Шапка?.Значение? = ЕСТЬNULL(ТипыРасширений?.Ссылка,
 			|						ЗНАЧЕНИЕ(Справочник.ИдентификаторыОбъектовРасширений.ПустаяСсылка)))";
@@ -22063,9 +22102,8 @@
 	   И КоличествоТиповПоля = 1
 	   И СвойстваПоля.ТипыСохраненияТиповПростых.Количество() = 1 Тогда
 		
-		Возврат СтрЗаменить("
-		|И (Шапка?.Значение? = ЗНАЧЕНИЕ(Перечисление.ДополнительныеЗначенияДоступа.Тип#ИмяТипа))",
-		"#ИмяТипа", СвойстваПоля.ТипыСохраненияТиповПростых[0]);
+		Возврат "
+		|И (Шапка?.Значение? = ЗНАЧЕНИЕ(Перечисление.ДополнительныеЗначенияДоступа.ТипРазрешенный))";
 	КонецЕсли;
 	
 	Если СвойстваПоля.ТипыСохраненияТипаЗапрещенный.Количество() = КоличествоТиповПоля Тогда
@@ -22113,13 +22151,11 @@
 		КонецЕсли;
 	КонецЕсли;
 	
-	ДобавитьПроверкуПростогоТипаЕслиТребуется(СвойстваПоля, СодержаниеВыбора, "Булево");
-	ДобавитьПроверкуПростогоТипаЕслиТребуется(СвойстваПоля, СодержаниеВыбора, "Число");
-	ДобавитьПроверкуПростогоТипаЕслиТребуется(СвойстваПоля, СодержаниеВыбора, "Дата");
-	ДобавитьПроверкуПростогоТипаЕслиТребуется(СвойстваПоля, СодержаниеВыбора, "Строка");
-	
 	ПроверкиПоТипам = Новый СписокЗначений;
 	
+	ДобавитьПроверкуПоТипам(ПроверкиПоТипам, СвойстваПоля.ТипыСохраненияТиповПростых,
+		"Шапка?.Значение? = ЗНАЧЕНИЕ(Перечисление.ДополнительныеЗначенияДоступа.ТипРазрешенный)");
+	
 	ДобавитьПроверкуПоТипам(ПроверкиПоТипам, СвойстваПоля.ТипыСохраненияКлючейДоступа,
 		"Шапка?.Значение? = ЕСТЬNULL(КлючиДоступаКОбъектам?.#КлючДоступаПользователейКОбъекту,
 		|					ЗНАЧЕНИЕ(Перечисление.ДополнительныеЗначенияДоступа.Null))");
@@ -22139,7 +22175,7 @@
 	КонецЕсли;
 	
 	ДобавитьПроверкуПоТипам(ПроверкиПоТипам, СвойстваПоля.ТипыСохраненияЗначений,
-		"Шапка?.Значение? = #ИмяПоляДляЗапроса");
+		"Шапка?.Значение? = #ИмяПоляДляЗапроса", , СохранениеЗначенияБулево);
 	
 	ДобавитьПроверкуПоТипам(ПроверкиПоТипам, СвойстваПоля.ТипыСохраненияПустойСсылки,
 		"Шапка?.Значение? = ЗНАЧЕНИЕ(Перечисление.ДополнительныеЗначенияДоступа.ПустаяСсылкаЛюбогоТипа)",
@@ -22199,11 +22235,11 @@
 КонецФункции
 
 // Для функции СравнениеПоля.
-Процедура ДобавитьПроверкуПоТипам(ПроверкиПоТипам, ИсходныеТипы, Проверка, ДополнительноеСвойство = "")
+Процедура ДобавитьПроверкуПоТипам(ПроверкиПоТипам, ИсходныеТипы, Проверка, ДополнительноеСвойство = "", ПропуститьБулево = Ложь)
 	
 	Типы = Новый Массив;
 	Для Каждого Тип Из ИсходныеТипы Цикл
-		Если ЭтоПростойТип(Тип) Тогда
+		Если ПропуститьБулево И Тип = Тип("Булево") Тогда
 			Продолжить;
 		КонецЕсли;
 		Типы.Добавить(Тип);
@@ -22241,21 +22277,6 @@
 	
 КонецФункции
 
-// Для функции СравнениеПоля.
-Процедура ДобавитьПроверкуПростогоТипаЕслиТребуется(СвойстваПоля, СодержаниеВыбора, ИмяТипа)
-	
-	Если Не СвойстваПоля.ТипКонечногоПоля.СодержитТип(Тип(ИмяТипа))
-	 Или СвойстваПоля.ТипыСохраненияТиповПростых.Найти(Тип(ИмяТипа)) = Неопределено Тогда
-		Возврат;
-	КонецЕсли;
-	
-	СодержаниеВыбора = СодержаниеВыбора + СтрЗаменить("
-	|КОГДА ТИПЗНАЧЕНИЯ(#ИмяПоляДляЗапроса) = ТИП(#ИмяТипа)
-	|	ТОГДА Шапка?.Значение? = ЗНАЧЕНИЕ(Перечисление.ДополнительныеЗначенияДоступа.Тип#ИмяТипа)",
-	"#ИмяТипа", ИмяТипа);
-	
-КонецПроцедуры
-
 // Для функции СравнениеПоля, ДобавитьОпорноеПоле.
 Функция ЕстьПростойТип(ОписаниеТипов)
 	

SSL/src/Configuration/Configuration.mdo

@@ -1,17 +1,17 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<mdclass:Configuration xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="a3b48aee-0990-496f-aad1-cb26ff05410f">
+<mdclass:Configuration xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="a8fecff5-53b0-4328-9740-7d333202a37b">
   <name>БиблиотекаСтандартныхПодсистем</name>
   <synonym>
     <key>ru</key>
     <value>Библиотека стандартных подсистем, редакция 3.0</value>
   </synonym>
-  <containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="12585ade-6aa5-45ed-b689-adcff9a0a93f"/>
-  <containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="490e9d23-3733-44a5-b879-d1f3e5626c4f"/>
-  <containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="0b350b79-6f1a-4bba-b861-fe7e22d4d8d3"/>
-  <containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="bfe224e0-383b-4900-aa1c-23ca26b30d76"/>
-  <containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="2e8a0073-6863-4a28-83a2-b92c20d32c16"/>
-  <containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="1bbdb79a-e814-4530-8cfb-c57ac347ecbe"/>
-  <containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="c7fa6c66-c53c-43de-884a-6cd85e1e4b9c"/>
+  <containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="60d2e11f-3bd8-44b8-ae1e-999151a09cfd"/>
+  <containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="a1ac22ae-0544-4a7b-a202-41f5d05d5c77"/>
+  <containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="4dac23f9-cbd2-424f-bceb-78b15328d6ef"/>
+  <containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="488b2d7c-de51-455f-8177-ad154b9ee8f3"/>
+  <containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="1b40f0dc-c6bf-4743-9c72-8c6b2611caed"/>
+  <containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="810ae671-e141-4ad0-800b-54dfc9e4f1d1"/>
+  <containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="3366bcd9-14a9-46d9-bb89-41a453ba578a"/>
   <defaultRunMode>ManagedApplication</defaultRunMode>
   <usePurposes>PersonalComputer</usePurposes>
   <scriptVariant>Russian</scriptVariant>
@@ -19,7 +19,7 @@
   <defaultRoles>Role.АдминистраторСистемы</defaultRoles>
   <defaultRoles>Role.ИнтерактивноеОткрытиеВнешнихОтчетовИОбработок</defaultRoles>
   <vendor>Фирма &quot;1С&quot;</vendor>
-  <version>3.0.1.323</version>
+  <version>3.0.1.331</version>
   <updateCatalogAddress>http://downloads.v8.1c.ru/tmplts/</updateCatalogAddress>
   <includeHelpInContents>true</includeHelpInContents>
   <usedMobileApplicationFunctionalities>

SSL/src/Configuration/ParentConfigurations.bin

@@ -1 +1 @@
-{6,1,1,c6f775b4-c112-4ce7-9e0f-d1b938662c6d,1,eb31683f-4ea4-4095-b537-548db21b36ee,"3.0.1.323","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",5875,1,0,a3b48aee-0990-496f-aad1-cb26ff05410f,a3b48aee-0990-496f-aad1-cb26ff05410f,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,50b0e079-5e93-41f3-8405-dda9d3c89206,1,4396625c-223a-4828-bffd-3e78760b8a42,"3.0.1.331","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",5875,1,0,a8fecff5-53b0-4328-9740-7d333202a37b,a8fecff5-53b0-4328-9740-7d333202a37b,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

SSL/src/Constants/ИспользоватьВнешнихПользователей/ValueManagerModule.bsl

@@ -37,10 +37,12 @@
 			МодульУправлениеДоступом.ОбновитьРолиПользователей(Тип("СправочникСсылка.ВнешниеПользователи"));
 			
 			МодульУправлениеДоступомСлужебный = ОбщегоНазначения.ОбщийМодуль("УправлениеДоступомСлужебный");
-			ПараметрыПланирования = МодульУправлениеДоступомСлужебный.ПараметрыПланированияОбновленияДоступа();
-			ПараметрыПланирования.ДляПользователей = Ложь;
-			ПараметрыПланирования.ДляВнешнихПользователей = Истина;
-			МодульУправлениеДоступомСлужебный.ЗапланироватьОбновлениеДоступа(, ПараметрыПланирования);
+			Если МодульУправлениеДоступомСлужебный.ОграничиватьДоступНаУровнеЗаписейУниверсально() Тогда
+				ПараметрыПланирования = МодульУправлениеДоступомСлужебный.ПараметрыПланированияОбновленияДоступа();
+				ПараметрыПланирования.ДляПользователей = Ложь;
+				ПараметрыПланирования.ДляВнешнихПользователей = Истина;
+				МодульУправлениеДоступомСлужебный.ЗапланироватьОбновлениеДоступа(, ПараметрыПланирования);
+			КонецЕсли;
 		КонецЕсли;
 		Если Значение Тогда
 			ОчиститьРеквизитПоказыватьВСпискеВыбораУВсехПользователейИБ();

SSL/src/DataProcessors/УстановкаОбновлений/Templates/МакетФайлаОбновленияКонфигурации/Template.txt

@@ -1,4 +1,5 @@
 #Область ОбластьПараметров
+
 // Параметры процедуры обновления
 var now = new Date()
 var outFileName = 'log' + now.valueOf() + '.txt' // Путь к log-файлу
@@ -7,6 +8,7 @@ var fixFileNames = [ИменаФайловИсправлений] // Пути к
 var removeFixNames = [ИменаУдаляемыхИсправлений] // Имена исправлений, которые необходимо удалить
 var v8conf = [ИмяИсполняемогоФайлаКонфигуратора] // Путь к исполняемому файлу 1С:Предприятия 8
 var v8client = [ИмяИсполняемогоФайлаКлиента] // Путь к исполняемому файлу 1С:Предприятия 8
+var v8comcntr = [ПутьКCOMСоединителю] // Путь к comcntr.dll
 var infoBasePath = [ПараметрПутиКИнформационнойБазе]
 var BaseFileName = [СтрокаПутиКФайлуИнформационнойБазы]
 var connectionString = [СтрокаСоединенияИнформационнойБазы] + ';UC=ПакетноеОбновлениеКонфигурацииИБ'
@@ -28,43 +30,12 @@ var taskNameScheduleService = [ИмяЗадачиПланировщикаЗад
 #КонецОбласти
 
 #Область ОбластьОбновленияКонфигурации
-if (useComConnector) {
-  var comConnectorCached = new ActiveXObject(comConnectorName) // для защиты от перерегистрации comConnector из других сеансов
-}
-
-// Инициализация
-var oFileSystemObject = new ActiveXObject('Scripting.FileSystemObject')
 
 var thisFileName
 var thisFileDir
 var InfoBasePassword
 var ClusterPassword
 
-if (oHTA != null) {
-  thisFileName = eval('oHTA.commandLine')
-  thisFileDir = thisFileName.substr(1, thisFileName.lastIndexOf('\\') - 1)
-  InfoBasePassword = thisFileName.substr(thisFileName.indexOf('[p1]') + 4, thisFileName.indexOf('[/p1]') - thisFileName.indexOf('[p1]') - 4)
-  ClusterPassword = thisFileName.substr(thisFileName.indexOf('[p2]') + 4, thisFileName.indexOf('[/p2]') - thisFileName.indexOf('[p2]') - 4)
-  thisFileName = thisFileName.substr(1, thisFileName.indexOf('[p1]') - 4)
-} else {
-  thisFileName = eval('WScript.ScriptFullName')
-  thisFileDir = thisFileName.substr(0, thisFileName.lastIndexOf('\\') + 1)
-  InfoBasePassword = eval('WScript.Arguments').Named.Item('p1')
-  ClusterPassword = eval('WScript.Arguments').Named.Item('p2')
-}
-
-adminName = adminName.replace(/"/g, '""')
-InfoBasePassword = fromUnicode(InfoBasePassword)
-ClusterPassword = fromUnicode(ClusterPassword)
-var infoBaseAuthorization = format('/N"{0}" /P"{1}" /WA-', adminName, InfoBasePassword)
-connectionString = format(connectionString, adminName, InfoBasePassword)
-
-var oShell = new ActiveXObject('WScript.Shell')
-oShell.CurrentDirectory = thisFileDir
-
-var errorMarker = '{ERR}'
-var successMarker = '{OK}'
-
 // Переменные состояния
 var backupCreated = false
 var connectionsDenied = false
@@ -150,7 +121,7 @@ function logFile (text, failed) {
     f = oFileSystemObject.OpenTextFile(outFileName, ForAppending, true, TristateTrue)
   } catch (e) { return }
   try {
-    var status = (failed === false ? successMarker : errorMarker)
+    var status = (failed === false ? '{OK}' : '{ERR}')
     f.WriteLine(format('{0} {1} {2}', now, status, text))
   } finally {
     try {
@@ -184,8 +155,6 @@ function appendLog () {
 
 // Инициализация
 function initialize () {
-  clearLogFile()
-  appendLog()
   log(format('Файл скрипта: {0}', thisFileName))
   log(format('Количество файлов обновления: {0}', cfgFileNames.length))
   for (var i = 0; i < cfgFileNames.length; i++) {
@@ -209,7 +178,8 @@ function finalize (success) {
 
   if (!success) {
     if (UseRestore) {
-      restoreDB() // Восстановление ИБ из временного архива
+      log('Восстановление ИБ из временного архива')
+      restoreDB()
     }
     allowConnections() // Разрешение подключений
   }
@@ -222,6 +192,7 @@ function finalize (success) {
 
 function deleteScheduleTask () {
   if (taskNameScheduleService !== '') {
+    log(format('Удаление задачи планировщика задач: "{0}"', taskNameScheduleService))
     try {
       var schedule = new ActiveXObject('Schedule.Service')
       schedule.Connect()
@@ -745,6 +716,9 @@ function GetRequired (filePath) {
 
 function fromUnicode (text) {
   var str = '';
+  if (typeof text !== 'string') {
+    return str
+  }
   for (var i = 0; i < text.length / 4; i++) {
     str = str + String.fromCharCode(text.slice(4 * i, 4 * i + 4))
   }
@@ -786,4 +760,44 @@ function addDeletePatches () {
   return result
 }
 
+function registerCOM() {
+  isSchedule = (taskNameScheduleService !== '')
+  param = isSchedule ? format('/s "{0}"', v8comcntr) : format('/n /i:user /s "{0}"', v8comcntr)
+  return runApp('regsvr32.exe', param, SW_HIDE, true)
+}
+
+if (oHTA != null) {
+  thisFileName = eval('oHTA.commandLine')
+  thisFileDir = thisFileName.substr(1, thisFileName.lastIndexOf('\\') - 1)
+  InfoBasePassword = thisFileName.substr(thisFileName.indexOf('[p1]') + 4, thisFileName.indexOf('[/p1]') - thisFileName.indexOf('[p1]') - 4)
+  ClusterPassword = thisFileName.substr(thisFileName.indexOf('[p2]') + 4, thisFileName.indexOf('[/p2]') - thisFileName.indexOf('[p2]') - 4)
+  thisFileName = thisFileName.substr(1, thisFileName.indexOf('[p1]') - 4)
+} else {
+  thisFileName = eval('WScript.ScriptFullName')
+  thisFileDir = thisFileName.substr(0, thisFileName.lastIndexOf('\\') + 1)
+  InfoBasePassword = eval('WScript.Arguments').Named.Item('p1')
+  ClusterPassword = eval('WScript.Arguments').Named.Item('p2')
+}
+
+var oShell = new ActiveXObject('WScript.Shell')
+oShell.CurrentDirectory = thisFileDir
+
+var oFileSystemObject = new ActiveXObject('Scripting.FileSystemObject')
+
+clearLogFile()
+appendLog()
+
+log(format('Используется COM соединение: {0}', useComConnector))
+
+if (useComConnector) {
+  registerCOM()
+  var comConnectorCached = new ActiveXObject(comConnectorName) // для защиты от перерегистрации comConnector из других сеансов
+}
+
+adminName = adminName.replace(/"/g, '""')
+InfoBasePassword = fromUnicode(InfoBasePassword)
+ClusterPassword = fromUnicode(ClusterPassword)
+var infoBaseAuthorization = format('/N"{0}" /P"{1}" /WA-', adminName, InfoBasePassword)
+connectionString = format(connectionString, adminName, InfoBasePassword)
+
 #КонецОбласти

SSL/src/DataProcessors/УстановкаОбновлений/Templates/НеинтерактивноеОбновлениеКонфигурации/Template.txt

@@ -29,7 +29,6 @@ function checkResult (ret) {
     return
   }
   log(format('Завершение с ошибкой. Код ошибки: {0}. Подробности см. в предыдущей записи.', ret), true)
-  setProgress('Восстановление информационной базы')
   
   finalize()
   ClearTempFiles()
@@ -42,6 +41,10 @@ function ClearTempFiles () {
   try {
     oFileSystemObject.DeleteFile(thisFileDir + '\\main.js')
     oFileSystemObject.DeleteFile(thisFileDir + '\\helpers.js')
+    oFileSystemObject.DeleteFile(thisFileDir + '\\add-delete-patches.js')
+    oFileSystemObject.DeleteFile(thisFileDir + '\\addsheduletask.js')
+    oFileSystemObject.DeleteFile(thisFileDir + '\\templog.txt')
+    oFileSystemObject.DeleteFile(thisFileDir + '\\updater.js')
   } catch (e) { }
 }
 

SSL/src/DataProcessors/УстановкаОбновлений/Templates/СкриптСозданияЗадачиПланировщикаЗадач/Template.txt

@@ -6,6 +6,9 @@ var ProgramArgs = [ПараметрыСкрипта] // Параметры, пе
 var TaskName = [ИмяЗадачи] // Имя задачи планировщика.
 var TaskDescription = [ОписаниеЗадачи] // Описание задачи планировщика.
 
+var TASK_CREATE_OR_UPDATE = 6
+var TASK_LOGON_GROUP = 4
+
 try {
   var schedule = new ActiveXObject('Schedule.Service')
   schedule.Connect()
@@ -25,7 +28,8 @@ try {
   action.Arguments = ProgramArgs
 
   var root = schedule.GetFolder('\\')
-  root.RegisterTaskDefinition(TaskName, task, 6, 'SYSTEM', undefined, 4)
+  root.RegisterTaskDefinition(TaskName, task, TASK_CREATE_OR_UPDATE, 'SYSTEM', undefined, TASK_LOGON_GROUP)
 } catch (ex) {
   WScript.Echo(ex.message)
+  WScript.Quit(1)
 }

SSL/src/Roles/АдминистраторСистемы/Rights.rights

@@ -3788,6 +3788,32 @@
 			<value>true</value>
 		</right>
 	</object>
+	<object>
+		<name>InformationRegister.АдресныеОбъекты.Command.ЗагрузитьАдресныйКлассификатор</name>
+		<right>
+			<name>View</name>
+			<value>true</value>
+		</right>
+	</object>
+	<object>
+		<name>Constant.БлокировкаОтправкиБыстрыхСообщений</name>
+		<right>
+			<name>Read</name>
+			<value>true</value>
+		</right>
+		<right>
+			<name>Update</name>
+			<value>true</value>
+		</right>
+		<right>
+			<name>View</name>
+			<value>true</value>
+		</right>
+		<right>
+			<name>Edit</name>
+			<value>true</value>
+		</right>
+	</object>
 	<object>
 		<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
 		<right>
@@ -3875,32 +3901,6 @@
 			<value>true</value>
 		</right>
 	</object>
-	<object>
-		<name>InformationRegister.АдресныеОбъекты.Command.ЗагрузитьАдресныйКлассификатор</name>
-		<right>
-			<name>View</name>
-			<value>true</value>
-		</right>
-	</object>
-	<object>
-		<name>Constant.БлокировкаОтправкиБыстрыхСообщений</name>
-		<right>
-			<name>Read</name>
-			<value>true</value>
-		</right>
-		<right>
-			<name>Update</name>
-			<value>true</value>
-		</right>
-		<right>
-			<name>View</name>
-			<value>true</value>
-		</right>
-		<right>
-			<name>Edit</name>
-			<value>true</value>
-		</right>
-	</object>
 	<object>
 		<name>InformationRegister.ПараметрыРаботыПрограммы</name>
 		<right>

SSL/src/Roles/ПолныеПрава/Rights.rights

@@ -5079,45 +5079,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.БлокировкаОтправкиБыстрыхСообщений</name>
 		<right>
@@ -5184,6 +5145,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>