Как вывести данные из связанного регистра или документа в динамический список управляемой формы 1С?

← На главную

При работе с управляемыми формами в 1С часто возникает задача отображения в динамическом списке информации, которая напрямую не содержится в основном источнике данных списка, но связана с ним через другой регистр сведений или документ. Например, нам необходимо показать в списке документов данные из связанного регистра сведений или реквизиты другого документа, не изменяя при этом структуру основной таблицы. Давайте рассмотрим подробнее, как мы можем решить эту задачу, используя стандартные механизмы 1С и программный код.

Вывод дополнительных данных в динамический список является одной из ключевых задач при разработке пользовательского интерфейса, когда требуется предоставить максимально полную и актуальную информацию без избыточной детализации. Мы выясним, какие подходы существуют для решения этой проблемы, разберем их преимущества и недостатки, а также рассмотрим примеры кода, которые помогут нам реализовать функционал на практике. Наша цель — обеспечить гибкость и производительность решения, избегая при этом чрезмерного усложнения запросов или структуры данных.

Основы работы с динамическим списком и запросами

Прежде чем мы перейдем к конкретным решениям, давайте вспомним, как работает динамический список в 1С. Динамический список — это мощный инструмент для отображения и фильтрации данных, источником которых является запрос к базе данных. Этот запрос формируется автоматически на основе настроек схемы компоновки данных (СКД), которая лежит в основе динамического списка. Мы можем настроить поля, отборы, сортировки, а также добавить связи между таблицами данных.

Основная таблица динамического списка обычно привязана к одной из таблиц базы данных (например, к регистру сведений, документу или справочнику). Если нам нужно получить данные из другой таблицы, мы должны расширить запрос, добавив к нему соответствующее соединение. Однако, в управляемых формах есть некоторые особенности, которые следует учитывать при работе с динамическими списками и внешними данными.

Решение 1: Добавление дополнительных полей через конструктор запроса СКД

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

Пошаговая инструкция:

Откройте форму списка, где находится динамический список, в конфигураторе.
Перейдите к элементу формы типа ДинамическийСписок и откройте его свойства.
Найдите свойство ОсновнаяТаблица. Это будет источник данных для нашего списка (например, Документ.РеализацияТоваровУслуг).
Перейдите в свойство НастройкаСписка. Откроется окно настройки схемы компоновки данных.
В этом окне найдите раздел Запрос. Здесь вы увидите текст запроса, который формирует данные для списка.
Мы можем добавить в запрос дополнительные таблицы с помощью оператора ЛЕВОЕ СОЕДИНЕНИЕ (LEFT JOIN). Например, если нам нужно получить данные из регистра сведений МойРегистрСведений, мы можем добавить его в запрос и связать с основной таблицей по соответствующим полям.

Пример добавления в запрос:


ВЫБРАТЬ
    РеализацияТоваровУслуг.Ссылка,
    РеализацияТоваровУслуг.Номер,
    РеализацияТоваровУслуг.Дата,
    РеализацияТоваровУслуг.Контрагент,
    МойРегистрСведений.ДополнительноеПоле
ИЗ
    Документ.РеализацияТоваровУслуг КАК РеализацияТоваровУслуг
        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.МойРегистрСведений КАК МойРегистрСведений
        ПО РеализацияТоваровУслуг.Ссылка = МойРегистрСведений.ДокументОснование

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

Преимущества этого метода:

Простота настройки через конструктор СКД.
Высокая производительность, так как все данные извлекаются одним запросом на стороне СУБД. Кроме того, можно реализовать флажок в динамическом списке.
Поддержка стандартных механизмов отбора и сортировки.

Недостатки:

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

Решение 2: Использование виртуальных таблиц и программное изменение текста запроса динамического списка

Когда нам нужно получить данные из виртуальных таблиц (например, ОстаткиИОбороты регистра накопления или срезы регистров сведений) или когда стандартный конструктор СКД не позволяет построить нужный запрос, мы можем программно изменить текст запроса динамического списка.

Мы можем использовать событие ПриСозданииНаСервере формы или событие ПриУстановкеПользовательскихНастроек динамического списка, чтобы переопределить запрос.

Пошаговая инструкция:

Откройте форму списка в конфигураторе.
Перейдите к элементу формы типа ДинамическийСписок.
В обработчике события ПриСозданииНаСервере формы или в обработчике ПриУстановкеПользовательскихНастроек для динамического списка, мы можем получить доступ к его схеме компоновки данных.
Используя объект ДинамическийСписок, мы можем установить свойство ТекстЗапроса.

Пример кода для программного изменения запроса:


