|
921 | 921 | НастройкиШагов = Новый Структура; |
922 | 922 | НастройкиШагов.Вставить("Параметры_xddRun"); |
923 | 923 | НастройкиШагов.Вставить("Параметры_xddReport"); |
| 924 | + НастройкиШагов.Вставить("Параметры_xddExitCodePath"); |
924 | 925 | НастройкиШагов.Вставить("xddShutdown"); |
925 | 926 |
|
926 | 927 | ПараметрыЗапуска.Свойство(ПарсерКоманднойСтроки.Объект.ВозможныеКлючи.xddRun, НастройкиШагов.Параметры_xddRun); |
927 | 928 | ПараметрыЗапуска.Свойство(ПарсерКоманднойСтроки.Объект.ВозможныеКлючи.xddReport, НастройкиШагов.Параметры_xddReport); |
| 929 | + ПараметрыЗапуска.Свойство(ПарсерКоманднойСтроки.Объект.ВозможныеКлючи.xddExitCodePath, НастройкиШагов.Параметры_xddExitCodePath); |
928 | 930 | НастройкиШагов.xddShutdown = ПараметрыЗапуска.Свойство(ПарсерКоманднойСтроки.Объект.ВозможныеКлючи.xddShutdown); |
929 | 931 |
|
930 | 932 | Если СинхронныйРежимРазрешен() Тогда |
|
948 | 950 | СформироватьОтчетОТестированииИЭкспортировать_ПакетныйРежим(ПараметрЗапуска.Параметры_xddReport, РезультатыТестирования); |
949 | 951 | КонецЕсли; |
950 | 952 |
|
| 953 | + Если ПараметрЗапуска.Параметры_xddExitCodePath <> Неопределено Тогда |
| 954 | + СформироватьФайлКодаВозврата(ПараметрЗапуска.Параметры_xddExitCodePath, РезультатыТестирования); |
| 955 | + КонецЕсли; |
| 956 | + |
951 | 957 | Если ПараметрЗапуска.xddShutdown = Истина Тогда |
952 | 958 | //Если ПараметрыЗапуска.Свойство(ВозможныеКлючи.xddShutdown) Тогда |
953 | 959 | ЗавершитьРаботуСистемы(Ложь); |
|
1097 | 1103 |
|
1098 | 1104 | ПараметрыДиспетчера.ИндексОтчета = ПараметрыДиспетчера.ИндексОтчета + 1; |
1099 | 1105 | ОбработчикЭкспорта = Новый ОписаниеОповещения("ДиспетчерЭкспортаОтчетовАсинхронныйПакетныйРежим", ЭтаФорма, ПараметрыДиспетчера, |
1100 | | - "ВыполнитьШагПакетногоЗапускаИсключение", ЭтаФорма); |
| 1106 | + "ДиспетчерЭкспортаОтчетовАсинхронныйПакетныйРежимИсключение", ЭтаФорма); |
1101 | 1107 | ГенераторОтчета.НачатьЭкспорт(ОбработчикЭкспорта, СтрокаЭкспорта.Отчет, СтрокаЭкспорта.Путь); |
1102 | 1108 | Иначе |
1103 | 1109 | ОбработкаОповещения = ПараметрыДиспетчера.Финализация; |
|
1107 | 1113 |
|
1108 | 1114 | КонецПроцедуры |
1109 | 1115 |
|
| 1116 | +&НаКлиенте |
| 1117 | +Процедура ДиспетчерЭкспортаОтчетовАсинхронныйПакетныйРежимИсключение(Знач ИнформацияОбОшибке, СтандартнаяОбработка, Знач ПараметрыДиспетчера) Экспорт |
| 1118 | + |
| 1119 | + СтандартнаяОбработка = Ложь; |
| 1120 | + |
| 1121 | + СписокОтчетов = ПараметрыДиспетчера.СписокОтчетов; |
| 1122 | + Если СписокОтчетов.Количество() > ПараметрыДиспетчера.ИндексОтчета Тогда |
| 1123 | + СтрокаЭкспорта = СписокОтчетов[ПараметрыДиспетчера.ИндексОтчета]; |
| 1124 | + ГенераторОтчета = СтрокаЭкспорта.генераторОтчета; |
| 1125 | + |
| 1126 | + ТекстОшибки = СтрШаблон("Ошибка при асинхронном режиме генерации отчетов пакетного запуска: |
| 1127 | + |Состояние: |
| 1128 | + | Генератор отчета: %1 |
| 1129 | + | Отчет: %2 |
| 1130 | + | Путь файла: %3 |
| 1131 | + | Исключение: %4", |
| 1132 | + ГенераторОтчета, СтрокаЭкспорта.Отчет, СтрокаЭкспорта.Путь, ПодробноеПредставлениеОшибки(ИнформацияОбОшибке)); |
| 1133 | + |
| 1134 | + Иначе |
| 1135 | + ТекстОшибки = СтрШаблон("Ошибка при асинхронном режиме генерации отчетов пакетного запуска: |
| 1136 | + |Состояние: |
| 1137 | + | Исключение: %1", |
| 1138 | + ПодробноеПредставлениеОшибки(ИнформацияОбОшибке)); |
| 1139 | + |
| 1140 | + КонецЕсли; |
| 1141 | + |
| 1142 | + ЗафиксироватьОшибкуВЖурналеРегистрации("xUnitFor1C.АсинхронныйПакетныйЗапуск", ТекстОшибки); |
| 1143 | + Сообщить(ТекстОшибки, СтатусСообщения.ОченьВажное); |
| 1144 | + |
| 1145 | + ОбработкаОповещения = ПараметрыДиспетчера.Финализация; |
| 1146 | + ОбработкаОповещения.ДополнительныеПараметры.СледующийШаг = "ЗавершитьРаботу"; |
| 1147 | + ВыполнитьОбработкуОповещения(ОбработкаОповещения); |
| 1148 | +КонецПроцедуры |
| 1149 | + |
1110 | 1150 |
|
1111 | 1151 | &НаКлиенте |
1112 | 1152 | Функция ЗагрузитьИВыполнитьТесты_ПакетныйРежим(Знач Параметры_xddRun) |
|
0 commit comments