Как программно заполнить список выбора в 1С: 5 рабочих методов с примерами кода

Работа со списками выбора в 1С:Предприятие 8.3 — одна из самых частых задач при разработке интерфейсов.hether вы создаёте справочник, документ или отчёт, пользователю часто нужно предоставить возможность выбора из заранее определённого набора значений. Но что делать, если этот набор должен формироваться динамически? Например, когда список зависит от предыдущего выбора пользователя, данных из базы или внешних условий?

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

Вы узнаете, как:

• 🔹 Заполнить список выборки данными из справочника или документа
• 🔹 Динамически обновлять варианты в зависимости от действий пользователя
• 🔹 Использовать запросы и объекты метаданных для формирования списков
• 🔹 Обрабатывать ошибки и оптимизировать производительность

Все примеры актуальны для платформы 1С:Предприятие 8.3 (включая последние релизы) и проверены на конфигурациях Управление торговлей 11, Бухгалтерия предприятия 3.0 и Зарплата и управление персоналом 3.1. Если вы работаете с более ранними версиями (8.2 или 8.1), некоторые методы могут потребовать адаптации.

1. Базовый метод: заполнение списка значений (ValueList)

Самый простой способ программно заполнить список выбора — использовать объект СписокЗначений. Он подходит, когда вам нужно предоставить пользователю фиксированный набор вариантов, которые не привязаны к данным базы. Например, выбор типа операции ("Приход", "Расход", "Перемещение") или статуса документа.

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

• ✅ Простота реализации — достаточно нескольких строк кода
• ✅ Быстрая работа, так как не требует обращений к базе данных
• ✅ Гибкость: можно добавлять не только строки, но и картинки, пометки, данные

Пример кода для формы документа, где нужно выбрать способ оплаты:

&НаКлиенте
Процедура СпособОплатыПриСозданииНаСервере(Элемент)
СписокСпособов = Новый СписокЗначений;
СписокСпособов.Добавить("Наличные", "Наличный расчёт");
СписокСпособов.Добавить("Безналичный расчёт", "Безнал");
СписокСпособов.Добавить("Электронные деньги", "ЭДС");
СписокСпособов.Добавить("Бартер", "Бартер");

Элемент.СписокВыбора = СписокСпособов;
Элемент.Значение = СписокСпособов[0]; // Устанавливаем значение по умолчанию
КонецПроцедуры

Обратите внимание на синтаксис метода Добавить() — он принимает два параметра: значение (то, что будет записано в базу) и представление (то, что увидит пользователь). Это позволяет разделять технические идентификаторы и пользовательские надписи.

2. Динамическое заполнение из справочника или документа

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

Рассмотрим пример заполнения списка выбора складов из справочника Склады:

&НаКлиенте
Процедура СкладПриСозданииНаСервере(Элемент)
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
|   Склады.Ссылка КАК Ссылка,
|   Склады.Наименование КАК Наименование
|ИЗ
|   Справочник.Склады КАК Склады
|ГДЕ
|   Склады.ПометкаУдаления = ЛОЖЬ
|УПОРЯДОЧИТЬ ПО
|   Наименование";

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

СписокСкладов = Новый СписокЗначений;
Пока Выборка.Следующий() Цикл
СписокСкладов.Добавить(Выборка.Ссылка, Выборка.Наименование);
КонецЦикла;

Элемент.СписокВыбора = СписокСкладов;
КонецПроцедуры

Этот подход имеет несколько важных нюансов:

• 📌 Используйте ПометкаУдаления = ЛОЖЬ, чтобы исключить удалённые элементы
• 📌 Для больших справочников добавляйте ЛИМИТ или фильтры по реквизитам
• 📌 Если нужно отобразить дополнительные данные (например, адрес склада), используйте СписокСкладов.Добавить(..., Выборка.Наименование + " (" + Выборка.Адрес + ")")

Альтернативный способ — использование метода НайтиПоНаименованию() для справочников с небольшим количеством элементов:

СписокКонтрагентов = Новый СписокЗначений;
СправочникКонтрагентов = Справочники.Контрагенты;
Выборка = СправочникКонтрагентов.ВыбратьИерархически();
Пока Выборка.Следующий() Цикл
СписокКонтрагентов.Добавить(Выборка.Ссылка, Выборка.Наименование);
КонецЦикла;

3. Использование динамических списков (Query) для сложных выборок