&НаСервере
Процедура ПриСозданииНаСервере(Отказ)
    // ... Ваш существующий код ...

    Если ДинамическийСписок.РежимОтображенияДанных = РежимОтображенияДанныхДинамическогоСписка.ПроизвольныйЗапрос Тогда
        ТекстЗапроса = "ВЫБРАТЬ
                           |    Документ.РеализацияТоваровУслуг.Ссылка КАК Ссылка,
                           |    Документ.РеализацияТоваровУслуг.Номер КАК Номер,
                           |    Документ.РеализацияТоваровУслуг.Дата КАК Дата,
                           |    Документ.РеализацияТоваровУслуг.Контрагент КАК Контрагент,
                           |    ЕСТЬNULL(РегистрСведений.МойРегистрСведенийСрезПоследних.ДополнительноеПоле, '') КАК ДополнительноеПоле
                           |ИЗ
                           |    Документ.РеализацияТоваровУслуг КАК ДокументРеализацияТоваровУслуг
                           |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.МойРегистрСведений.СрезПоследних(&Период, ) КАК МойРегистрСведенийСрезПоследних
                           |        ПО ДокументРеализацияТоваровУслуг.Ссылка = МойРегистрСведенийСрезПоследних.ДокументОснование";

        // Мы должны убедиться, что параметр &Период будет установлен,
        // иначе запрос работать не будет.
        // Или же использовать другой способ получения виртуальной таблицы без параметров,
        // если это возможно в вашем случае.
        // Для демонстрации упростим. В реальной жизни нужно будет установить параметры.

        ДинамическийСписок.ТекстЗапроса = ТекстЗапроса;
        
        // Важно! После установки произвольного запроса необходимо вручную
        // добавить поля в список полей динамического списка,
        // если они не были там изначально.
        // Иначе поля не будут отображаться.
        // Пример: ДинамическийСписок.ДобавитьПоле("ДополнительноеПоле");
        
        // Если мы хотим, чтобы динамический список сам определил поля,
        // то лучше работать с СКД напрямую через ДинамическийСписок.КомпоновщикНастроек.СхемаКомпоновкиДанных
        // или использовать общие запросы и передавать их в ДинамическийСписок.
        
    КонецЕсли;
    // ...
КонецПроцедура

Этот способ дает нам полный контроль над запросом. Мы можем использовать любые возможности языка запросов 1С, включая сложные соединения, вложенные запросы, агрегатные функции и виртуальные таблицы с параметрами. Например, в СКД можно собрать значения колонки из нескольких строк в одну.

Важный нюанс: при программной установке ТекстЗапроса, динамический список перестает автоматически определять поля на основе своей ОсновнойТаблицы. Нам может потребоваться вручную добавить новые поля в коллекцию полей динамического списка, если они не были определены ранее, или перестроить схему компоновки данных. Для этого удобно использовать метод КомпоновщикНастроек.СхемаКомпоновкиДанных. Однако, более гибким подходом является модификация существующей схемы компоновки данных, а не полная замена текста запроса.

Преимущества:

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

Недостатки:

Требует глубоких знаний языка запросов 1С и СКД.
Усложняет отладку и поддержку, так как запрос формируется программно.
Потенциальные проблемы с автоматическим определением полей и настройками пользователя.

Решение 3: Программное расширение запроса СКД динамического списка

Вместо полной замены запроса, мы можем программно *расширить* существующий запрос динамического списка, добавив к нему дополнительные таблицы и поля. Этот подход более гибкий, чем полная замена, и позволяет сохранить часть настроек, сделанных через конфигуратор или пользователем.

Мы можем получить объект СхемаКомпоновкиДанных из динамического списка и модифицировать его.

Пошаговая инструкция:

Получаем схему компоновки данных динамического списка.
Находим основной набор данных запроса.
Модифицируем текст запроса основного набора данных, добавляя необходимые соединения и поля.
Устанавливаем измененную схему обратно в динамический список.

Пример кода для расширения запроса:


