не показывает СНД по сумме
SIA1987
15.04.2009 - 05:25
|
Здрасте всем. Есть текст кода, который формирует файл с остатками по счетам, но количество я получаю но сумма не считается (СНД(1)), вот текст БИ = СоздатьОбъект("БухгалтерскиеИтоги"); Счета = "10.1,10.2,10.3,10.4,10.5,10.6,10.7,10.8,10.9,10.10,10.11.1,10.11.2,10.12"; БИ.ИспользоватьСубконто(); БИ.ИспользоватьСубконто(); БИ.ИспользоватьСубконто(); БИ.ВыполнитьЗапрос('01.01.09','01.01.09',Счета,,,,,5); БИ.ВыбратьСчета(1,,,1); Пока БИ.ПолучитьСчет() = 1 Цикл БИ.ВыбратьСубконто(1); Пока БИ.ПолучитьСубконто(1) = 1 Цикл БИ.ВыбратьСубконто(2); Пока БИ.ПолучитьСубконто(2) = 1 Цикл Если БИ.Счет.КоличествоСубконто() = 3 Тогда БИ.ВыбратьСубконто(3); Пока БИ.ПолучитьСубконто(3) = 1 Цикл Если (БИ.СНД(1) = 0) и (БИ.СНД(3) = 0) Тогда Продолжить; конецЕсли; Счет = БИ.Счет.Наименование; Сум = БИ.СНД(1); Кол = БИ.СНД(3); Субконто1 = БИ.Субконто(1).Наименование; Субконто2 = БИ.Субконто(2).Наименование; Субконто3 = БИ.Субконто(3).Наименование; Файл.Добавить(); Файл.Schet = Счет; Файл.Subkonto1 = Субконто1; Файл.Subkonto2 = Субконто2; Файл.Subkonto3 = Субконто3; Файл.Sum = Сум; Файл.Kol = Кол; Файл.Записать(); конецЦикла; Это часть кода, где я рассчитываю начальное сальдо, сумма вообще есть, проверял по оборотке. |