ДанныеФормыКоллекция.Сортировать

Сохранить выбранный товар при сортировке таблицы формы

Идентификатор строки не равен её индексу. Запоминаем идентификатор Книги, сортируем строки и находим тот же товар.

Подготовка

1. В учебной базе: Файл → Новый → Внешняя обработка. Создайте управляемую форму и назначьте её основной. Дайте обработке имя УчебнаяТаблица.

2. Не добавляйте вручную реквизит Товары и одноимённые элементы: код создаст их при открытии. Модуль формы для этой задачи должен быть пустым.

3. В свойствах формы → События свяжите ПриСозданииНаСервере с одноимённой процедурой. Сохраните отдельную учебную EPF и откройте через Файл → Открыть.

4. Данные Книга/Ручка создаются в памяти формы. Справочники, документы и регистры вашей конфигурации не читаются и не записываются.

&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
    НовыеРеквизиты = Новый Массив;
    НовыеРеквизиты.Добавить(Новый РеквизитФормы("Товары", Новый ОписаниеТипов("ТаблицаЗначений")));
    НовыеРеквизиты.Добавить(Новый РеквизитФормы("Код", Новый ОписаниеТипов("Строка"), "Товары", "Код"));
    НовыеРеквизиты.Добавить(Новый РеквизитФормы("Наименование", Новый ОписаниеТипов("Строка"), "Товары", "Название"));
    НовыеРеквизиты.Добавить(Новый РеквизитФормы("Количество", Новый ОписаниеТипов("Число",
        Новый КвалификаторыЧисла(9, 0, ДопустимыйЗнак.Неотрицательный)), "Товары", "Количество"));
    ЭтаФорма.ИзменитьРеквизиты(НовыеРеквизиты);
    Данные = Новый ТаблицаЗначений;
    Данные.Колонки.Добавить("Код", Новый ОписаниеТипов("Строка"));
    Данные.Колонки.Добавить("Наименование", Новый ОписаниеТипов("Строка"));
    Данные.Колонки.Добавить("Количество", Новый ОписаниеТипов("Число",
        Новый КвалификаторыЧисла(9, 0, ДопустимыйЗнак.Неотрицательный)));

    СтрокаТовара = Данные.Добавить();
    СтрокаТовара.Код = "A-01";
    СтрокаТовара.Наименование = "Книга";
    СтрокаТовара.Количество = 3;
    СтрокаТовара = Данные.Добавить();
    СтрокаТовара.Код = "B-02";
    СтрокаТовара.Наименование = "Ручка";
    СтрокаТовара.Количество = 1;

    ЭтаФорма.ЗначениеВРеквизитФормы(Данные, "Товары");
    Таблица = ЭтаФорма.Элементы.Добавить("ТаблицаТоваров", Тип("ТаблицаФормы"));
    Таблица.ПутьКДанным = "Товары";
    Таблица.Заголовок = "Учебные товары";
    Таблица.Шапка = Истина;
    Таблица.АвтоВводНезаполненного = Ложь;
    Таблица.АвтоВводНовойСтроки = Ложь;
    Для Каждого ИмяКолонки Из СтрРазделить("Код,Наименование,Количество", ",") Цикл
        Колонка = Элементы.Добавить("Товары" + ИмяКолонки, Тип("ПолеФормы"), Таблица);
        Колонка.Вид = ВидПоляФормы.ПолеВвода;
        Колонка.ПутьКДанным = "Товары." + ИмяКолонки;
        Колонка.Заголовок = ИмяКолонки;
    КонецЦикла;
    КомандаДействия = ЭтаФорма.Команды.Добавить("УчебноеДействие");
    КомандаДействия.Действие = "УчебноеДействие";
    КомандаДействия.Заголовок = "Найти Книгу после сортировки";
    КомандаДействия.Подсказка = "Действие только над данными учебной формы";
    КомандаДействия.ИзменяетСохраняемыеДанные = Ложь;
    Кнопка = Элементы.Добавить("КнопкаУчебноеДействие", Тип("КнопкаФормы"));
    Кнопка.ИмяКоманды = КомандаДействия.Имя;
    Кнопка.Заголовок = КомандаДействия.Заголовок;
КонецПроцедуры

&НаКлиенте
Процедура УчебноеДействие(Команда)
    Элементы.ТаблицаТоваров.ЗакончитьРедактированиеСтроки(Ложь);
    Найденные = Товары.НайтиСтроки(Новый Структура("Код", "A-01"));
    Если Найденные.Количество() <> 1 Тогда
        ВызватьИсключение "Для проверки нужна ровно одна учебная Книга с кодом A-01";
    КонецЕсли;
    СтрокаКниги = Найденные[0];
    Идентификатор = СтрокаКниги.ПолучитьИдентификатор();
    ИндексДо = Товары.Индекс(СтрокаКниги);
    Товары.Сортировать("Наименование Убыв");
    После = Товары.НайтиПоИдентификатору(Идентификатор);
    Если После = Неопределено Тогда
        ВызватьИсключение "Учебная строка не найдена после сортировки";
    КонецЕсли;
    Элементы.ТаблицаТоваров.ТекущаяСтрока = Идентификатор;
    ЭтаФорма.ТекущийЭлемент = Элементы.ТаблицаТоваров;
    ДанныеСтроки = Элементы.ТаблицаТоваров.ДанныеСтроки(Идентификатор);
    Если ДанныеСтроки <> Неопределено Тогда
        Сообщить(СтрШаблон("%1; индекс до %2, после %3; тот же код %4",
            ДанныеСтроки.Наименование, ИндексДо, Товары.Индекс(После), ДанныеСтроки.Код = "A-01"));
    КонецЕсли;
    Текущие = Элементы.ТаблицаТоваров.ТекущиеДанные;
    Если Текущие <> Неопределено Тогда
        Сообщить("Текущая строка: " + Текущие.Код);
    КонецЕсли;
КонецПроцедуры

Разбор по шагам

1. Находим Книгу по фиксированному учебному коду и получаем её идентификатор через данные формы.

2. Сортировка по наименованию по убыванию меняет позицию строк, но поиск после неё выполняем по сохранённому идентификатору.

3. ТекущаяСтрока таблицы ожидает идентификатор, а не индекс массива. ТекущийЭлемент формы задаёт фокус.

4. ДанныеСтроки и ТекущиеДанные могут вернуть Неопределено, поэтому перед чтением колонок проверяем результат.

Как проверить результат

1. При неизменённых учебных данных индекс Книги до первого запуска равен 0, после — 1; сравнение кода даёт Истина.

2. Повторный запуск может показать индекс до 1 и после 1, но выбранный код остаётся A-01.

3. Измените код Книги вручную: вместо выбора случайной строки получите понятное исключение.

Ожидаемый результат

Выбор восстановлен по идентичности строки, а не по позиции, которая меняется при сортировке.

На что обратить внимание

1. Идентификатор данных формы не является ссылкой на объект базы и не предназначен для долгосрочного хранения вне жизни этих данных.

2. Для динамического списка ключи строк имеют другую природу. Не переносите ожидание числового индекса в другие таблицы.

Пример не запускался в вашей базе. Перед применением проверьте его в указанном учебном контексте.