Корректный вывод ошибки в редактор, когда в подсценарий переданы лишн…

…ие параметры. #1117

lib/FeatureReader/FeatureReader/Ext/ObjectModule.bsl

@@ -913,10 +913,6 @@
 			КомментарииСценария = Элем.МассивКомментариев;
 		КонецЕсли;	 
 	КонецЦикла;	
-	//Если ТегиСценария = Неопределено Тогда
-	//	ВызватьИсключение ПолучитьТекстСообщенияПользователю("Ошибка парсинга фичи <" + ИмяФичи + ">. Не найден массив тегов.");
-	//КонецЕсли;	 
-
 
 	Если ТипЗнч(ДеревоСтроки.Родитель.ПроизвольныеЗначения) <> Тип("Структура")  Тогда
 		ДеревоСтроки.Родитель.ПроизвольныеЗначения = Новый Структура;
@@ -1631,6 +1627,8 @@
 	ПараметрыКопирования.Вставить("ЗначенияПараметровДляЗаменыВоВложенномСценарии",ЗначенияПараметровДляЗаменыВоВложенномСценарии);
 	ПараметрыКопирования.Вставить("ЗначенияТаблицДляЗаменыВоВложенномСценарии",ЗначенияТаблицДляЗаменыВоВложенномСценарии);
 	ПараметрыКопирования.Вставить("ИдТаблицыДляКопирования",-1);
+	ПараметрыКопирования.Вставить("КудаКопировать", КудаКопировать);
+	ПараметрыКопирования.Вставить("ИмяФайла", ИмяФайла);
 
 	Если ЗначенияТаблицДляЗаменыВоВложенномСценарии <> Неопределено Тогда
 		ПустаяСтрокаДереваРазделитель  = Неопределено;
@@ -1767,6 +1765,23 @@
 						ТекстСообщения = СтрЗаменить(ТекстСообщения,"%1",СтруктураПараметров.ИмяСценарияДляКопирования);
 						ТекстСообщения = СтрЗаменить(ТекстСообщения,"%2",ПараметрыКопирования.ЗначенияПараметровДляЗаменыВоВложенномСценарии.Количество());
 						ТекстСообщения = СтрЗаменить(ТекстСообщения,"%3",ПараметрыКопирования.ЗначенияПараметровДляЗаменыВРодительскомСценарии.Количество());
+
+						СтруктураПараметров.БылиОшибкиЗагрузкиФич = Истина;
+						СтруктураПараметров.Вставить("ФичаЗагружена",Ложь);
+						СтруктураПараметров.Вставить("БылиОшибкиЗагрузкиФич",Истина);
+						СтруктураПараметров.Вставить("ОписаниеОшибки",ТекстСообщения);
+						СтруктураПараметров.ОшибкиЗагрузкиФич.Добавить(ТекстСообщения);
+
+						Если НЕ СтруктураПараметров.Свойство("ДанныеОшибокДляРедактора") Тогда
+							СтруктураПараметров.Вставить("ДанныеОшибокДляРедактора", Новый Массив);
+						КонецЕсли;	 
+						ДанныеОшибокДляРедактора = СтруктураПараметров.ДанныеОшибокДляРедактора;
+
+						ДанныеОшибкиДляРедактора = ДанныеОшибкиДляРедактора(ПараметрыКопирования.КудаКопировать.НомерСтрокиВФиче,
+							ПараметрыКопирования.ИмяФайла, ТекстСообщения);
+
+						ДанныеОшибокДляРедактора.Добавить(ДанныеОшибкиДляРедактора);
+
 						ВызватьИсключение ТекстСообщения;
 					КонецЕсли;	 
 
@@ -2975,11 +2990,15 @@
 			ТекстСообщения = СтрЗаменить(ТекстСообщения,"%2",ОжидаемоеКлючевоеСлово);
 			ТекстСообщения = СтрЗаменить(ТекстСообщения,"%3",СтрОшибки);
 			ТекстСообщения = СтрЗаменить(ТекстСообщения,"%4",ПредыдущееКлючевоеСлово);
-			ДанныеОшибки = Новый Структура;
-			ДанныеОшибки.Вставить("НомерСтроки", НомСтр);
-			ДанныеОшибки.Вставить("ИмяФайла", ИмяФайла);
-			ДанныеОшибки.Вставить("ОписаниеОшибки", ТекстСообщения);
-			СтруктураПараметров.Вставить("ДанныеОшибки", ДанныеОшибки);
+
+			Если НЕ СтруктураПараметров.Свойство("ДанныеОшибокДляРедактора") Тогда
+				СтруктураПараметров.Вставить("ДанныеОшибокДляРедактора", Новый Массив);
+			КонецЕсли;	 
+			ДанныеОшибокДляРедактора = СтруктураПараметров.ДанныеОшибокДляРедактора;
+
+			ДанныеОшибкиДляРедактора = ДанныеОшибкиДляРедактора(НомСтр, ИмяФайла, ТекстСообщения);
+			ДанныеОшибокДляРедактора.Добавить(ДанныеОшибкиДляРедактора);
+
 			ОписаниеОшибки = ТекстСообщения;
 			//тут не надо ставить признак удаления фичи из дерева, чтобы можно было увидеть в дереве проблему
 			//СтруктураПараметров.Вставить("УдалитьСтрокуФичиИзДерева",Истина);
