Привет Всем, есть регистр сведений в котором нужно изменить данные:

1. Я отбираю данные из регистра Через конструкцию вида
набор.Отбор.Измерение1.Установить(Значение);
2. Далее я изменяю в этом наборе значение "Измерение1"
3. Выдает ошибку что нельзя изменять значения Измерений которые участвуют в отборе.

Как обойти данную проблему?

Создать набор с нужными данными, записать, а ненужные данные удалить

(1) Не согласен с начало надо удалить а потом создать! ;-)

(2) Садись, два. Если сначала удалить, а потом при создании будет ошибка, то повторно создать уже не получится.
Это если без транзакции, конечно же.

(3) Прекрасно работает!                НаборЗапПлощадь = РегистрыСведений.ГУТА_ИнформацияОПомещениях.СоздатьНаборЗаписей();
                    НаборЗапПлощадь.Отбор.Период.Установить(НаДату);
                    НаборЗапПлощадь.Отбор.Помещение.Установить(НовыйЭлементСпрПом.Ссылка);
                    НаборЗапПлощадь.Прочитать();
                    НаборЗапПлощадь.Очистить();
                    НовЗапись = НаборЗапПлощадь.Добавить();
                    НовЗапись.Период = НаДату;
                    НовЗапись.Помещение = НовыйЭлементСпрПом.Ссылка;
                    НовЗапись.Площадь = СтрТаб.ПлощадьПомещенияПоБТИ;
                    НовЗапись.ТипПомещения = СтрТаб.ТипПомещения;
                
                        НаборЗапПлощадь.Записать();

(4) так не сработает, у тебя ошибка будет: "нельзя изменять значения Измерений которые участвуют в отборе"

(0) Нужно удалить запись с одним значением измерения и затем создать запись с другим значением измерения.

1. создать набор записей со старым отбором и прочитать его
2. создать другой набор записей с новым отбором
3. скопировать данные из старого в новый, изменяя данные касательные отбора
4. записать новый набор
5. создать набор записей со старым отбором и не читая записать его (то есть удалить!)

(4) Помимо сказанного в (5) не ясно, зачем ты читаешь набор перед его очисткой

(5,6,7,8) Согласен!

Хотя... без Прочитать() в нем записей и не будет, ничего не очистится по идее

(10) Очистится

Прекрасно работает вот такой код!


Процедура КнопкаВыполнитьНажатие(Кнопка)
        НаборЗапПлощадь = РегистрыСведений.ГУТА_ИнформацияОПомещениях.СоздатьНаборЗаписей();
            //        НаборЗапПлощадь.Отбор.Период.Установить(НаДату);
                    НаборЗапПлощадь.Отбор.Помещение.Установить(НовыйЭлементСпрПом.Ссылка);
                    НаборЗапПлощадь.Записать();
                
                    НовЗапись = НаборЗапПлощадь.Добавить();
                    НовЗапись.Период = НаДату;
                    НовЗапись.Помещение = НовыйЭлементСпрПом.Ссылка;
                    НовЗапись.Площадь = ПлощадьПомещенияПоБТИ;
                    НовЗапись.ТипПомещения = ТипПомещения;
                    Попытка
                        НаборЗапПлощадь.Записать();
                        Сообщить("Элемент справочника ""Помещения для сдачи в аренду"" с наименованием - " + НовыйЭлементСпрПом.Наименование + " успешно записан.");
                    Исключение
                        Сообщить(ОписаниеОшибки());
                    КонецПопытки;

КонецПроцедуры

(0) Покажи листинг!

отбор
прочитать
кукуку
записать

(12) Мне не нужно создавать новую запись, а нужно исправить старую

(15) в (14) что не понятно?

(15) А в чем разница? Вы знаете что у записей регистров нет ссылок на себя?

Разобрался, Всем спасибо, Итог такой:

1. Выбираю записи
2. Копирую текущую запись
3. Изменяю что нужно
4. Удаляю старый набор
5. Записываю новый набор в режиме "Не замещать"

Код:

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

        КонецЕсли;
        
    КонецЦикла;
    
    
    Если НаборЗаписей.Количество() > 0 Тогда
        НаборЗаписей.Очистить();
        НаборЗаписей.Записать();
        НовыйНаборДляЗаписи.Записать(Ложь);        
    КонецЕсли;