Добрый день. Создал обработку чтобы поменять у всех контрагентов кто есть в определенной групу счета учета, выходи ошибка :{ВнешняяОбработка.ВнешняяОбработка1.Форма.Форма.Форма(12)}: Итератор для значения не определен
    для каждого эллемент из Контрагент цикл

Подскажите как исправить?


&НаКлиенте
Процедура Сформировать(Команда)
    СформироватьНаСервере(Объект.Группа,объект.Организация,объект.СчетУчетаАвансовПолученных,объект.СчетУчетаРасчетовСПокупателем);
КонецПроцедуры

&НаСервере
Процедура СформироватьНаСервере(Группа, Организация, СчетУчАв, СчетУчРас)
    НаборЗаписей = РегистрыСведений.СчетаУчетаРасчетовСКонтрагентами.СоздатьНаборЗаписей();
    НоваяЗапись = НаборЗаписей.Добавить();
    Контрагент = Справочники.Контрагенты.ПолучитьСсылку();
    для каждого эллемент из Контрагент цикл
        Если эллемент.Родитель = Группа Тогда
            НоваяЗапись.Контрагент = эллемент;
        НоваяЗапись.Организация = Организация;
        НоваяЗапись.СчетУчетаРасчетовСПокупателем = СчетУчРас;
        НоваяЗапись.СчетУчетаАвансовПолученных = СчетУчАв;
        
        НаборЗаписей.Записать();
    КонецЕсли;
    КонецЦикла
КонецПроцедуры

Контрагент = Справочники.Контрагенты.ПолучитьСсылку();
    для каждого эллемент из Контрагент цикл

Это вообще что было???

(1) обойти всех контрагентов

(2) Таким способом можно обойти только все места, куда посылают грубыми словами.

Справочник обходится через .Выбрать()

>>выходи ошибка :

если на продуктиве, то можно сказать,  повезло

Тут всё серьёзнее.

у НаборЗаписей не установлен отбор. Он каждый раз будет переписывать весь регистр сведений

Ещё раз. Весь регистр СчетаУчетаРасчетовСКонтрагентами будет очищен

(6) Не будет. У неё код не запускается ))

(6)+ по всем контрагентам

(7) Вы сейчас поможете исправить Ссылка на Выборка и код сработает.

ну и по мелочи: НоваяЗапись = НаборЗаписей.Добавить() находится перед циклом

(7) еще немного брутфорса и запустится)

(6) Мне его нужно весь переписать

и добавить новых контрагентов

(12) Если пишете в регистр сведений, то лучше писать одну запись

(14) можно пример?

(15) МенеджерЗаписи.Записать();

(16) Через Менеджер, только одну запись создает, а мне нужно ко всем контрагентам создать(

(0) Мои глазы...


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

(18) +
НаборЗаписей = РегистрыСведений.СчетаУчетаРасчетовСКонтрагентами.СоздатьНаборЗаписей();

(17)         НоваяЗапись.Контрагент = Группа;

(18)+
забыл)

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

Регистр уже уничтожили?

(22) я надеюсь он делает на тестовой), но проверять это, я конечно же не буду...

(22) Надеюсь, да. А как еще учиться?