@@ -3033,7 +3052,13 @@
 
 
 	Если ТаблицаШагов.Количество() > 0 Тогда
-		ЗакрытьПредыдущийСценарий(ИмяФичи,ИмяФайла,ТекущийТипСценария,ПредыдущееКлючевоеСлово,"scenario",ДеревоСтроки,ОписаниеСценария,ТаблицаШагов,ТаблицаИзвестныхStepDefinition,ТаблицаСтрокПримеров,НомерСтрокиНачалоСценария,ТаблицаУжеСуществующихСценариев,СтруктураПараметров,МассивСценариевЗащитаОтЗацикливанияКеш,ЭтоЗагрузкаПодчиненногоСценария,ПередаваемыеТаблицы,ИмяЗагружаемогоСценария);
+		Попытка
+			ЗакрытьПредыдущийСценарий(ИмяФичи,ИмяФайла,ТекущийТипСценария,ПредыдущееКлючевоеСлово,"scenario",ДеревоСтроки,ОписаниеСценария,ТаблицаШагов,ТаблицаИзвестныхStepDefinition,ТаблицаСтрокПримеров,НомерСтрокиНачалоСценария,ТаблицаУжеСуществующихСценариев,СтруктураПараметров,МассивСценариевЗащитаОтЗацикливанияКеш,ЭтоЗагрузкаПодчиненногоСценария,ПередаваемыеТаблицы,ИмяЗагружаемогоСценария);
+		Исключение
+			СтруктураПараметров.Вставить("БылиОшибкиЗагрузкиФич", Истина);
+			СтруктураПараметров.ОшибкиЗагрузкиФич.Добавить(ОписаниеОшибки());
+			Возврат Ложь;
+		КонецПопытки;
 	КонецЕсли;	 
 
 	Если СтруктураПараметров.КоличествоЗагруженныхСценариев = 0 Тогда
@@ -3045,6 +3070,14 @@
 
 КонецФункции
 
+Функция ДанныеОшибкиДляРедактора(НомерСтроки, ИмяФайла, ОписаниеОшибки)
+	Результат = Новый Структура;
+	Результат.Вставить("НомерСтроки", НомерСтроки);
+	Результат.Вставить("ИмяФайла", ИмяФайла);
+	Результат.Вставить("ОписаниеОшибки", ОписаниеОшибки);
+	Возврат Результат; 
+КонецФункции	 
+
 Функция БылиПовторыИменСнипетов(ТаблицаУжеСуществующихСценариев,ТаблицаИзвестныхStepDefinition)
 	КопияТаблицаУжеСуществующихСценариев = ТаблицаУжеСуществующихСценариев.Скопировать();
 	КопияТаблицаУжеСуществующихСценариев.Колонки.Добавить("СтрокаДляПоиска");
@@ -3128,16 +3161,13 @@
 
 	ДобавитьКолонкуСнипетаВТаблицаУжеСуществующихСценариев(СтруктураПараметров.ТаблицаУжеСуществующихСценариев,СтруктураПараметров);
 
-
 	Если НЕ СтруктураПараметров.Свойство("БылаПроверкаНаПовторыСнипетов") Тогда
 		Если БылиПовторыИменСнипетов(СтруктураПараметров.ТаблицаУжеСуществующихСценариев,ТаблицаИзвестныхStepDefinition) Тогда
-			//ВызватьИсключение ПолучитьТекстСообщенияПользователю("Были конфликты в именах снипетов.");
 			Сообщить(ПолучитьТекстСообщенияПользователю("Были конфликты в именах снипетов."));
 		КонецЕсли;
 		СтруктураПараметров.Вставить("БылаПроверкаНаПовторыСнипетов",Истина);
 	КонецЕсли;	
 
-
 	ОписаниеОшибки = "";
 	ПередаваемыеТаблицы = Неопределено;
 	БылаЗаменаТаблицыПараметровВСтруктуреСценария = Ложь;
@@ -4291,8 +4321,6 @@
 		ВызватьИсключение ПолучитьТекстСообщенияПользователю("Ошибка в ДобавитьStepDefinitionВТекстМодуля.");
 	КонецЕсли;	 
 
-
-
 	УжеЕсть = Ложь;
 	Для Каждого СтрТелоМодуля Из ТелоМодуля Цикл
 		Стр = СокрЛП(СтрТелоМодуля.Стр);