2_4_2_164

SSL/src/CommonModules/ОбщегоНазначенияСлужебныйКлиент/Module.bsl

@@ -70,8 +70,6 @@
 			     |в ОбщегоНазначенияСлужебныйКлиент.УстановитьКомпоненту'"), Контекст.Местоположение);
 	КонецЕсли;
 	
-#Если ВебКлиент Тогда
-	
 	Оповещение = Новый ОписаниеОповещения(
 		"УстановитьКомпонентуПослеОтветаНаВопросОбУстановке", ЭтотОбъект, Контекст);
 	
@@ -80,12 +78,6 @@
 	
 	ОткрытьФорму("ОбщаяФорма.ВопросОбУстановкеВнешнейКомпоненты", 
 		ПараметрыФормы,,,,, Оповещение);
-
-#Иначе 
-	
-	УстановитьКомпонентуНачатьУстановку(Контекст);
-		
-#КонецЕсли
 	
 КонецПроцедуры
 
@@ -337,10 +329,31 @@
 		
 	Попытка
 		
-		ПодключаемыйМодуль = Новый("AddIn." + Контекст.СимволическоеИмя + "." + Контекст.Идентификатор);
+		Если Контекст.ИдентификаторыСозданияОбъектов.Количество() = 0 Тогда 
+			
+			ПодключаемыйМодуль = Новый("AddIn." + Контекст.СимволическоеИмя + "." + Контекст.Идентификатор);
+			
+			Если ПодключаемыйМодуль = Неопределено Тогда 
+				ВызватьИсключение НСтр("ru = 'Ошибка при создании экземпляра внешней компоненты'");
+			КонецЕсли;
+			
+		Иначе 
+			
+			ПодключаемыеМодули = Новый Соответствие;
+			Для Каждого Идентификатор Из Контекст.ИдентификаторыСозданияОбъектов Цикл 
+				
+				ПодключаемыйМодуль = Новый("AddIn." + Контекст.СимволическоеИмя + "." + Идентификатор);
+				
+				Если ПодключаемыйМодуль = Неопределено Тогда 
+					ВызватьИсключение НСтр("ru = 'Ошибка при создании экземпляра внешней компоненты'");
+				КонецЕсли;
+				
+				ПодключаемыеМодули.Вставить(Идентификатор, ПодключаемыйМодуль);
+				
+			КонецЦикла;
+			
+			ПодключаемыйМодуль = Новый ФиксированноеСоответствие(ПодключаемыеМодули);
 			
-		Если ПодключаемыйМодуль = Неопределено Тогда 
-			ВызватьИсключение НСтр("ru = 'Ошибка при создании экземпляра внешней компоненты'");	
 		КонецЕсли;
 		
 	Исключение