Если варианты выбора должны формироваться по сложным условиям (например, "только активные контрагенты с долгом более 1000 рублей"), обычный СписокЗначений может оказаться неэффективным. В таких случаях лучше использовать динамические списки на основе запросов.

Преимущества динамических списков:

• 🔧 Гибкая фильтрация по любым реквизитам
• 🔧 Возможность объединения данных из нескольких таблиц
• 🔧 Автоматическое обновление при изменении данных

Пример: заполнение списка выбора номенклатуры, которая есть в наличии на выбранном складе:

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

Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ РАЗЛИЧНЫЕ
|   ОстаткиНоменклатуры.Номенклатура КАК Номенклатура,
|   ОстаткиНоменклатуры.Номенклатура.Наименование КАК Наименование
|ИЗ
|   РегистрНакопления.ОстаткиНоменклатуры.Остатки(
|       Склад = &Склад,
|       Дата = &ТекущаяДата
|   ) КАК ОстаткиНоменклатуры
|ГДЕ
|   ОстаткиНоменклатуры.КоличествоОстаток > 0
|УПОРЯДОЧИТЬ ПО
|   Наименование";

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

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

СписокНоменклатуры = Новый СписокЗначений;
Пока Выборка.Следующий() Цикл
СписокНоменклатуры.Добавить(Выборка.Номенклатура, Выборка.Наименование);
КонецЦикла;

ЭлементыФормы.Номенклатура.СписокВыбора = СписокНоменклатуры;
КонецЕсли;
КонецПроцедуры

В этом примере список номенклатуры обновляется динамически при изменении склада. Обратите внимание на:

• 🔹 Использование параметров запроса (&Склад, &ТекущаяДата) для безопасности
• 🔹 Фильтрацию по остаткам (КоличествоОстаток > 0)
• 🔹 Проверку заполненности склада (ЗначениеЗаполнено()), чтобы избежать ошибок

Убедитесь, что запрос не возвращает слишком много данных|Добавьте индексы для полей, используемых в WHERE|Ограничьте количество возвращаемых строк (TOP или ЛИМИТ)|Проверьте права пользователя на доступ к данным-->

4. Заполнение списка выбора через объекты метаданных

Иногда требуется заполнить список выборки всеми объектами определённого типа — например, всеми документами "Заказ покупателя" или всеми перечислениями. Для этого удобно использовать метаданные.

Пример: получение всех видов документов в базе:

СписокДокументов = Новый СписокЗначений;
МetaДанные = Метаданные.Документы;
Для Каждого Документ Из МetaДанные Цикл
СписокДокументов.Добавить(Документ.Имя, Документ.Синоним);
КонецЦикла;

Более практический пример — заполнение списка выборки перечислением (например, "ВидыНалогов"):

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

Этот метод полезен, когда:

• 📋 Нужно отобразить все возможные значения перечисления
• 📋 Требуется список всех справочников или документов в конфигурации
• 📋 Необходимо динамически формировать интерфейс на основе структуры метаданных

5. Оптимизация и обработка ошибок

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

1. Производительность:

• ⚡ Для больших справочников (более 1000 элементов) используйте ЛИМИТ в запросе или постраничную загрузку
• ⚡ Кэшируйте часто используемые списки (например, список валют или единиц измерения)
• ⚡ Избегайте вложенных циклов при формировании списков

2. Обработка ошибок:

Попытка
// Код заполнения списка
Исключение
ЗаписатьЖурналРегистрации(
НСтр("ru = 'Ошибка заполнения списка выбора'"),
УровеньЖурналаРегистрации.Ошибка,
،,
ПодробноеОписаниеОшибки()
);
СообщитьПользователю("Не удалось загрузить список. Обратитесь к администратору.");
КонецПопытки;

3. Типичные ошибки и их решения:

6. Продвинутые техники: зависимые списки и асинхронная загрузка

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

• 📍 Страна → Регион → Город
• 📦 Тип номенклатуры → Группа номенклатуры → Конкретная номенклатура
• 🏢 Организация → Подразделение → Сотрудник

Реализовать это можно с помощью обработчиков событий и асинхронных вызовов. Пример для цепочки "Страна → Регион":

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

Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
|   Регионы.Ссылка КАК Ссылка,
|   Регионы.Наименование КАК Наименование
|ИЗ
|   Справочник.Регионы КАК Регионы
|ГДЕ
|   Регионы.Страна = &Страна
|УПОРЯДОЧИТЬ ПО
|   Наименование";

