Бухгалтерские итоги. Получить остатки и обороты как в ОСВ по счету
29.07.2010
08:17
#1
"Необходимо пересчитать суммы в документах по средневзвешенной цене, полученной в конце месяца.
Хочу получить остатки на конец периода по номенклатуре и записать это все в ТЗ для дальнейшего использования. Есть позиции у которых остатка нет на конец месяца, тогда я хочу получить их КО. Почему то сразу в выборке нет строк с нулевыми остатками, хотя я беру остатки и обороты по счету в целом. Почему не получается?
Ит = СоздатьОбъект("БухгалтерскиеИтоги");
Ит.ИспользоватьСубконто(ВидыСубконто.Номенклатура,, 1);
Ит.ИспользоватьСубконто(ВидыСубконто.МестаХранения,, 1);
Ит.ВыполнитьЗапрос(НачДата,КонМесяца(КонДата), ВыбСчет,,, 1,, "СК");
Ит.ВыбратьСубконто(ВидыСубконто.Номенклатура);
Пока Ит.ПолучитьСубконто(ВидыСубконто.Номенклатура) = 1 Цикл
ТЗ.НоваяСтрока();
ТЗ.Номенк = Ит.Субконто(ВидыСубконто.Номенклатура);
ТЗ.Сумма = Ит.СКД();
ТЗ.Количество = Ит.СКД(3);
ТЗ.ЦенаСрВз = ?(ТЗ.Количество<>0, ТЗ.Сумма/ТЗ.Количество, 0);
Если (Ит.СКД() = 0) И (Ит.КО("С") <> 0) Тогда
СумКт = Ит.КО("С");
ТЗ.СумРасхода = СумКт;
КонецЕсли;
КонецЦикла;
"
Хочу получить остатки на конец периода по номенклатуре и записать это все в ТЗ для дальнейшего использования. Есть позиции у которых остатка нет на конец месяца, тогда я хочу получить их КО. Почему то сразу в выборке нет строк с нулевыми остатками, хотя я беру остатки и обороты по счету в целом. Почему не получается?
Ит = СоздатьОбъект("БухгалтерскиеИтоги");
Ит.ИспользоватьСубконто(ВидыСубконто.Номенклатура,, 1);
Ит.ИспользоватьСубконто(ВидыСубконто.МестаХранения,, 1);
Ит.ВыполнитьЗапрос(НачДата,КонМесяца(КонДата), ВыбСчет,,, 1,, "СК");
Ит.ВыбратьСубконто(ВидыСубконто.Номенклатура);
Пока Ит.ПолучитьСубконто(ВидыСубконто.Номенклатура) = 1 Цикл
ТЗ.НоваяСтрока();
ТЗ.Номенк = Ит.Субконто(ВидыСубконто.Номенклатура);
ТЗ.Сумма = Ит.СКД();
ТЗ.Количество = Ит.СКД(3);
ТЗ.ЦенаСрВз = ?(ТЗ.Количество<>0, ТЗ.Сумма/ТЗ.Количество, 0);
Если (Ит.СКД() = 0) И (Ит.КО("С") <> 0) Тогда
СумКт = Ит.КО("С");
ТЗ.СумРасхода = СумКт;
КонецЕсли;
КонецЦикла;
"
1С7.7 (КОМПЛЕКСНАЯ) РЕД. 4.5 РЕЛИЗ: 7.70.481 И 1С7.7 (УСН) РЕД. 1.3. РЕЛИЗ: 7.70.166Персонифецированный учет
Читают тему
(гостей: 1)