HelpF.pro

Добавление в список значений элементов справочника помеченных на удаление и управление ими

Код 1C v 8.х
 СписокЗначений = Новый СписокЗначений;

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

Для каждого ТекЭлемент Из СписокЗначений Цикл
Если НЕ ТекЭлемент.Пометка Тогда // если убрали пометку, то убираем и в справочнике
ТекЭлемент.Значение.ПолучитьОбъект().УстановитьПометкуУдаления(Ложь,); // Подчиненные помечать на удаление не будем
КонецЕсли;
КонецЦикла

Опубликовано на сайте: https://HelpF.pro
Прямая ссылка: https://HelpF.pro/faq/view/1244.html