РеестрДокументов

"ТиС 9.2 релиз 947<br>В отчете РеестрДокументов у меня выводится список номенклатуры<br>из табличной части. Хотелось бы вывести себестоимость <br>каждой номенклатурной позиции из регистра партий. <br><br>В модуле написал следующее:<br><br>Пока Док.ПолучитьДокумент()=1 Цикл<br> <br>Если Док.Вид()="Реализация" Тогда<br>Если РегПартии.ВыбратьДвиженияДокумента(Док)=1 Тогда<br>Пока РегПартии.ПолучитьДвижение()=1 Цикл<br> Док.ВыбратьСтроки();<br> Пока Док.ПолучитьСтроку()=1 Цикл<br> СебестоимостьНДС=РегПартии.СуммаРуб; <br> СебестоимостьБезНДС=РегПартии.СуммаБезНДС; <br> КонецЦикла;<br>КонецЦикла;<br>КонецЕсли;<br>КонецЕсли;<br><br>Но не получается:(<br>"

Если РегПартии.ВыбратьДвиженияДокумента(Док.ТекущийДокумент())=1 Тогда

Все равно не получается. Если в табличной части несколько позиций, отчет выдает по всем позициям одну и ту же цифру - себестоимость последней позиции.

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

а не проще написать запросом?<br>по какому регистру нужнен отчет, по ПартииОтданные?

В принципе, да. Я проблему решил способом похожим на тот, что предложил Thorvardr, но только еще менее красивым - с большим количеством циклов и условий.

нууу, я просто вас не хотил грузить запросами, если вы только начинаете, то проще сделать методом перебора и прямыми проверками, получается некрасиво, но читабельно

"Так я не в упрек. Наоборот, огромное спасибо;)"