1
0
mirror of https://github.com/bia-technologies/yaxunit.git synced 2024-12-03 08:45:31 +02:00
Проверка на незакрытые транзакции
This commit is contained in:
alkoleft 2023-10-02 22:30:10 +03:00
parent c4be2768ad
commit da8f4a3c2f
2 changed files with 17 additions and 4 deletions

View File

@ -77,6 +77,17 @@
КонецПроцедуры
// Регистрирует ошибку выполнения теста
// Параметры:
// Объект - см. ЮТФабрика.ОписаниеИсполняемогоТеста
// Сообщение - Строка
Процедура ЗарегистрироватьПростуюОшибкуВыполнения(Объект, Сообщение) Экспорт
ДанныеОшибки = ДанныеОшибки(Неопределено, Сообщение, ЮТФабрика.ТипыОшибок().Исполнения);
Объект.Ошибки.Добавить(ДанныеОшибки);
КонецПроцедуры
// Регистрирует ошибку режима выполнения теста
// Параметры:
// Объект - см. ЮТФабрика.ОписаниеИсполняемогоТеста

View File

@ -109,11 +109,13 @@
#Если Сервер ИЛИ ТолстыйКлиентОбычноеПриложение ИЛИ ТолстыйКлиентУправляемоеПриложение Тогда
Если ЮТНастройкиВыполнения.ВТранзакции() Тогда
ОтменитьТранзакцию();
Пока ТранзакцияАктивна() Цикл
ОтменитьТранзакцию();
ЮТОбщий.СообщитьПользователю("Обнаружена незакрытая транзакция");
КонецЦикла;
КонецЕсли;
Пока ТранзакцияАктивна() Цикл
ОтменитьТранзакцию();
ЮТРегистрацияОшибок.ЗарегистрироватьПростуюОшибкуВыполнения(Тест, "Обнаружена незакрытая транзакция");
КонецЦикла;
#КонецЕсли
Уровни = ЮТФабрика.УровниИсполнения();