Skip to content

Исправить разбор режима совместимости НеИспользовать / DontUse в проверке версии платформы #1165

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Open
steel-code-agent wants to merge 4 commits into
base: develop
Choose a base branch
from
Open

Исправить разбор режима совместимости НеИспользовать / DontUse в проверке версии платформы #1165

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
4 commits
Select commit Hold shift + click to select a range
b890a89
Исправить обработку DontUse в определении версии режима совместимости
steel-code-agent Mar 16, 2026
10bfa3d
Исправить обработку DontUse в определении версии режима совместимости
steel-code-agent Mar 16, 2026
160a922
Исправить обработку DontUse в определении версии режима совместимости
steel-code-agent Mar 16, 2026
18f32b9
Исправить обработку DontUse в определении версии режима совместимости
steel-code-agent Mar 16, 2026
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
18 changes: 15 additions & 3 deletions epf/bddRunner/bddRunner/Ext/ObjectModule.bsl
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -2280,9 +2280,21 @@
Функция ВерсияРежимаСовместимости(Знач ЗначениеПоУмолчанию = Неопределено) Экспорт

Если Не ЗначениеЗаполнено(КешВерсияРежимСовместимости) Тогда
РежимСовместимостиВерсия = СтрЗаменить(РежимСовместимости(ЗначениеПоУмолчанию), "Версия", "");
РежимСовместимостиВерсия = СтрЗаменить(РежимСовместимостиВерсия, "Version", "");
КешВерсияРежимСовместимости = СтрЗаменить(РежимСовместимостиВерсия, "_", ".");
РежимСовместимостиВерсия = Строка(РежимСовместимости(ЗначениеПоУмолчанию));
Если ПустаяСтрока(РежимСовместимостиВерсия)
Или Найти(РежимСовместимостиВерсия, "НеИспольз") > 0
Или Найти(РежимСовместимостиВерсия, "DontUse") > 0 Тогда

СистемнаяИнформация = Новый СистемнаяИнформация;
КешВерсияРежимСовместимости = СистемнаяИнформация.ВерсияПриложения;

Иначе

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

КонецЕсли;
КонецЕсли;

Возврат КешВерсияРежимСовместимости;
Expand Down
8 changes: 5 additions & 3 deletions epf/xddTestRunner/xddTestRunner/Ext/ObjectModule.bsl
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -1320,15 +1320,17 @@

Если Не ЗначениеЗаполнено(КешВерсияРежимСовместимости) Тогда

РежимСовместимости = РежимСовместимости(ЗначениеПоУмолчанию);
Если РежимСовместимости = Метаданные.СвойстваОбъектов.РежимСовместимости.НеИспользовать Тогда
РежимСовместимостиВерсия = Строка(РежимСовместимости(ЗначениеПоУмолчанию));
Если ПустаяСтрока(РежимСовместимостиВерсия)
Или Найти(РежимСовместимостиВерсия, "НеИспольз") > 0
Или Найти(РежимСовместимостиВерсия, "DontUse") > 0 Тогда

СистемнаяИнформация = Новый СистемнаяИнформация;
КешВерсияРежимСовместимости = СистемнаяИнформация.ВерсияПриложения;

Иначе

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

Expand Down
18 changes: 15 additions & 3 deletions epf/xddTestRunner/xddTestRunner/Forms/УправляемаяФорма/Ext/Form/Module.bsl
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -2909,9 +2909,21 @@
&НаКлиенте
Функция ВерсияРежимаСовместимостиКлиент(Знач ЗначениеПоУмолчанию = Неопределено) Экспорт
Если Не ЗначениеЗаполнено(КешВерсияРежимСовместимости) Тогда
РежимСовместимостиВерсия = СтрЗаменить(УзнатьРежимСовместимостиКлиент(ЗначениеПоУмолчанию), "Версия", "");
РежимСовместимостиВерсия = СтрЗаменить(РежимСовместимостиВерсия, "Version", "");
КешВерсияРежимСовместимости = СтрЗаменить(РежимСовместимостиВерсия, "_", ".");
РежимСовместимостиВерсия = Строка(УзнатьРежимСовместимостиКлиент(ЗначениеПоУмолчанию));
Если ПустаяСтрока(РежимСовместимостиВерсия)
Или Найти(РежимСовместимостиВерсия, "НеИспольз") > 0
Или Найти(РежимСовместимостиВерсия, "DontUse") > 0 Тогда

СистемнаяИнформация = Новый СистемнаяИнформация;
КешВерсияРежимСовместимости = СистемнаяИнформация.ВерсияПриложения;

Иначе

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

КонецЕсли;
КонецЕсли;

Возврат КешВерсияРежимСовместимости;
Expand Down