Skip to content

#2428 Добавлена возможность передавать список колонок... #2429

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
JaneGlass73 wants to merge 1 commit into
base: develop
Choose a base branch
from
Open

#2428 Добавлена возможность передавать список колонок... #2429

Changes from all commits
Commits
Show all changes
1 commit
Select commit
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
33 changes: 21 additions & 12 deletions ...ibraries/UITestRunner/step_definitions/РаботаСИнтерфейсом/Forms/Форма/Ext/Form/Module.bsl
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -17079,26 +17079,35 @@
&НаКлиенте
//И в таблице "ИмяТаблицы" я активизирую колонку "ИмяКолонки" в группе "ИмяГруппы"
//@ВТаблицеЯАктивизируюКолонкуВГруппе(Парам01,Парам02,Парам03)
//Сначала идёт в группе главная колонка (дальняя от реквизита), которую нужно найти, потом подколонка 1, 2 и т.д.
Функция ВТаблицеЯАктивизируюКолонкуВГруппе(ИмяТаблицы,ИмяКолонки,ИмяГруппы,ИскатьКолонкуПоИмени = Ложь) Экспорт
Таблица = Ванесса.НайтиТЧПоИмени(ИмяТаблицы);
ГруппаКолонок = Таблица.НайтиОбъект(Тип("ТестируемаяГруппаФормы"),ИмяГруппы);

Если ГруппаКолонок = Неопределено Тогда
ТекстСообщения = Ванесса.ПолучитьТекстСообщенияПользователю("Группа колонок <%1> в таблице <%2> не найдена.");
ТекстСообщения = СтрЗаменить(ТекстСообщения,"%1",ИмяГруппы);
ТекстСообщения = СтрЗаменить(ТекстСообщения,"%2",ИмяТаблицы);
ВызватьИсключение ТекстСообщения;
КонецЕсли;
ГруппыКолонокМассив = СтрРазделить(ИмяГруппы,"|");
НайденныеКолонки = "";
ОчереднойОбъектДляПоиска = Таблица;
Для Каждого ИмяОчереднойГруппы Из ГруппыКолонокМассив Цикл
ГруппаКолонок = ОчереднойОбъектДляПоиска.НайтиОбъект(Тип("ТестируемаяГруппаФормы"),ИмяОчереднойГруппы);
Если ГруппаКолонок = Неопределено Тогда
ТекстСообщения = Ванесса.ПолучитьТекстСообщенияПользователю("Группа колонок <%1> в последовательности групп колонок <%3> таблицы <%2> не найдена.");
ТекстСообщения = СтрЗаменить(ТекстСообщения,"%1",ИмяГруппы);
ТекстСообщения = СтрЗаменить(ТекстСообщения,"%2",ИмяТаблицы);
ТекстСообщения = СтрЗаменить(ТекстСообщения,"%3",Лев(НайденныеКолонки,СтрДлина(НайденныеКолонки)-3));
ВызватьИсключение ТекстСообщения;
Иначе
НайденныеКолонки = НайденныеКолонки + ИмяОчереднойГруппы + " | ";
ОчереднойОбъектДляПоиска = ГруппаКолонок;
КонецЕсли;
КонецЦикла;

Если ИскатьКолонкуПоИмени Тогда
НужнаяКолонка = ГруппаКолонок.НайтиОбъект(Тип("ТестируемоеПолеФормы"),,ИмяКолонки);
НужнаяКолонка = ОчереднойОбъектДляПоиска.НайтиОбъект(Тип("ТестируемоеПолеФормы"),,ИмяКолонки);
Иначе
НужнаяКолонка = ГруппаКолонок.НайтиОбъект(Тип("ТестируемоеПолеФормы"),ИмяКолонки);
НужнаяКолонка = ОчереднойОбъектДляПоиска.НайтиОбъект(Тип("ТестируемоеПолеФормы"),ИмяКолонки);
КонецЕсли;
Если НужнаяКолонка = Неопределено Тогда
ТекстСообщения = Ванесса.ПолучитьТекстСообщенияПользователю("В таблице <%1> в группе колонок <%2> колонка <%3> не найдена.");
ТекстСообщения = Ванесса.ПолучитьТекстСообщенияПользователю("В таблице <%1> в последовательности групп колонок <%2> колонка <%3> не найдена.");
ТекстСообщения = СтрЗаменить(ТекстСообщения,"%1",ИмяТаблицы);
ТекстСообщения = СтрЗаменить(ТекстСообщения,"%2",ИмяГруппы);
ТекстСообщения = СтрЗаменить(ТекстСообщения,"%2",Лев(НайденныеКолонки,СтрДлина(НайденныеКолонки)-3));
ТекстСообщения = СтрЗаменить(ТекстСообщения,"%3",ИмяКолонки);
ВызватьИсключение ТекстСообщения;
КонецЕсли;
Expand Down