&НаСервере
Процедура ПриСозданииНаСервере(Отказ)
    Если ДинамическийСписок.РежимОтображенияДанных = РежимОтображенияДанныхДинамическогоСписка.ПроизвольныйЗапрос Тогда
        Возврат; // Этот подход не для произвольного запроса
    КонецЕсли;

    // Получаем текущую схему компоновки данных
    СхемаКомпоновки = ДинамическийСписок.КомпоновщикНастроек.СхемаКомпоновкиДанных;

    // Находим основной набор данных запроса
    НаборДанныхЗапроса = Неопределено;
    Для Каждого Элемент На СхемаКомпоновки.НаборыДанных Цикл
        Если ТипЗнч(Элемент) = Тип("НаборДанныхЗапрос") Тогда
            НаборДанныхЗапроса = Элемент;
            Прервать;
        КонецЕсли;
    КонецЦикла;

    Если НаборДанныхЗапроса = Неопределено Тогда
        Возврат;
    КонецЕсли;

    // Исходный текст запроса
    ИсходныйТекстЗапроса = НаборДанныхЗапроса.Запрос;

    // Добавляем к запросу LEFT JOIN с виртуальной таблицей среза последних
    ДополнительныйТекстЗапроса = "
        |ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.МойРегистрСведений.СрезПоследних(&Период, ) КАК МойРегистрСведенийСрезПоследних
        |ПО ОсновнаяТаблица.Ссылка = МойРегистрСведенийСрезПоследних.ДокументОснование";

    // Ищем место для вставки (например, перед первым 'ГДЕ' или 'УПОРЯДОЧИТЬ ПО')
    ПозицияГде = Найти(ИсходныйТекстЗапроса, "ГДЕ");
    ПозицияУпорядочить = Найти(ИсходныйТекстЗапроса, "УПОРЯДОЧИТЬ ПО");

    НовыйТекстЗапроса = ИсходныйТекстЗапроса;

    Если ПозицияГде > 0 Тогда
        НовыйТекстЗапроса = Лев(ИсходныйТекстЗапроса, ПозицияГде - 1)
                           + ДополнительныйТекстЗапроса
                           + Сред(ИсходныйТекстЗапроса, ПозицияГде);
    ИначеЕсли ПозицияУпорядочить > 0 Тогда
        НовыйТекстЗапроса = Лев(ИсходныйТекстЗапроса, ПозицияУпорядочить - 1)
                           + ДополнительныйТекстЗапроса
                           + Сред(ИсходныйТекстЗапроса, ПозицияУпорядочить);
    Иначе
        // Если нет ни ГДЕ, ни УПОРЯДОЧИТЬ ПО, добавляем в конец
        НовыйТекстЗапроса = ИсходныйТекстЗапроса + ДополнительныйТекстЗапроса;
    КонецЕсли;

    // Также нужно добавить новое поле в секцию ВЫБРАТЬ
    НовоеПолеДляВыбора = "
        |    ,ЕСТЬNULL(МойРегистрСведенийСрезПоследних.ДополнительноеПоле, '') КАК ДополнительноеПоле";
    
    // Ищем первое ВЫБРАТЬ
    ПозицияВыбрать = Найти(НовыйТекстЗапроса, "ВЫБРАТЬ");
    Если ПозицияВыбрать > 0 Тогда
        ПозицияИз = Найти(НовыйТекстЗапрос, "ИЗ", ПозицияВыбрать); // Ищем ИЗ после ВЫБРАТЬ
        Если ПозицияИз > 0 Тогда
            НовыйТекстЗапроса = Лев(НовыйТекстЗапроса, ПозицияИз - 1)
                               + НовоеПолеДляВыбора
                               + Сред(НовыйТекстЗапроса, ПозицияИз);
        КонецЕсли;
    КонецЕсли;


    НаборДанныхЗапроса.Запрос = НовыйТекстЗапроса;

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


    // Необходимо обновить схему компоновки данных
    ДинамическийСписок.КомпоновщикНастроек.ЗагрузитьНастройки(ДинамическийСписок.КомпоновщикНастроек.Настройки);
    
    // Добавление поля в настройки списка для отображения
    ДоступноеПоле = ДинамическийСписок.ДоступныеПоля.Найти("ДополнительноеПоле");
    Если ДоступноеПоле <> Неопределено Тогда
        НовоеПолеКолонки = ДинамическийСписок.Колонки.Добавить();
        НовоеПолеКолонки.ПутьКДанным = ДоступноеПоле.ПутьКДанным;
        НовоеПолеКолонки.Заголовок = ДоступноеПоле.Заголовок;
        НовоеПолеКолонки.Видимость = Истина;
    КонецЕсли;
КонецПроцедуры

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

Преимущества:

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

Недостатки:

Все еще требует программного вмешательства.
Сложность поиска места для вставки дополнительного текста запроса.
Требуется аккуратность при работе с объектами СКД.

Решение 4: Добавление реквизита формы и заполнение его данными

Этот метод подразумевает добавление обычного реквизита на форму (не связанного напрямую с динамическим списком), а затем заполнение его данными программно после получения данных списка. Однако этот способ имеет существенные ограничения для динамических списков.

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

Если мы все же хотим использовать реквизит формы для отображения каких-то обобщенных данных, которые зависят от текущего отбора или текущей строки динамического списка, мы можем:

