!!! Обороты по счету !!! ПОМОГИТЕ !!!

Новая тема
"Проблема в следующем:

по счету 19 (он делится по субсчетам, но программе надо по всем и каждому) необходимо получить кредитовый оборот за период по 2-м субконто. Ограничение одно - не должны учитываться обороты по корреспонденциям: 19-19 и 68-19. Сижу уже 2 часа, полный ступор, как никручу, но получаю весь оборот по 19 счету.

Привожу пример кода:



       НДС=0;

Ит=СоздатьОбъект("БухгалтерскиеИтоги");

Ит.ИспользоватьСубконто(ВидыСубконто.Контрагенты,Контраг);

Ит.ИспользоватьСубконто(ВидыСубконто.СчетаФактурыПолученные,Док.ДокументОснование);

Ит.ВключатьСубсчета(1,1);

Ит.ВыполнитьЗапрос(НачМесяца(Док.ДатаДок),КонМесяца(Док.ДатаДок),"19");

НДС=Ит.КО();

   

Ит.ВыполнитьЗапрос(НачМесяца(Док.ДатаДок),КонМесяца(Док.ДатаДок),"19", "19,68");

НДС=НДС - Ит.КО();



В итоге НДС = 0     :(



И всё, вошел в ступор :(



Вот где ошибка?"
"Ит=СоздатьОбъект("БухгалтерскиеИтоги");

Ит.ИспользоватьСубконто(ВидыСубконто.Контрагенты, Контраг, 2);

Ит.ИспользоватьСубконто(ВидыСубконто.СчетаФактурыПолученные, Док.ДокументОснование, 2);

Ит.ВыполнитьЗапрос(НачМесяца(Док.ДатаДок),КонМесяца(Док.ДатаДок),"19", , , 3, ,"С");

НДС = Ит.КО("С");

Если Ит.ПолучитьКорСчет(,"19") = 1 Тогда

НДС = НДС - Ит.КорКО("С");

КонецЕсли;  

Если Ит.ПолучитьКорСчет(,"68") = 1 Тогда

НДС = НДС - Ит.КорКО("С");

КонецЕсли;  "
Огромное спасибо за ответ!



Правда я сам уже разобрался: попил кофе, покурил, разгрузил мозг и ... вспомнил про обороты :)))

Вот что происходит, когда непрерывно в течении дня работаешь :((



Еще раз спасибо за ответ.
Читают тему
(гостей: 1)

Быстрый переход