Skip to content

Commit

Permalink
Исправил сравнение таблиц, в которых есть переносы имен реквизитов #417
Browse files Browse the repository at this point in the history
  • Loading branch information
artbear committed Mar 25, 2019
1 parent f943427 commit cd18a58
Show file tree
Hide file tree
Showing 2 changed files with 45 additions and 7 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -1677,7 +1677,7 @@
КонецПроцедуры

&НаКлиенте
Функция ПолучитьОшибкаНетКолонок(ИмяТЧ,ТабПарам)
Функция ПолучитьОшибкаНетКолонок(ИмяТЧ, ТабПарам)
Стр = "Не найдены колонки: ";

Попытка
Expand All @@ -1687,21 +1687,24 @@
КонецПопытки;

Попытка
КолонкиТаблицы = Таблица.НайтиОбъекты();
КолонкиТаблицы = Таблица.ПолучитьПодчиненныеОбъекты(); //НайтиОбъекты(); // Почему не ПолучитьПодчиненныеОбъекты ??

This comment has been minimized.

Copy link
@kuzyara

kuzyara Sep 18, 2019

😠

Исключение
Возврат "";
КонецПопытки;

МассивЗаголовков = Новый Массив;
Заголовки = Новый Соответствие;
Для Каждого Элем Из КолонкиТаблицы Цикл
МассивЗаголовков.Добавить(Элем.ТекстЗаголовка);
ТекстЗаголовка = Элем.ТекстЗаголовка;
ТекстЗаголовкаОчищенный = СтрЗаменить(ТекстЗаголовка, " ", "");
Заголовки.Вставить(ТекстЗаголовка, ТекстЗаголовка);
Заголовки.Вставить(ТекстЗаголовкаОчищенный, ТекстЗаголовкаОчищенный);
КонецЦикла;

БылиОшибки = Ложь;

Для Каждого Элем Из ТабПарам[0] Цикл
ИскомыйЗаголовокТаблицы = Элем.Значение;
Если МассивЗаголовков.Найти(ИскомыйЗаголовокТаблицы) = Неопределено Тогда
Если Заголовки.Получить(ИскомыйЗаголовокТаблицы) = Неопределено Тогда
Стр = Стр + ИскомыйЗаголовокТаблицы + ", ";
БылиОшибки = Истина;
КонецЕсли;
Expand All @@ -1712,7 +1715,7 @@
КонецЕсли;

Если Прав(Стр,2) = ", " Тогда
Стр = Лев(Стр,СтрДлина(Стр)-2);
Стр = Лев(Стр, СтрДлина(Стр) - 2);
КонецЕсли;

Возврат Стр;
Expand Down Expand Up @@ -4286,7 +4289,9 @@
ЗапрещенныйСимвол = Сред(ЗапрещенныеСимволы, НомерСимвола, 1);
Стр = СтрЗаменить(Стр, ЗапрещенныйСимвол, "_");
КонецЦикла;

Стр = СтрЗаменить(Стр, Символы.ПС, "");
Стр = СтрЗаменить(Стр, Символы.ВК, "");

Если Стр = "" Тогда
Стр = "_";
КонецЕсли;
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -103,3 +103,36 @@
Тогда таблица "Список" содержит строки:
| Наименование |
| Текст \'апострофы и пробе\' |

Сценарий: Использование реквизита, в котором есть перенос строки
Дано Подготовлю таблицу на форме, в которой будет заполненная строка
И В командном интерфейсе я выбираю 'Основная' 'Таблицы на форме'
Тогда открылось окно 'Таблицы на форме'
И создаю новую строку таблицы
И в таблице "ТабличнаяЧасть1" я добавляю новую строку
Когда я нажимаю кнопку выбора у реквизита таблицы
И в таблице "ТабличнаяЧасть1" я нажимаю кнопку выбора у реквизита "Составной реквизит таблицы"

Тогда нет ошибки открытия
Тогда открылось окно 'Выбор типа данных'

Когда завершаю редактирование строки
# Следующие строки могут помочь точно выбрать нужное метаданное в форме выбора типа
И В форме "Выбор типа данных" в таблице "" я перехожу к строке:
| '' |
| Простой справочник |
И я нажимаю на кнопку 'ОК'
Тогда открылось окно 'Простой справочник'
И в таблице "Список" я перехожу к строке:
| Реквизит булево | Наименование |
| Нет | Предопределенное значение |
И в таблице "Список" я выбираю текущую строку
Тогда открылось окно 'Таблицы на форме'
И в таблице "ТабличнаяЧасть1" я завершаю редактирование строки
Тогда проверяю содержание таблицы
Тогда таблица "ТабличнаяЧасть1" содержит строки:
| N | Составной реквизит таблицы | Реквизит1 |
| 1 | Предопределенное значение | '' |
Тогда таблица "ТабличнаяЧасть1" стала равной:
| N | Составной реквизит таблицы | Реквизит1 |
| 1 | Предопределенное значение | '' |

0 comments on commit cd18a58

Please sign in to comment.