Выбрать Книгу в дереве и посмотреть текущего родителя таблицы

Учебные задачи

ТекущийРодитель относится к отображению иерархической таблицы. Для родителя данных отдельно используем ПолучитьРодителя строки дерева.

Где и как запускать

Модуль новой управляемой формы учебной внешней обработки. Код содержит готовые процедуры с директивами; вставляйте на уровне модуля, не внутрь другого обработчика. Каждую задачу запускайте в отдельной копии формы.

Подготовка

  1. В учебной базе создайте новую внешнюю обработку УчебноеДерево с пустой управляемой основной формой. Каждую задачу размещайте в отдельной копии формы.

  2. Не создавайте вручную реквизит Категории и элементы ДеревоКатегорий: код создаёт их программно.

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

  4. Сохраните собственную EPF и откройте в 1С через Файл → Открыть. Данные Книга/Ручка создаются только в памяти формы.

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

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

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

&НаКлиенте
Процедура УчебноеДействие(Команда)
    Корни = ЭтаФорма.Категории.ПолучитьЭлементы();
    Если Корни.Количество() = 0 Тогда
        Возврат;
    КонецЕсли;
    Группа = Корни.Получить(0);
    Дети = Группа.ПолучитьЭлементы();
    Если Дети.Количество() = 0 Тогда
        Возврат;
    КонецЕсли;
    Книга = Дети.Получить(0);
    Если Книга.Название <> "Книга" Тогда
        ВызватьИсключение "Нужна исходная учебная Книга";
    КонецЕсли;
    Таблица = Элементы.ДеревоКатегорий;
    Таблица.Развернуть(Группа.ПолучитьИдентификатор());
    Таблица.ТекущаяСтрока = Книга.ПолучитьИдентификатор();
    ЭтаФорма.ТекущийЭлемент = Таблица;
    Сообщить(Книга.ПолучитьРодителя() = Группа);
    Сообщить("Текущий родитель UI: " + Строка(Таблица.ТекущийРодитель));
    Сообщить("Идентификатор родителя данных: " + Строка(Группа.ПолучитьИдентификатор()));
КонецПроцедуры

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

  1. Начальный режим раскрывает верхний уровень, а не обязательно все уровни произвольного дерева.

  2. Проверяем наличие корня/детей и собственную Книгу до обращения к индексам.

  3. Для выбора используем идентификатор строки, раскрываем её группу и ставим фокус в таблицу.

  4. ПолучитьРодителя проверяет связь данных; ТекущийРодитель выводится отдельно как состояние UI, без предположения, что это индекс или объект базы.

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

  1. Проверка родителя данных Истина; в дереве выбрана Книга под Канцелярией.

  2. Сравните диагностические идентификаторы после отображения в своём клиенте; строки и количества не изменяются.

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

Отделены навигационное состояние таблицы, родитель строки данных и сохранённая ссылка базы.

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

  1. Свойство ТекущийРодитель используется только при иерархическом отображении.

  2. Идентификатор данных формы не является UUID справочника.

  3. Состояние UI может обновляться при отображении, а не синхронно с каждым присваиванием.

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

Не хотите разбираться сами?

Адаптируем это решение под вашу базу. Оценка бесплатно.

Оставить задачу

1С, 1С:Предприятие — товарные знаки ООО «1С». Сайт не является официальным представительством фирмы «1С» и не аффилирован с ней.