Merge branch 'feature/Improve' into develop

Author: Pr-Mex

VanessaAutomation.xml

@@ -11889,7 +11889,7 @@ Default: ffmpeg</v8:content>
 						</v8:item>
 						<v8:item>
 							<v8:lang>en</v8:lang>
-							<v8:content>scenario run</v8:content>
+							<v8:content>Scenario run</v8:content>
 						</v8:item>
 					</Synonym>
 					<Comment/>
@@ -13629,6 +13629,44 @@ Default: ffmpeg</v8:content>
 					<ChoiceHistoryOnInput>Auto</ChoiceHistoryOnInput>
 				</Properties>
 			</Attribute>
+			<Attribute uuid="fba92634-5ab7-401f-9c88-29b19bf8acac">
+				<Properties>
+					<Name>СписокФичДляВыполнения</Name>
+					<Synonym>
+						<v8:item>
+							<v8:lang>ru</v8:lang>
+							<v8:content>Список фич для выполнения</v8:content>
+						</v8:item>
+						<v8:item>
+							<v8:lang>en</v8:lang>
+							<v8:content>Features to run</v8:content>
+						</v8:item>
+					</Synonym>
+					<Comment/>
+					<Type>
+						<v8:Type>v8:ValueListType</v8:Type>
+					</Type>
+					<PasswordMode>false</PasswordMode>
+					<Format/>
+					<EditFormat/>
+					<ToolTip/>
+					<MarkNegatives>false</MarkNegatives>
+					<Mask/>
+					<MultiLine>false</MultiLine>
+					<ExtendedEdit>false</ExtendedEdit>
+					<MinValue xsi:nil="true"/>
+					<MaxValue xsi:nil="true"/>
+					<FillChecking>DontCheck</FillChecking>
+					<ChoiceFoldersAndItems>Items</ChoiceFoldersAndItems>
+					<ChoiceParameterLinks/>
+					<ChoiceParameters/>
+					<QuickChoice>Auto</QuickChoice>
+					<CreateOnInput>Auto</CreateOnInput>
+					<ChoiceForm/>
+					<LinkByType/>
+					<ChoiceHistoryOnInput>Auto</ChoiceHistoryOnInput>
+				</Properties>
+			</Attribute>
 			<Form>Форма</Form>
 			<Form>УправляемаяФорма</Form>
 			<Form>ВыборИзвестногоШага</Form>
@@ -13679,6 +13717,7 @@ Default: ffmpeg</v8:content>
 			<Template>ИконкиЭлементовФормы</Template>
 			<Template>CSS_3D_Сarousel</Template>
 			<Template>CSS_Skrinkast</Template>
+			<Template>КартинкаПоказатьПодробности</Template>
 		</ChildObjects>
 	</ExternalDataProcessor>
 </MetaDataObject>

VanessaAutomation/Ext/ObjectModule.bsl

@@ -211,6 +211,7 @@
 	Настройки.Вставить("СписокТеговИсключение", Новый Массив);
 	Настройки.Вставить("СписокТеговОтбор", Новый Массив);
 	Настройки.Вставить("СписокСценариевДляВыполнения", Новый Массив);
+	Настройки.Вставить("СписокФичДляВыполнения", Новый Массив);
 	Настройки.Вставить("ДелатьЛогВыполненияСценариевВЖР", Ложь);
 	Настройки.Вставить("ДелатьЛогВыполненияСценариевВТекстовыйФайл", Ложь);
 	Настройки.Вставить("ВыводитьВЛогВыполнениеШагов", Ложь);
@@ -474,7 +475,7 @@
 КонецФункции	 
 
 Функция ПолучитьВерсиюОбработки(ДобавлятьНазвание = Истина, ТолькоЦифры = Ложь) Экспорт
-	Версия = "1.2.042.12";
+	Версия = "1.2.042.19";
 
 	Если ТолькоЦифры Тогда
 		Возврат Версия;	

VanessaAutomation/Forms/ГенераторДымовыхТестов/Ext/Form/Module.bsl

