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

А что, запросы отменили?

(1) Видимо, у них за такое сразу отлучение

(2) 1C Анафема?

(0) "...нужно отобрать все элементы справочника номенклатур"

Если не секрет, зачем?

(4) Чтобы пометить на удаление, если их нету в оприходованиях.

(1) Запросом пробовал, не вышло...видать я не дорос до них еще...

(5) Типа... свёртку базы замутил?

(6) Пометить на удаление все элементы, удалить все что получилось, снять пометку - не предалагаю.

(7) Чищу базу от мусора, вернее пытаюсь.

(9) бугага))

(10) Я немного нетрезв) но допер как правильно:
выборкаСпр =  Справочники.Номенклатура.Выбрать();
Пока выборкаСпр.Следующий() Цикл
    Если  выборкаСпр.ЭтоГруппа = Истина Тогда                     
    Иначе    
        НайденнаяСтрока=НоменклатураДок.Найти(выборкаСпр.Наименование);    
        Если
            НайденнаяСтрока = Неопределено Тогда     
                 выборкаСпр.ПолучитьОбъект().УстановитьПометкуУдаления(Истина,Ложь);
                Сообщить("Поментка установлена:"+выборкаСпр.Наименование);
        КонецЕсли;
    КонецЕсли;
    КонецЦикла;

Можно закрывать этот стыд))))

(11) Я понимаю пятница (была), но это мощно... Я х.з. чем мощнее (8), но что то в этом есть...