From c64a2cbbebca09faf3a0465033e9897127465628 Mon Sep 17 00:00:00 2001 From: Pautov Leonid Date: Sat, 30 Nov 2024 14:00:06 +0300 Subject: [PATCH] =?UTF-8?q?=D0=A1=D0=BD=D1=8F=D1=82=D0=B8=D0=B5=20=D1=81?= =?UTF-8?q?=D0=BA=D1=80=D0=B8=D0=BD=D1=88=D0=BE=D1=82=D0=BE=D0=B2=20=D0=B4?= =?UTF-8?q?=D0=BE=20=D1=82=D0=BE=D0=B3=D0=BE=20=D0=BA=D0=B0=D0=BA=20=D0=BF?= =?UTF-8?q?=D1=80=D0=BE=D0=B8=D1=81=D1=85=D0=BE=D0=B4=D0=B8=D1=82=20=D1=81?= =?UTF-8?q?=D0=BD=D1=8F=D1=82=D0=B8=D0=B5=20=D0=B4=D0=B0=D0=BD=D0=BD=D1=8B?= =?UTF-8?q?=D1=85=20=D1=82=D0=B5=D0=BA=D1=83=D1=89=D0=B5=D0=B9=20=D1=84?= =?UTF-8?q?=D0=BE=D1=80=D0=BC=D1=8B=20#2241?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../Ext/Form/Module.bsl" | 52 ++++++++++++------- 1 file changed, 33 insertions(+), 19 deletions(-) diff --git "a/VanessaAutomation/Forms/\320\243\320\277\321\200\320\260\320\262\320\273\321\217\320\265\320\274\320\260\321\217\320\244\320\276\321\200\320\274\320\260/Ext/Form/Module.bsl" "b/VanessaAutomation/Forms/\320\243\320\277\321\200\320\260\320\262\320\273\321\217\320\265\320\274\320\260\321\217\320\244\320\276\321\200\320\274\320\260/Ext/Form/Module.bsl" index 4a8c2cfa0e..0d6a51150c 100644 --- "a/VanessaAutomation/Forms/\320\243\320\277\321\200\320\260\320\262\320\273\321\217\320\265\320\274\320\260\321\217\320\244\320\276\321\200\320\274\320\260/Ext/Form/Module.bsl" +++ "b/VanessaAutomation/Forms/\320\243\320\277\321\200\320\260\320\262\320\273\321\217\320\265\320\274\320\260\321\217\320\244\320\276\321\200\320\274\320\260/Ext/Form/Module.bsl" @@ -21169,21 +21169,35 @@ КонецПроцедуры &НаКлиенте -Процедура ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(СписокФайлов) +Процедура ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(СписокФайлов, ТекШаг) Если СписокФайлов.Количество() = 0 Тогда Возврат; КонецЕсли; ПоследнийФайл = СписокФайлов[СписокФайлов.Количество() - 1]; - Шаги = МассивСценариевДляВыполнения[ТекИД_СценарияВМассиве].Шаги; - ТекШаг = Шаги[ТекИД_ШагаВМассиве]; + Если ТекШаг = Неопределено Тогда + Шаги = МассивСценариевДляВыполнения[ТекИД_СценарияВМассиве].Шаги; + ТекШаг = Шаги[ТекИД_ШагаВМассиве]; + КонецЕсли; ПоследнийФайл.Вставить("ПрикрепитьФайлКшагу", ТекШаг); ПоследнийФайл.Вставить("ДобавлятьФайлКСценарию", Ложь); КонецПроцедуры &НаКлиенте -Процедура СборДанныхДляОтчетов(РезультатПрохожденияТестовСценария, СтрокаСценария, РезультатПрохожденияШага, ОписаниеОшибкиВнутриСценария) +Процедура ЗапомнитьДанныеДляСборДанныхДляОтчетов(РезультатПрохожденияТестовСценария, СтрокаСценария, РезультатПрохожденияШага, ОписаниеОшибкиВнутриСценария, ТекШаг) + + СохраненныеДанныеСборДанныхДляОтчетов = Новый Структура; + СохраненныеДанныеСборДанныхДляОтчетов.Вставить("РезультатПрохожденияТестовСценария", РезультатПрохожденияТестовСценария); + СохраненныеДанныеСборДанныхДляОтчетов.Вставить("СтрокаСценарияИдСтроки", СтрокаСценария.ИдСтроки); + СохраненныеДанныеСборДанныхДляОтчетов.Вставить("РезультатПрохожденияШага", РезультатПрохожденияШага); + СохраненныеДанныеСборДанныхДляОтчетов.Вставить("ОписаниеОшибкиВнутриСценария", ОписаниеОшибкиВнутриСценария); + СохраненныеДанныеСборДанныхДляОтчетов.Вставить("ТекШаг", ТекШаг); + +КонецПроцедуры + +&НаКлиенте +Процедура СборДанныхДляОтчетов(РезультатПрохожденияТестовСценария, СтрокаСценария, РезультатПрохожденияШага, ОписаниеОшибкиВнутриСценария, ТекШаг = Неопределено) #Если НЕ ВебКлиент Тогда @@ -21202,7 +21216,7 @@ ДанныеФайла.Макет.НачатьЗапись(,ИмяФайла,ТипФайлаТабличногоДокумента.MXL); ДанныеФайлаДляПрикрепления = Новый Структура("ИмяФайла,Расширение,Представление", ИмяФайла, "mxl", ДанныеФайла.Имя + ".mxl"); ИменаФайловДляПрикрепления.Добавить(ДанныеФайлаДляПрикрепления); - ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления); + ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления, ТекШаг); КонецЕсли; Если Объект.ПрикладыватьФайлыMxlСохраненныеВФорматеHTMLКОтчетуAllure Тогда @@ -21210,7 +21224,7 @@ ДанныеФайла.Макет.НачатьЗапись(,ИмяФайла,ТипФайлаТабличногоДокумента.HTML5); ДанныеФайлаДляПрикрепления = Новый Структура("ИмяФайла,Расширение,Представление", ИмяФайла, "html", ДанныеФайла.Имя + ".html"); ИменаФайловДляПрикрепления.Добавить(ДанныеФайлаДляПрикрепления); - ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления); + ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления, ТекШаг); КонецЕсли; КонецЕсли; @@ -21225,14 +21239,14 @@ ИменаФайловДляПрикрепления.Добавить( ПрикрепитьЖурналРегистрацииТекущейБазы(ТабДок, СтрокаСценария, "mxl", ОписаниеОшибкиВнутриСценария)); - ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления); + ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления, ТекШаг); КонецЕсли; Если Объект.ПрикладыватьФайлыMxlСохраненныеВФорматеHTMLКОтчетуAllure Тогда ИменаФайловДляПрикрепления.Добавить( ПрикрепитьЖурналРегистрацииТекущейБазы(ТабДок, СтрокаСценария, "html", ОписаниеОшибкиВнутриСценария)); - ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления); + ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления, ТекШаг); КонецЕсли; Исключение @@ -21244,7 +21258,7 @@ ИменаФайловДляПрикрепления.Добавить( ПрикрепитьЖурналРегистрацииТекущейБазы(ТабДок, СтрокаСценария, "xlsx", ОписаниеОшибкиВнутриСценария)); - ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления); + ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления, ТекШаг); КонецЕсли; Исключение ЗаписатьЛогВЖРОшибка("VanessaAutomation.ПрикладыватьКОтчетуAllureЖурналРегистрацииВыполненияСценария", ОписаниеОшибки()); @@ -21266,7 +21280,7 @@ ИменаФайловДляПрикрепления.Добавить( ПрикрепитьДанныеОСостоянииАктивнойФормы(ТабДок, СтрокаСценария, "mxl", ОписаниеОшибкиВнутриСценария)); - ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления); + ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления, ТекШаг); КонецЕсли; Исключение ЗаписатьЛогВЖРОшибка("VanessaAutomation.ПрикладыватьКОтчетуAllureДанныеОСостоянииАктивнойФормы", ОписаниеОшибки()); @@ -21277,7 +21291,7 @@ ИменаФайловДляПрикрепления.Добавить( ПрикрепитьДанныеОСостоянииАктивнойФормы(ТабДок, СтрокаСценария, "html", ОписаниеОшибкиВнутриСценария)); - ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления); + ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления, ТекШаг); КонецЕсли; Исключение ЗаписатьЛогВЖРОшибка("VanessaAutomation.ПрикладыватьКОтчетуAllureДанныеОСостоянииАктивнойФормы", ОписаниеОшибки()); @@ -21288,7 +21302,7 @@ ИменаФайловДляПрикрепления.Добавить( ПрикрепитьДанныеОСостоянииАктивнойФормы(ТабДок, СтрокаСценария, "xlsx", ОписаниеОшибкиВнутриСценария)); - ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления); + ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления, ТекШаг); КонецЕсли; Исключение ЗаписатьЛогВЖРОшибка("VanessaAutomation.ПрикладыватьКОтчетуAllureДанныеОСостоянииАктивнойФормы", ОписаниеОшибки()); @@ -21310,7 +21324,7 @@ ИменаФайловДляПрикрепления.Добавить( ПрикрепитьДанныеОСостоянииВсехФорм(ТабДок, СтрокаСценария, "mxl", ОписаниеОшибкиВнутриСценария)); - ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления); + ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления, ТекШаг); КонецЕсли Исключение ЗаписатьЛогВЖРОшибка("VanessaAutomation.ПрикладыватьКОтчетуAllureДанныеОСостоянииВсехФорм", ОписаниеОшибки()); @@ -21321,7 +21335,7 @@ ИменаФайловДляПрикрепления.Добавить( ПрикрепитьДанныеОСостоянииВсехФорм(ТабДок, СтрокаСценария, "html", ОписаниеОшибкиВнутриСценария)); - ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления); + ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления, ТекШаг); КонецЕсли Исключение ЗаписатьЛогВЖРОшибка("VanessaAutomation.ПрикладыватьКОтчетуAllureДанныеОСостоянииВсехФорм", ОписаниеОшибки()); @@ -21332,7 +21346,7 @@ ИменаФайловДляПрикрепления.Добавить( ПрикрепитьДанныеОСостоянииВсехФорм(ТабДок, СтрокаСценария, "xlsx", ОписаниеОшибкиВнутриСценария)); - ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления); + ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления, ТекШаг); КонецЕсли; Исключение ЗаписатьЛогВЖРОшибка("VanessaAutomation.ПрикладыватьКОтчетуAllureДанныеОСостоянииВсехФорм", ОписаниеОшибки()); @@ -21344,7 +21358,7 @@ ИменаФайловДляПрикрепления.Добавить( ПрикрепитьДанныеОСетевыхСоединениях(СтрокаСценария, ОписаниеОшибкиВнутриСценария)); - ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления); + ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления, ТекШаг); Исключение ЗаписатьЛогВЖРОшибка("VanessaAutomation.ПрикладыватьКОтчетуAllureДанныеОСетевыхСоединениях", ОписаниеОшибки()); КонецПопытки; @@ -21355,7 +21369,7 @@ ИменаФайловДляПрикрепления.Добавить( ПрикрепитьДанныеОПроцессахОС(СтрокаСценария, ОписаниеОшибкиВнутриСценария)); - ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления); + ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления, ТекШаг); Исключение ЗаписатьЛогВЖРОшибка("VanessaAutomation.ПрикладыватьКОтчетуAllureДанныеОПроцессахОС", ОписаниеОшибки()); КонецПопытки; @@ -21367,7 +21381,7 @@ ИменаФайловДляПрикрепления.Добавить( ПрикрепитьДанныеОЗначенияхПеременных(СтрокаСценария, ОписаниеОшибкиВнутриСценария, "mxl")); - ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления); + ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления, ТекШаг); КонецЕсли Исключение ЗаписатьЛогВЖРОшибка("VanessaAutomation.ПрикладыватьКОтчетуAllureДанныеОЗначенияхПеременных", ОписаниеОшибки()); @@ -21378,7 +21392,7 @@ ИменаФайловДляПрикрепления.Добавить( ПрикрепитьДанныеОЗначенияхПеременных(СтрокаСценария, ОписаниеОшибкиВнутриСценария, "html")); - ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления); + ДобавитьПоследнийФайлИзМассиваКТекущемуШагу(ИменаФайловДляПрикрепления, ТекШаг); КонецЕсли Исключение ЗаписатьЛогВЖРОшибка("VanessaAutomation.ПрикладыватьКОтчетуAllureДанныеОЗначенияхПеременных", ОписаниеОшибки());