@@ -1912,7 +1912,7 @@
 				|				Если появилось предупреждение Тогда
 				|					Тогда я вызываю исключение ""Не удалось провести и закрыть элемент " + ПредставлениеОбъекта + """" + "
 				|				Если появилось окно с заголовком ""ErrorWindow"" Тогда
-				|					Тогда я вызываю исключение ""Не удалось провести и закрыть элемент " + ПредставлениеОбъекта);
+				|					Тогда я вызываю исключение ""Не удалось провести и закрыть элемент " + ПредставлениеОбъекта + """");
 
 			КонецЕсли;
 

VanessaAutomation/Forms/ОбщегоНазначенияVA/Ext/Form/Module.bsl

@@ -578,6 +578,7 @@
 		Новый Структура("Р, А", "СоздаватьПодкаталогВКаталогеAllureДляЭтойСборки", "createsubfolderforbuild"));
 	КоллекцияКоманд.Вставить("СписокТеговИсключение", Новый Структура("Р, А", "СписокТеговИсключение", "ignoretags"));
 	КоллекцияКоманд.Вставить("СписокСценариевДляВыполнения", Новый Структура("Р, А", "СписокСценариевДляВыполнения", "scenariofilter"));
+	КоллекцияКоманд.Вставить("СписокФичДляВыполнения", Новый Структура("Р, А", "СписокФичДляВыполнения", "FeaturesToRun"));
 	КоллекцияКоманд.Вставить("СписокТеговОтбор", Новый Структура("Р, А", "СписокТеговОтбор", "filtertags"));
 	КоллекцияКоманд.Вставить("ТаймаутДляАсинхронныхШагов", Новый Структура("Р, А", "ТаймаутДляАсинхронныхШагов", "timeoutforasynchronoussteps"));
 	КоллекцияКоманд.Вставить("МаксимальноеВремяВыполненияДействия", Новый Структура("Р, А", "МаксимальноеВремяВыполненияДействия", "MaximumExecutionTimeAction"));

VanessaAutomation/Forms/ПарсерGherkin/Ext/Form/Module.bsl

@@ -73,6 +73,14 @@
 		СтруктураПараметров.Вставить("ОтборСценариевПоИмениСценария", ОтборСценариевПоИмениСценария);
 	КонецЕсли;	
 
+	Если Ванесса.Объект.СписокФичДляВыполнения.Количество() > 0 Тогда 
+		ОтборФичИзНастроек = Новый Соответствие;
+		Для Каждого Элем Из Ванесса.Объект.СписокФичДляВыполнения Цикл
+			ОтборФичИзНастроек.Вставить(Элем.Значение, Истина);
+		КонецЦикла;
+		СтруктураПараметров.Вставить("ОтборФичИзНастроек", ОтборФичИзНастроек);
+	КонецЕсли;	
+	
 	Если Ванесса.ЭтоКаталогКомандаСистемы(СтруктураПараметров.КаталогФич) Тогда
 		Ванесса.УстановитьФлагОжиданияСобытияЧтенияОтКомпоненты(Истина);
 		МассивБиблиотек.Добавить(СтруктураПараметров.КаталогФич);
@@ -177,6 +185,51 @@
 
 	Если ДанныеJSON <> Неопределено Тогда
 		Если ТипЗнч(ДанныеJSON) = Тип("Массив") Тогда
