Помогите найти ошибку создания регистра

При записи справочники надо сделать записи в регистре сведений по тз на форме. В тз несколько строк, но запись делается только по первой. Подскажите, что не так.

&НаСервере
Процедура ПослеЗаписиНаСервере(ТекущийОбъект, ПараметрыЗаписи)



    для каждого стр из дляконтроля цикл
    Контроль = РегистрыСведений.контроль1.СоздатьМенеджерЗаписи();
Контроль.Поставщик = объект.Контрагент;
Контроль.контрагент = объект.Контрагент;
Контроль.Контракт = объект.ссылка;
Контроль.Пользователь = ПользователиИнформационнойБазы.ТекущийПользователь();
контроль.Номенклатура=стр.номенклатура;
контроль.ЦенаДо=стр.до;
контроль.ЦенаПосле=стр.после;
Контроль.ДатаИзменения = текущаядата();

    Контроль.Записать();
конеццикла;