Помогите!!! избежать увилечения вдвое кол-ва товара на складе при ПЕРЕпроведении ПрихНакл

"Вычисление фактического остатка товаров производиться в модуле Формы-Документ.РасхНакл ( при вводе кол-ва запрашиваемого товара) с помощью функции:<br>Функция ФактическийОстаток(Товар)<br> ФактОст=0;<br> БИ=СоздатьОбъект("БухгалтерскиеИтоги");<br> БИ.ВключатьСубсчета(1,1);<br> БИ.Использоватьсубконто(ВидыСубконто.Товары,Товар,2);<br> БИ.Использоватьсубконто(ВидыСубконто.Склады,Склад,2);<br> БИ.ВыполнитьЗапрос(,РабочаяДата(),СчетПоКоду("41.1"),,,,,5);<br> ФактОст=БИ.СКД("К");<br> Возврат ФактОст;<br> БИ=0;<br>КонецФункции<br><br>Я поняла так, что БИ.СКД("К") как раз увеличивается в двое при ПЕРЕпроведении ПрихНакл:<br><br>Процедура ОбработкаПроведения()<br><br> Сч19_3=СчетПоКоду("19.3");<br> Сч41_1=СчетПоКоду("41.1");<br> Сч60_1=СчетПоКоду("60.1");<br> Сч68_3=СчетПоКоду("68.3");<br> <br> ВыбратьСтроки();<br> Пока ПолучитьСтроку() = 1 Цикл<br>       Если Сумма>0 Тогда<br>            Операция.НоваяПроводка();<br>            Операция.Дебет.Счет=Сч41_1;<br>            Операция.Дебет.Товары=Товар;<br>            Операция.Дебет.Склады=Склад;<br>            Операция.Дебет.Партии=ТекПартия;<br>            Операция.Кредит.Счет=Сч60_1;<br>            Операция.Кредит.Контрагенты=Контрагент;<br> Операция.Кредит.Партии=ТекПартия;<br>            Операция.Количество=Количество;<br>            Операция.Сумма=Сумма;<br>            <br>            Операция.СодержаниеПроводки="Поступили товары";<br>            Операция.НомерЖурнала="ТВ";<br> КонецЕсли;<br> КонецЦикла;<br> <br> Сумма_НДС=Итог("СуммаНДС");<br> Если Сумма_НДС>0 Тогда<br> Операция.НоваяПроводка();<br> Операция.Дебет.Счет=Сч19_3;<br> Операция.Кредит.Счет=Сч60_1;<br> Операция.Кредит.Контрагенты=Контрагент;<br> Операция.Кредит.Партии=ТекПартия;<br> Операция.Сумма=Сумма_НДС;<br> <br> Операция.СодержаниеПроводки="Выделен НДС по поступ. товарам";<br> Операция.НомерЖурнала="ТВ";<br> <br> Операция.НоваяПроводка();<br> Операция.Дебет.Счет=Сч68_3;<br> Операция.Кредит.Счет=Сч19_3;<br> Операция.Сумма=Сумма_НДС;<br> <br> Операция.СодержаниеПроводки="Зачтен НДС по поступ. товарам";<br> Операция.НомерЖурнала="ТВ";<br> КонецЕсли;<br><br> Операция.Содержание="ПоступлениеТоваров";<br> Операция.СуммаОперации=Итог("Всего");<br> Операция.Записать();<br><br>КонецПроцедуры<br><br>Не могу никак понять в чем ошибка и как ее исправить соответственно. Если кто то увидит наметанным глазом буду ОЧЕНЬ признательна!"

У Вас в приходе устанавливаются 3 субконтто, а в расходе только 2, поэтому скорее всего функция возвращает остаток, суммируя по нескольким партиям

"> ...<br>> БИ.ВыполнитьЗапрос(,РабочаяДата(),СчетПоКоду("41.1"),,,,,5);<br>> ФактОст=БИ.СКД("К");<br>> Возврат ФактОст;<br>> БИ=0;<br>> КонецФункции<br>> Я поняла так, что БИ.СКД("К") как раз увеличивается в двое при ПЕРЕпроведении ПрихНакл:<br>Вот ошибка:<br>БИ.ВыполнитьЗапрос(,РабочаяДата(),СчетПоКоду("41.1"),,,,,5);<br>надо так:<br>БИ.ВыполнитьЗапрос(,ТекущийДокумент(),СчетПоКоду("41.1"),,,,,5);<br>Тогда СКД не будеть задваиваться"