+			
+			Если Ванесса.Объект.СписокФичДляВыполнения.Количество() > 0 Тогда
+				ФильтрФичСоответствие = Новый Соответствие;
+				Счетчик = 0;
+				Для Каждого Элем Из Ванесса.Объект.СписокФичДляВыполнения Цикл
+					Счетчик = Счетчик + 1;
+					ФильтрФичСоответствие.Вставить(Элем.Значение, Счетчик);
+				КонецЦикла;
+				
+				СписокФич = Новый СписокЗначений;
+				
+				Счетчик = 0;
+				Для Каждого ДанныеФичи Из ДанныеJSON Цикл
+					
+					Счетчик = Счетчик + 1;
+					
+					Файл = Новый Файл(ДанныеФичи.filename);
+					
+					НомерФичиВСписке = ФильтрФичСоответствие[ДанныеФичи.filename];
+					Если НомерФичиВСписке = Неопределено Тогда
+						НомерФичиВСписке = ФильтрФичСоответствие[Файл.Имя];
+					КонецЕсли;	
+					Если НомерФичиВСписке = Неопределено Тогда
+						НомерФичиВСписке = ФильтрФичСоответствие[Файл.ИмяБезРасширения];
+					КонецЕсли;	
+					
+					Если НомерФичиВСписке = Неопределено Тогда
+						Продолжить;
+					КонецЕсли;
+					
+					СписокФич.Добавить(НомерФичиВСписке, XMLСтрока(Счетчик - 1));
+					
+				КонецЦикла;
+				
+				СписокФич.СортироватьПоЗначению();
+				
+				НовыйДанныеJSON = Новый Массив;
+				Для Каждого Элем Из СписокФич Цикл
+					НовыйДанныеJSON.Добавить(ДанныеJSON[Число(Элем.Представление)]);
+				КонецЦикла;
+				
+				ДанныеJSON = НовыйДанныеJSON;
+				
+			КонецЕсли;	
+			
 			КаталогиФичаФайлов = Новый Соответствие;
 			Для Каждого ДанныеФичи Из ДанныеJSON Цикл
 				ФайлФичи = Новый Файл(ДанныеФичи.filename);
@@ -705,7 +758,9 @@
 		СтрокаШага.ДопТип = "УсловиеИначеЕсли";
 	КонецЕсли;	 
 
-	Если ДанныеШага.Свойство("steps") Тогда
+	Если ДанныеШага.Свойство("steps")
+		И ВГРуппеЕстьРеальныеШаги(ДанныеШага.steps) И НЕ ЭтоПодсценарий //Обход https://github.com/lintest/VanessaExt/issues/88 "Неверное определение группы парсером Gherkin"
+		Тогда
 		СтрокаШага.Тип = "Область";
 		СтрокаШага.ЭтоЧужойСнипет = Ложь;
 	ИначеЕсли ЭтоПодсценарий Тогда
@@ -1187,4 +1242,37 @@
 
 КонецФункции	 
 
+&НаКлиенте
+Процедура ВГРуппеЕстьРеальныеШагиРекурсивно(Шаги, Результат)
+	
+	Если Результат Тогда
+		Возврат;
+	КонецЕсли;
+	
+	Для Каждого ТекШаг Из Шаги Цикл
+		Если ТекШаг.Свойство("snippet") И НЕ ТекШаг.Свойство("steps") Тогда
+			Результат = Истина;
+			Прервать;
+		ИначеЕсли ТекШаг.Свойство("steps") Тогда
+			ВГРуппеЕстьРеальныеШагиРекурсивно(ТекШаг.steps, Результат)
+		КонецЕсли;
+		
+		Если Результат Тогда
+			Прервать;
+		КонецЕсли;	
+		
+	КонецЦикла;	
+	
+КонецПроцедуры
+
+&НаКлиенте
+Функция ВГРуппеЕстьРеальныеШаги(Шаги)
+	Результат = Ложь;
+	
+	ВГРуппеЕстьРеальныеШагиРекурсивно(Шаги, Результат);
+	
+	Возврат Результат;
+	
+КонецФункции	
+
 #КонецОбласти

VanessaAutomation/Forms/РаботаСБраузером/Ext/Form/Module.bsl

@@ -35,7 +35,7 @@
 			Файл = Новый файл (ПутьGoogleChromeИзРеестра + "\chrome.exe");
 			Если Ванесса.ФайлСуществуетКомандаСистемы(Файл.ПолноеИмя) Тогда
 				Ванесса.Объект.КомандаЗапускаБраузера = """" + Файл.ПолноеИмя + """"
-					+ ?(ИспользоватьОтладку, " --remote-debugging-port=" + Формат(ПортБраузера, "ЧГ="), "");
+					+ ?(ИспользоватьОтладку, " --remote-debugging-port=" + Формат(ПортБраузера, "ЧГ="), "") + " --user-data-dir=C:\temp\chrome_debug_profile";
 			КонецЕсли;
 		Иначе
 			ВызватьИсключение Ванесса.Локализовать("В реестре windows не обнаружен путь к браузеру Google Chrome. Укажите путь вручную.");