Бухгалтерский запрос, выборка результатов.
07.06.2004
13:49
#1
"Цель: расчитать суммы процентов по кредитным договорам контрагентов.
В строках с 9 по 12 организую цикл в котором получаю накопительный итог процентов за каждый день начисления, но цикл не работает (не выполняется условие цикла БИ.ПолучитьПериод() = 1) почему ?
1 БИ = СоздатьОбъект("БухгалтерскиеИтоги");
2 БИ.ИспользоватьСубконто(ВидыСубконто.Контрагенты, , 1, 0);
3 БИ.ИспользоватьСубконто(ВидыСубконто.Договоры, , 1, 0);
4 БИ.ВыполнитьЗапрос(НачМесяца(ДатаДок), ДатаДок, Сч66_1, , , 1, "День", "С");
5 БИ.ВыбратьСубконто(1);
6 Пока БИ.ПолучитьСубконто(1) = 1 Цикл
7 БИ.ВыбратьСубконто(2);
8 Пока БИ.ПолучитьСубконто(2) = 1 Цикл
9 БИ.ВыбратьПериоды(,,, 1);
10 Пока БИ.ПолучитьПериод() = 1 Цикл
11 Сумма = Сумма + БИ.СНК() * БИ.Субконто(2).Ставка.Получить(БИ.НачДата) / (12 * ДатаЧисло(ДатаДок));
12 КонецЦикла;
13 КонецЦикла;
14 КонецЦикла;
"
В строках с 9 по 12 организую цикл в котором получаю накопительный итог процентов за каждый день начисления, но цикл не работает (не выполняется условие цикла БИ.ПолучитьПериод() = 1) почему ?
1 БИ = СоздатьОбъект("БухгалтерскиеИтоги");
2 БИ.ИспользоватьСубконто(ВидыСубконто.Контрагенты, , 1, 0);
3 БИ.ИспользоватьСубконто(ВидыСубконто.Договоры, , 1, 0);
4 БИ.ВыполнитьЗапрос(НачМесяца(ДатаДок), ДатаДок, Сч66_1, , , 1, "День", "С");
5 БИ.ВыбратьСубконто(1);
6 Пока БИ.ПолучитьСубконто(1) = 1 Цикл
7 БИ.ВыбратьСубконто(2);
8 Пока БИ.ПолучитьСубконто(2) = 1 Цикл
9 БИ.ВыбратьПериоды(,,, 1);
10 Пока БИ.ПолучитьПериод() = 1 Цикл
11 Сумма = Сумма + БИ.СНК() * БИ.Субконто(2).Ставка.Получить(БИ.НачДата) / (12 * ДатаЧисло(ДатаДок));
12 КонецЦикла;
13 КонецЦикла;
14 КонецЦикла;
"
07.06.2004
14:10
#2
"не проверял, но попробуй БИ.ВыбратьПериоды(,,3, 1);
в 9 строке, будет ли ПолучатьПериоды?
"
в 9 строке, будет ли ПолучатьПериоды?
"
Читают тему
(гостей: 1)