Добавить реквизит формы, например, типа Строка.
В обработчике события ПриАктивизацииСтроки динамического списка, получать данные текущей строки.
Выполнять отдельный запрос к базе данных, чтобы получить нужную информацию, и присваивать ее нашему реквизиту формы.

Пример кода для вывода информации при активизации строки:


&НаСервере
Процедура ДинамическийСписокПриАктивизацииСтроки(Элемент)
    ТекущиеДанные = Элементы.ДинамическийСписок.ТекущиеДанные;
    Если ТекущиеДанные = Неопределено Тогда
        РеквизитФормыДляДопИнформации = "";
        Возврат;
    КонецЕсли;

    // Получаем ссылку на основной объект списка
    СсылкаОсновногоОбъекта = ТекущиеДанные.Ссылка;

    // Выполняем запрос для получения дополнительной информации
    Запрос = Новый Запрос;
    Запрос.Текст = "ВЫБРАТЬ
                   |    МойРегистрСведенийСрезПоследних.ДополнительноеПоле
                   |ИЗ
                   |    РегистрСведений.МойРегистрСведений.СрезПоследних(&Период, ДокументОснование = &ДокументОснование) КАК МойРегистрСведенийСрезПоследних";

    Запрос.УстановитьПараметр("Период", ТекущаяДата());
    Запрос.УстановитьПараметр("ДокументОснование", СсылкаОсновногоОбъекта);

    РезультатЗапроса = Запрос.Выполнить().Выбрать();

    Если РезультатЗапроса.Следующий() Тогда
        РеквизитФормыДляДопИнформации = РезультатЗапроса.ДополнительноеПоле;
    Иначе
        РеквизитФормыДляДопИнформации = "";
    КонецЕсли;
КонецПроцедуры

Этот метод не является решением для вывода данных *в самом динамическом списке*, а скорее для вывода связанной информации *рядом со списком*. Он может быть полезен для отображения подробностей, которые нецелесообразно включать в сам список из-за их объема или редкости использования.

Преимущества:

Не требует изменения запроса динамического списка.
Позволяет отображать сложную информацию, требующую отдельной логики.

Недостатки:

Информация отображается не в колонке списка.
Приводит к дополнительным запросам к базе данных при каждом изменении активной строки, что может негативно сказаться на производительности при большом количестве пользователей или медленной сети.

Решение 5: Использование дополнительных реквизитов и сведений

Если дополнительные данные являются универсальными и относятся к категории "дополнительные реквизиты" или "дополнительные сведения" (например, цвет, размер, серия, комментарий), то в типовых конфигурациях 1С уже предусмотрен механизм для их хранения и отображения. Этот механизм позволяет пользователям или администраторам добавлять новые поля без изменения конфигурации.

После добавления дополнительного реквизита через пользовательский интерфейс (раздел "Администрирование" -> "Общие настройки" -> "Дополнительные реквизиты и сведения"), он автоматически становится доступным для отображения в динамических списках через стандартные настройки списка (кнопка "Настроить список..." в режиме 1С:Предприятие).

Преимущества:

Не требует программирования или изменения конфигурации.
Гибкость для конечных пользователей.
Стандартный механизм типовых конфигураций.

Недостатки:

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

Заключение и рекомендации

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

Для простых связей с таблицами, которые не являются виртуальными и не требуют параметров (например, регистр сведений, хранящий статичные данные), наиболее эффективным будет Решение 1: Добавление дополнительных полей через конструктор запроса СКД. Оно обеспечивает высокую производительность и простоту настройки.
Если нам нужны данные из виртуальных таблиц (срезы последних, остатки и обороты), или требуется более сложная логика запроса, то предпочтительным будет Решение 3: Программное расширение запроса СКД динамического списка. Оно позволяет сохранить часть стандартных настроек и контролировать запрос программно, оставаясь при этом более гибким, чем полная замена запроса.
В случаях, когда необходим полный контроль над запросом, включая очень сложные соединения и обработку параметров виртуальных таблиц, мы можем использовать Решение 2: Программное изменение текста запроса динамического списка. Однако, следует помнить о потенциальных сложностях с поддержкой и автоматическим определением полей.
Решение 5: Использование дополнительных реквизитов и сведений идеально подходит для универсальных данных, которые пользователи могут добавлять самостоятельно без программирования.
Решение 4: Добавление реквизита формы и заполнение его данными не рекомендуется для вывода данных непосредственно в колонки динамического списка, но может быть полезно для отображения детальной информации о выбранной строке вне списка.

При выборе решения всегда обращайте внимание на производительность. Добавление сложных соединений или большого количества полей может замедлить работу динамического списка, особенно на больших объемах данных. Мы рекомендуем тщательно тестировать каждое решение в реальных условиях эксплуатации.

← На главную