Skip to content

Commit 17a5c23

Browse files
authored
Поддержка конфигураций на английском коде (#1147)
* Update ObjectModule.bsl поддержка конфигураций на английском языке
1 parent 3775926 commit 17a5c23

File tree

6 files changed

+7
-2
lines changed

6 files changed

+7
-2
lines changed

epf/bddRunner/bddRunner/Ext/ObjectModule.bsl

+1
Original file line numberDiff line numberDiff line change
@@ -2282,6 +2282,7 @@
22822282

22832283
Если Не ЗначениеЗаполнено(КешВерсияРежимСовместимости) Тогда
22842284
РежимСовместимостиВерсия = СтрЗаменить(РежимСовместимости(ЗначениеПоУмолчанию), "Версия", "");
2285+
РежимСовместимостиВерсия = СтрЗаменить(РежимСовместимостиВерсия, "Version", "");
22852286
КешВерсияРежимСовместимости = СтрЗаменить(РежимСовместимостиВерсия, "_", ".");
22862287
КонецЕсли;
22872288

epf/bddRunner/bddRunner/Forms/УправляемаяФорма/Ext/Form/Module.bsl

+1
Original file line numberDiff line numberDiff line change
@@ -6793,6 +6793,7 @@
67936793
Функция ВерсияРежимаСовместимостиКлиент(Знач ЗначениеПоУмолчанию = Неопределено) Экспорт
67946794
Если Не ЗначениеЗаполнено(КешВерсияРежимСовместимости) Тогда
67956795
РежимСовместимостиВерсия = СтрЗаменить(УзнатьРежимСовместимостиКлиент(ЗначениеПоУмолчанию), "Версия", "");
6796+
РежимСовместимостиВерсия = СтрЗаменить(РежимСовместимостиВерсия, "Version", "");
67966797
КешВерсияРежимСовместимости = СтрЗаменить(РежимСовместимостиВерсия, "_", ".");
67976798
КонецЕсли;
67986799

epf/xddTestRunner/xddTestRunner/Ext/ObjectModule.bsl

+1
Original file line numberDiff line numberDiff line change
@@ -1315,6 +1315,7 @@
13151315
Иначе
13161316

13171317
РежимСовместимостиВерсия = СтрЗаменить(РежимСовместимости, "Версия", "");
1318+
РежимСовместимостиВерсия = СтрЗаменить(РежимСовместимостиВерсия, "Version", "");
13181319
КешВерсияРежимСовместимости = СтрЗаменить(РежимСовместимостиВерсия, "_", ".");
13191320

13201321
КонецЕсли;

epf/xddTestRunner/xddTestRunner/Forms/УправляемаяФорма/Ext/Form/Module.bsl

+2
Original file line numberDiff line numberDiff line change
@@ -2860,6 +2860,7 @@
28602860
Возврат Истина;
28612861
КонецЕсли;
28622862
РежимСовместимостиВерсия = СтрЗаменить(РежимСовместимости, "Версия", "");
2863+
РежимСовместимостиВерсия = СтрЗаменить(РежимСовместимостиВерсия, "Version", "");
28632864
РежимСовместимостиВерсия = СтрЗаменить(РежимСовместимостиВерсия, "_", ".");
28642865
Если ВерсияПриложенияБольшеИлиРавнаЧемЗаданная(РежимСовместимостиВерсия, "8.3.13") Тогда
28652866
Возврат Истина;
@@ -2911,6 +2912,7 @@
29112912
Функция ВерсияРежимаСовместимостиКлиент(Знач ЗначениеПоУмолчанию = Неопределено) Экспорт
29122913
Если Не ЗначениеЗаполнено(КешВерсияРежимСовместимости) Тогда
29132914
РежимСовместимостиВерсия = СтрЗаменить(УзнатьРежимСовместимостиКлиент(ЗначениеПоУмолчанию), "Версия", "");
2915+
РежимСовместимостиВерсия = СтрЗаменить(РежимСовместимостиВерсия, "Version", "");
29142916
КешВерсияРежимСовместимости = СтрЗаменить(РежимСовместимостиВерсия, "_", ".");
29152917
КонецЕсли;
29162918

plugins/ЗагрузчикФайла/ЗагрузчикФайла/Ext/ObjectModule.bsl

+1-1
Original file line numberDiff line numberDiff line change
@@ -163,7 +163,7 @@
163163
Обработка.ЗаполнитьНаборТестов(ЭтотОбъект, КонтекстЯдра);
164164
Исключение
165165
Инфо = ИнформацияОбОшибке();
166-
Если Инфо.ИмяМодуля = "ВнешняяОбработка.ЗагрузчикФайла.МодульОбъекта" И
166+
Если (Инфо.ИмяМодуля = "ВнешняяОбработка.ЗагрузчикФайла.МодульОбъекта" ИЛИ Инфо.ИмяМодуля = "ExternalDataProcessor.ЗагрузчикФайла.ObjectModule") И
167167
(Инфо.Описание = "Слишком много фактических параметров" Или
168168
Инфо.Описание = "Too many actual parameters") И
169169
Найти(Инфо.ИсходнаяСтрока, "Обработка.ЗаполнитьНаборТестов(ЭтотОбъект, КонтекстЯдра);") > 0

plugins/ЗагрузчикФайла/ЗагрузчикФайла/Forms/Форма/Ext/Form/Module.bsl

+1-1
Original file line numberDiff line numberDiff line change
@@ -299,7 +299,7 @@
299299
ФормаОбработки.ЗаполнитьНаборТестов(ЭтаФорма, КонтекстЯдра);
300300
Исключение
301301
Инфо = ИнформацияОбОшибке();
302-
Если Инфо.ИмяМодуля = "ВнешняяОбработка.ЗагрузчикФайла.Форма.Форма.Форма" И
302+
Если (Инфо.ИмяМодуля = "ВнешняяОбработка.ЗагрузчикФайла.Форма.Форма.Форма" ИЛИ Инфо.ИмяМодуля = "ExternalDataProcessor.ЗагрузчикФайла.Form.Форма.Form") И
303303
(Инфо.Описание = "Слишком много фактических параметров" Или
304304
Инфо.Описание = "Too many actual parameters") И
305305
Найти(Инфо.ИсходнаяСтрока, "ФормаОбработки.ЗаполнитьНаборТестов(ЭтаФорма, КонтекстЯдра);") > 0

0 commit comments

Comments
 (0)