"Такая вот трабла...<br><br>Следующий фрагмент выдает выручку в таблицу значений.<br>Для 2005 г. все нормально, т.е. выдавались суммы без НДС.<br>В 2006 г. изменился учет, и суммы выдаются с НДС, а надо без.<br>Известно, что если из итога вычесть оборот по счету 90.3 (НДС),<br>то получается нужный итог. Но помимо этого в каждой строке нужно<br>также вычитать счет 90.3.<br>КАК???<br><br>Процедура БухИтоги(ВыбНачПериода, ВыбКонПериода);<br>Ит = СоздатьОбъект("БухгалтерскиеИтоги");<br>Тз = СоздатьОбъект("ТаблицаЗначений");<br>Тз.НоваяКолонка("Заказ","Справочник.Заказы");<br>Тз.НоваяКолонка("ВН","Справочник.ВидыНоменклатуры");<br>Тз.НоваяКолонка("Контр","Справочник.Контрагенты");<br>Тз.НоваяКолонка("Выр","Число"); //выручка с НДС (в 2006 г.)<br>Тз.НоваяКолонка("НДС","Число"); Сумма НДС (добавлено для 2006 г.)<br>Тз.НоваяКолонка("БезНДС","Число"); Сумма без НДС (добавлено для 2006 г.)<br>Ит.ИспользоватьСубконто(ВидыСубконто.ВидыНоменклатуры,, 1);<br>Ит.ИспользоватьСубконто(ВидыСубконто.Заказы,, 1);<br>Ит.ИспользоватьКорСубконто(ВидыСубконто.Контрагенты,, 1);<br>Ит.ВыполнитьЗапрос(ВыбНачПериода, ВыбКонПериода,<br> "90.1.1","62.1,62.11",, 2,, "С");<br><br>Ит.ВыбратьСубконто(ВидыСубконто.Заказы);<br>Пока Ит.ПолучитьСубконто(ВидыСубконто.Заказы) = 1 Цикл<br> Ит.ВыбратьСубконто(ВидыСубконто.ВидыНоменклатуры);<br> Пока Ит.ПолучитьСубконто(ВидыСубконто.ВидыНоменклатуры) = 1 Цикл<br> Ит.ВыбратьКорСубконто(ВидыСубконто.Контрагенты);<br> Пока Ит.ПолучитьКорСубконто(ВидыСубконто.Контрагенты) = 1 Цикл<br> Если Ит.КорКО() <> 0 Тогда<br> Тз.НоваяСтрока();<br> Тз.Контр = Ит.КорСубконто(ВидыСубконто.Контрагенты);<br> Тз.Заказ = Ит.Субконто(ВидыСубконто.Заказы);<br> Тз.ВН = Ит.Субконто(ВидыСубконто.ВидыНоменклатуры);<br> ТЗ.Выр = Ит.КорКО(); //Выручка с НДС<br>// ТЗ.НДС = ????<br>// ТЗ.БезНДС= ????<br>//здесь нужно вычислять сумму НДС, или сумму без НДС (используя счет 90.3)<br>//или, возможно, после заполнения Тз перебрать ее строки, и как-то<br>//вычислить эти значения?...<br> КонецЕсли; //есть оборот<br> КонецЦикла; //по контрагентам<br> КонецЦикла; //по номенклатуре<br>КонецЦикла; //по заказам<br>КонецПроцедуры"