diff --git "a/tests/smoke/\321\202\320\265\321\201\321\202\321\213_\320\232\320\276\320\274\320\260\320\275\320\264\320\275\321\213\320\271\320\230\320\275\321\202\320\265\321\200\321\204\320\265\320\271\321\201/\321\202\320\265\321\201\321\202\321\213_\320\232\320\276\320\274\320\260\320\275\320\264\320\275\321\213\320\271\320\230\320\275\321\202\320\265\321\200\321\204\320\265\320\271\321\201/Forms/\320\244\320\276\321\200\320\274\320\260/Ext/Form/Module.bsl" "b/tests/smoke/\321\202\320\265\321\201\321\202\321\213_\320\232\320\276\320\274\320\260\320\275\320\264\320\275\321\213\320\271\320\230\320\275\321\202\320\265\321\200\321\204\320\265\320\271\321\201/\321\202\320\265\321\201\321\202\321\213_\320\232\320\276\320\274\320\260\320\275\320\264\320\275\321\213\320\271\320\230\320\275\321\202\320\265\321\200\321\204\320\265\320\271\321\201/Forms/\320\244\320\276\321\200\320\274\320\260/Ext/Form/Module.bsl" index 0d5cea3b0..152056a1d 100644 --- "a/tests/smoke/\321\202\320\265\321\201\321\202\321\213_\320\232\320\276\320\274\320\260\320\275\320\264\320\275\321\213\320\271\320\230\320\275\321\202\320\265\321\200\321\204\320\265\320\271\321\201/\321\202\320\265\321\201\321\202\321\213_\320\232\320\276\320\274\320\260\320\275\320\264\320\275\321\213\320\271\320\230\320\275\321\202\320\265\321\200\321\204\320\265\320\271\321\201/Forms/\320\244\320\276\321\200\320\274\320\260/Ext/Form/Module.bsl" +++ "b/tests/smoke/\321\202\320\265\321\201\321\202\321\213_\320\232\320\276\320\274\320\260\320\275\320\264\320\275\321\213\320\271\320\230\320\275\321\202\320\265\321\200\321\204\320\265\320\271\321\201/\321\202\320\265\321\201\321\202\321\213_\320\232\320\276\320\274\320\260\320\275\320\264\320\275\321\213\320\271\320\230\320\275\321\202\320\265\321\200\321\204\320\265\320\271\321\201/Forms/\320\244\320\276\321\200\320\274\320\260/Ext/Form/Module.bsl" @@ -53,7 +53,7 @@ ПлагинТестКлиенты = КонтекстЯдра.Плагин("ТестКлиенты"); - ТестКлиент = ПодключитьТестКлиент(); + ТестКлиент = ПлагинТестКлиенты.ТестКлиентПоУмолчанию(); Если ТестКлиент = Неопределено Тогда Возврат; КонецЕсли; @@ -105,8 +105,15 @@ Попытка ОсновноеОкно.ВыполнитьКоманду(ПараметрНавигационнаяСсылка); Исключение - ВызватьИсключение КонтекстЯдра.СтрШаблон_("Не удалось выполнить команду %1 на тест-клиенте. - |Возможно, сеанс тест-клиента заблокирован модальным окном", ПараметрНавигационнаяСсылка); + ИнформацияОбОшибке = ИнформацияОбОшибке(); + ТекстСообщения = КраткоеПредставлениеОшибки(ИнформацияОбОшибке); + ПолныйТекстСообщения = ПодробноеПредставлениеОшибки(ИнформацияОбОшибке); + + ЗаписатьПредупреждениеВЖурналРегистрации(ПолныйТекстСообщения); + + ВызватьИсключение СтрШаблон("Не удалось выполнить команду %1 на тест-клиенте. + |Возможно, сеанс тест-клиента заблокирован модальным окном + |%2", ПараметрНавигационнаяСсылка, ТекстСообщения); КонецПопытки; ПлагинТестКлиенты.ИдентифицироватьОкноПредупреждение(ТестКлиент, ПереходПоКнопкеКомандногоИнтерфейса(), Ложь); @@ -404,8 +411,14 @@ Попытка Результат = ПлагинТестКлиенты.ТестКлиентПоУмолчанию(); Исключение - ИнфоОшибки = ПодробноеПредставлениеОшибки(ИнформацияОбОшибке()); - Сообщить(ИнфоОшибки); // TODO скрывается исключение + ИнформацияОбОшибке = ИнформацияОбОшибке(); + ТекстСообщения = ПодробноеПредставлениеОшибки(ИнформацияОбОшибке); + + ЗаписатьПредупреждениеВЖурналРегистрации(ТекстСообщения); + + ПоказатьПредупреждение( , НСтр("ru = 'Операция не может быть выполнена по причине:'") + Символы.ПС + + ТекстСообщения); + КонецПопытки; Возврат Результат; @@ -869,8 +882,15 @@ Попытка КомандныйИнтерфейс = ОсновноеОкно.ПолучитьКомандныйИнтерфейс(); Исключение + ИнформацияОбОшибке = ИнформацияОбОшибке(); + ТекстСообщения = КраткоеПредставлениеОшибки(ИнформацияОбОшибке); + ПолныйТекстСообщения = ПодробноеПредставлениеОшибки(ИнформацияОбОшибке); + + ЗаписатьПредупреждениеВЖурналРегистрации(ПолныйТекстСообщения); + ВызватьИсключение "Не удалось получить командный интерфейс. - |Возможно, сеанс тест-клиента заблокирован модальным окном"; + |Возможно, сеанс тест-клиента заблокирован модальным окном + |" + ТекстСообщения; КонецПопытки; ПанельРазделов = КомандныйИнтерфейс.НайтиОбъект(Тип("ТестируемаяГруппаКомандногоИнтерфейса"), @@ -997,4 +1017,13 @@ #КонецОбласти +&НаСервереБезКонтекста +Процедура ЗаписатьПредупреждениеВЖурналРегистрации(Знач ТекстОшибки) + + ЗаписьЖурналаРегистрации("VanessaADD.Дымовые.тесты_КомандныйИнтерфейс", + УровеньЖурналаРегистрации.Предупреждение, , , + ТекстОшибки); + +КонецПроцедуры + #КонецОбласти