Merge pull request Pr-Mex#2176 from Pr-Mex/issue_2175

Pr-Mex#2175 Изменение имени видео при генерации
bia-technologies · Aug 15, 2024 · 941234b · 941234b
2 parents 010524f + 5922b13
commit 941234b
Show file tree

Hide file tree

Showing 3 changed files with 12 additions and 9 deletions.
diff --git a/features/Core/Video/Issue-148-Video-Make.feature b/features/Core/Video/Issue-148-Video-Make.feature
@@ -65,7 +65,7 @@
 	И Я нажимаю на кнопку перезагрузить сценарии в Vanessa-Automation TestClient
 	И я очищаю каталог '$КаталогИнструментов$\tools\Video'
 	И Я нажимаю на кнопку "Выполнить"
-	И в течение 800 секунд в каталоге заданном в переменной контекста "ПараметрКаталог" появился файл "result.mp4"
+	И в течение 800 секунд в каталоге заданном в переменной контекста "ПараметрКаталог" появился файл "ФичаДляПроверкиФормированияВидео.mp4"
 	И в логе сообщений TestClient нет слова "ошибка"
 
 	И Файл "$КаталогИнструментов$\tools\Video\HTML\result.html" существует
@@ -143,7 +143,7 @@
 	И Я нажимаю на кнопку перезагрузить сценарии в Vanessa-Automation TestClient
 	И я очищаю каталог '$КаталогИнструментов$\tools\Video'
 	И Я нажимаю на кнопку "Выполнить"
-	И в течение 800 секунд в каталоге заданном в переменной контекста "ПараметрКаталог" появился файл "result.mp4"
+	И в течение 800 секунд в каталоге заданном в переменной контекста "ПараметрКаталог" появился файл "ФичаДляПроверкиФормированияВидеоVLC.mp4"
 	И в логе сообщений TestClient нет слова "ошибка"
 
 	И Файл "$КаталогИнструментов$\tools\Video\HTML\result.html" существует

diff --git a/features/Core/Video/ОзвучкаВнешнейОбработкой.feature b/features/Core/Video/ОзвучкаВнешнейОбработкой.feature
@@ -96,7 +96,7 @@
 
 	* Выполнение сценария	
 		И Я нажимаю на кнопку "Выполнить"
-		И в течение 800 секунд в каталоге заданном в переменной контекста "ПараметрКаталог" появился файл "result.mp4"
+		И в течение 800 секунд в каталоге заданном в переменной контекста "ПараметрКаталог" появился файл "ОзучкаТекстаОбработкой01.mp4"
 		И в логе сообщений TestClient нет слова "ошибка"
 
 	* Проверка			

diff --git a/lib/Video/РаботаСВидео/Forms/Форма/Ext/Form/Module.bsl b/lib/Video/РаботаСВидео/Forms/Форма/Ext/Form/Module.bsl
@@ -1349,15 +1349,17 @@
 
 	КаталогВидео = ПараметрыВидео.КаталогВыгрузкиИнструкцийВидео + "\Video";
 
-	ФинальноеИмя = КаталогВидео + "\result.mp4";
+	ФичаФайл = Новый Файл(ПараметрыВидео.Ванесса.ТекущийЗагружаемыйФичаФайл);
+
+	ФинальноеИмя = КаталогВидео + "\" + ФичаФайл.ИмяБезРасширения + ".mp4";
 	Попытка
 		Ванесса.УдалитьФайлыКомандаСистемы(ФинальноеИмя);	
 	Исключение            
 		ТекстСообщения = Ванесса.ПодставитьПараметрыВСтроку(
 			Ванесса.Локализовать("Не получилось удалить файл <%1>. Скорее всего файл занят другим приложением. Имя файла было изменено."), ФинальноеИмя);
 		Ванесса.СообщитьПользователю(ТекстСообщения);
 		Ванесса.ЗаписатьЛогВЖРОшибка("ЗаписьВидео", ТекстСообщения);
-		ФинальноеИмя = КаталогВидео + "\result_" + Строка(Новый УникальныйИдентификатор) + ".mp4"; 
+		ФинальноеИмя = КаталогВидео + "\" + ФичаФайл.ИмяБезРасширения + "_" + Строка(Новый УникальныйИдентификатор) + ".mp4"; 
 	КонецПопытки;
 
 	ФайлФинальноеИмя = Новый Файл(ФинальноеИмя);
@@ -2136,15 +2138,16 @@
 	КонецЕсли;	 
 
 	КаталогВидео = ПараметрыВидео.КаталогВыгрузкиИнструкцийВидео;
-	Если Не Ванесса.Объект.РежимСамотестирования  // чтобы не блокировался каталог
-	   И Не Ванесса.ЭтоЗапускВРежимеКоманднойСтроки // чтобы не открыть каталог в режиме запуска из командной строки
-	   Тогда 
+	Если Ванесса.Объект.РежимСамотестирования Тогда // чтобы не блокировался каталог
+   	ИначеЕсли Ванесса.ЭтоЗапускВРежимеКоманднойСтроки Тогда // чтобы не открыть каталог в режиме запуска из командной строки
+		Сообщить(КаталогВидео);
+	Иначе
 		Если Ванесса.ЗапрещеныСинхронныеВызовы Тогда
 			ОписаниеОповещения = Вычислить("Новый ОписаниеОповещения(""ОбработатьОткрытьКаталогВидео"", ЭтаФорма)");
 			Выполнить("НачатьЗапускПриложения(ОписаниеОповещения, КаталогВидео)");
 		Иначе	
 			ЗапуститьПриложение("""" + КаталогВидео + """");
-		КонецЕсли;	 
+		КонецЕсли;	
 	КонецЕсли;	 
 
 КонецПроцедуры