Запрос.УстановитьПараметр("Страна", Элемент.Значение);
Результат = Запрос.Выполнить();

СписокРегионов = Новый СписокЗначений;
Выборка = Результат.Выбрать();
Пока Выборка.Следующий() Цикл
СписокРегионов.Добавить(Выборка.Ссылка, Выборка.Наименование);
КонецЦикла;

ЭлементыФормы.Регион.СписокВыбора = СписокРегионов;
ЭлементыФормы.Регион.Значение = Неопределено;
КонецПроцедуры

Для ускорения работы с большими справочниками можно использовать асинхронную загрузку с помощью ВыполнитьАсинхронно():

&НаКлиенте
Процедура ЗагрузитьСписокАсинхронно()
АсинхронныйВызов = Новый АсинхронныйВызов;
АсинхронныйВызов.ВыполнитьАсинхронно("НаСервереБезКонтекста ЗагрузитьБольшойСписок", , "ПослеЗагрузкиСписка");
КонецПроцедуры

&НаСервереБезКонтекста
Процедура ЗагрузитьБольшойСписок()
// Код загрузки данных
Возврат Результат;
КонецПроцедуры

&НаКлиенте
Процедура ПослеЗагрузкиСписка(Результат) Экспорт
ЭлементыФормы.Список.СписокВыбора = Результат;
КонецПроцедуры

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

7. Альтернативные подходы: формы выбора и внешние обработки

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

1. Формы выбора (1С:Предприятие)

Создайте отдельную форму с табличным полем и кнопкой "Выбрать". Пример:

&НаКлиенте
Процедура ОткрытьФормуВыбора(Команда)
ФормаВыбора = ПолучитьФорму("Справочник.Номенклатура.ФормаВыбора");
ФормаВыбора.Открыть();
Если ФормаВыбора.ЗакрытьПараметры.ВыбранноеЗначение <> Неопределено Тогда
ЭлементыФормы.Номенклатура.Значение = ФормаВыбора.ЗакрытьПараметры.ВыбранноеЗначение;
КонецЕсли;
КонецПроцедуры

2. Внешние обработки

Если логика выбора сложная и используется в нескольких местах, вынесите её во внешнюю обработку. Пример вызова:

Обработка = ВнешниеОбработки.Создать("ПутьКФайлу.epf");
Обработка.ОткрытьФормуВыбора(ЭтотОбъект);

3. Подключаемые команды

Для часто используемых списков (например, выбор контрагента) можно создать глобальную команду в конфигурации:

• 🔧 Зайдите в Общие → Команды
• 🔧 Создайте новую команду с действием ОткрытьФормуВыбора
• 🔧 Настройте параметры фильтрации

FAQ: Частые вопросы по программному заполнению списков выбора

ЭлементыФормы.Контрагент.ПоискПоНачалуСтроки = Истина;

Список = Новый СписокЗначений;
Список.Добавить(Справочники.Контрагенты.НайтиПоНаименованию("ООО Ромашка"), "Контрагент: ООО Ромашка");
Список.Добавить(Документы.ЗаказПокупателя.СоздатьДокумент(), "Новый заказ покупателя");

Запрос.Текст = "ВЫБРАТЬ ПЕРВЫЕ 50 ...";

Если Список.Количество() >= 50 Тогда
Прервать;
КонецЕсли;

&НаКлиенте
Процедура ФильтрПриИзменении(Элемент)
// Ваш код обновления списка
КонецПроцедуры

Список = Новый СписокЗначений;
ГруппаПоставщики = Список.ДобавитьГруппу("Поставщики");
Список.Добавить(ГруппаПоставщики, Справочники.Контрагенты.Поставщики.НайтиПоНаименованию("ООО Роза"));
ГруппаПокупатели = Список.ДобавитьГруппу("Покупатели");
Список.Добавить(ГруппаПокупатели, Справочники.Контрагенты.Покупатели.НайтиПоНаименованию("ИП Васильев"));

Если вам нужно реализовать нестандартное поведение списка выбора (например, многоуровневый выбор с чекбоксами или drag-and-drop), рассмотрите возможность создания кастомного элемента управления на основе Управляемых форм или использования HTML-клиента в веб-варианте 1С.

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