УТ 10.3.21.2, отбор по ФИФО, новичок в восьмерке

Нужно делать перемещение между организациями одной группы компаний через реализацию по ФИФО, по закупочным ценам.
В документе РеализацияТоваровУслуг пользователь должен выбрать товары и количество, а потом по кнопке эти строчки должны быть удалены и заменены на набор по ФИФО. Все приходы - в документах ПоступлениеТоваровУслуг.

Написала пока простой код:

ТЗТаблЧ = Новый ТаблицаЗначений;
    ТЗТаблЧ.Очистить();
    ТЗТаблЧ = Товары.Выгрузить();
    Товары.Очистить();

    ТЗТаблЧРегистратора = Новый ТаблицаЗначений;

    к=0;
    Для Каждого Стр Из ТЗТаблЧ Цикл

          ОбработкаПрерыванияПользователя();

        к=к+1;
        Состояние("Обрабатывается строка - " + (Строка(к)));
        ВыбКоличество=Стр.Количество;

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

        ЗапросПТУ.УстановитьПараметр("Организация", Организация);
        ЗапросПТУ.УстановитьПараметр("Склад", Склад);
        ЗапросПТУ.УстановитьПараметр("Номенклатура", Стр.Номенклатура);
        ЗапросПТУ.УстановитьПараметр("Проведен", Истина);
        ЗапросПТУ.УстановитьПараметр("ОтметкаБухгалтера", Истина);

        ТЗЗапроса = ЗапросПТУ.Выполнить().Выгрузить();

        Для Каждого СтрЗапроса Из ТЗЗапроса Цикл

            ОбработкаПрерыванияПользователя();

            НоваяСтрока = Товары.Добавить();
            Товар=СтрЗапроса.Номенклатура;
            НоваяСтрока.Номенклатура                        = Товар;
            //НоваяСтрока.ХарактеристикаНоменклатуры          = СтрЗапроса.ХарактеристикаНоменклатуры;
            Выборка=Справочники.ЕдиницыИзмерения.Выбрать(,Товар);
            Пока Выборка.Следующий() Цикл
                ЕдиницаИзмерения=Выборка.Ссылка;
                Если ЕдиницаИзмерения.ЕдиницаПоКлассификатору=СтрЗапроса.БазоваяЕдиницаИзмерения Тогда
                    Прервать;
                КонецЕсли;
            КонецЦикла;
            НоваяСтрока.ЕдиницаИзмерения                    = ЕдиницаИзмерения;
            //НоваяСтрока.ЕдиницаИзмеренияМест                = ;
            НоваяСтрока.Коэффициент                         = 1;
            НоваяСтрока.СтавкаНДС                           = Товар.СтавкаНДС;

            Регистратор=СтрЗапроса.Регистратор;
            ТЗТаблЧРегистратора.Очистить();
            ТЗТаблЧРегистратора = Регистратор.Товары.Выгрузить();
            ТекСтр=ТЗТаблЧРегистратора.Найти(Товар,"Номенклатура");
            НоваяСтрока.Цена  = ТекСтр.Цена/ТекСтр.Коэффициент;

            НоваяСтрока.СпособСписанияОстаткаТоваров = Перечисления.СпособыСписанияОстаткаТоваров.СоСклада;
            НоваяСтрока.Качество                     = Справочники.Качество.Новый;
            НоваяСтрока.КлючСтроки = УправлениеЗапасами.ПолучитьНовыйКлючСтроки(ЭтотОбъект);
            НоваяСтрока.КлючСвязи                       = 0;
            Если СтрЗапроса.КонОстКоличества < ВыбКоличество Тогда
                НоваяСтрока.Количество  = СтрЗапроса.КонОстКоличества;
                НоваяСтрока.Сумма = СтрЗапроса.КонОстКоличества*ТекСтр.Цена;
                ОбработкаТабличныхЧастей.РассчитатьСуммуНДСТабЧасти(НоваяСтрока, ЭтотОбъект);
                ВыбКоличество = ВыбКоличество - СтрЗапроса.КонОстКоличества;
                //НоваяСтрока.КоличествоМест                      = СтрЗапроса.КоличествоМест;
            Иначе
                НоваяСтрока.Количество  = ВыбКоличество;
                //НоваяСтрока.КоличествоМест                      = СтрЗапроса.КоличествоМест;
                НоваяСтрока.Сумма = ТекСтр.Цена*ВыбКоличество;
                ОбработкаТабличныхЧастей.РассчитатьСуммуНДСТабЧасти(НоваяСтрока, ЭтотОбъект);
                Прервать;
            КонецЕсли;

        КонецЦикла;

    КонецЦикла;

По первому документу реализации все хорошо. Со второго выбирает, начиная с нужного Поступления, но с неверным СтрЗапроса.КонОстКоличества. Скажем, было 3 поступления - на 20,40,30 штук. Первой реализацией списываю 30 штук (20+10 сверху вниз, остаток 0,30,30), вторая должна списывать 40 штук, начиная со 2 поступления, т.е.30+10, а списывает 20+20.

Вопросы:1. Что неправильно? 2. Как правильно написать запрос, чтобы сразу цеплять все?

Буду благодарна за любую помощь!)