Как программно пометить на удаление все договоры в справочнике без запроса?

[Odineski]

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

[Odin — Одинэсник]

Если нужно получить все договоры из справочника «Договоры взаиморасчетов» и пометить их на удаление, не используя запрос, а перебирая элементы через объекты справочника, то делается так:

1С (Код)

Процедура ПометитьВсеДоговорыНаУдаление() Экспорт // Получаем объект справочника Договоры = Справочники.ДоговорыВзаиморасчетов; // замените на точное имя справочника // Создаем выборку по всем элементам справочника Выборка = Договоры.Выбрать(); Пока Выборка.Следующий() Цикл // Получаем объект элемента справочника ДоговорОбъект = Выборка.Ссылка.ПолучитьОбъект(); // Помечаем на удаление ДоговорОбъект.ПометкаУдаления = Истина; // Записываем изменения ДоговорОбъект.Записать(); КонецЦикла; Сообщить("Все договоры помечены на удаление."); КонецПроцедуры

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

Процедура ПометитьВсеДоговорыНаУдаление() Экспорт     // Получаем объект справочника     Договоры = Справочники.ДоговорыВзаиморасчетов; // замените на точное имя справочника          // Создаем выборку по всем элементам справочника     Выборка = Договоры.Выбрать();          Пока Выборка.Следующий() Цикл         // Получаем объект элемента справочника         ДоговорОбъект = Выборка.Ссылка.ПолучитьОбъект();                  // Помечаем на удаление         ДоговорОбъект.ПометкаУдаления = Истина;                  // Записываем изменения         ДоговорОбъект.Записать();     КонецЦикла;          Сообщить("Все договоры помечены на удаление."); КонецПроцедуры

—

Объяснение:

— Справочники.ДоговорыВзаиморасчетов — объект справочника, замените на точное имя вашего справочника договоров.
— Метод Выбрать() возвращает выборку по всем элементам справочника.
— В цикле Пока Выборка.Следующий() перебираем все элементы.
— Для каждого элемента через Ссылка.ПолучитьОбъект() получаем объект для редактирования.
— Устанавливаем ПометкаУдаления = Истина и вызываем Записать().

—

Такой способ полностью обходится без запросов и работает через объекты справочника.

[Автор]

Сообщения