Бухгалтерия бюдж 7.7 перенос. Выгрузка остатков по счету в txt
28.06.2010
17:25
#1
"Добрый день. Делаю перенос остатков по счетам из бух бюдж 7.7 в 8.1. Код такой:
КолвоСубконто = Счет.КоличествоСубконто();
БухИт = СоздатьОбъект("БухгалтерскиеИтоги");
БухИт.Опции(1,1);
Для Счетчик = 1 По КолвоСубконтоСчета Цикл
БухИт.ИспользоватьСубконто(Счет.ВидСубконто(Счетчик));
КонецЦикла;
БухИт.ВыполнитьЗапрос(,ДатаПо,Счет);
БухИт.ВыбратьСчета();
-----------------------------
Пока БухИт.ПолучитьСчет() = 1 Цикл
БухИт.ВыбратьСубконто();
Пока БухИт.ПолучитьСубконто() = 1 Цикл
И потом пытаюсь получить субконто из БухИт.Субконто(1) до БухИт.Субконто(5). В счете субконто 5 штук, но получить можно только три. В цикл "Пока БухИт.ПолучитьСубконто() = 1" отладчик заходит три раза, но их там точно 5. Подскажите, в чем ошибка.
Есть несколько примеров выгрузки в сети, но все они для 1-3 субконто, для 5-и по аналогии не работает."
КолвоСубконто = Счет.КоличествоСубконто();
БухИт = СоздатьОбъект("БухгалтерскиеИтоги");
БухИт.Опции(1,1);
Для Счетчик = 1 По КолвоСубконтоСчета Цикл
БухИт.ИспользоватьСубконто(Счет.ВидСубконто(Счетчик));
КонецЦикла;
БухИт.ВыполнитьЗапрос(,ДатаПо,Счет);
БухИт.ВыбратьСчета();
-----------------------------
Пока БухИт.ПолучитьСчет() = 1 Цикл
БухИт.ВыбратьСубконто();
Пока БухИт.ПолучитьСубконто() = 1 Цикл
И потом пытаюсь получить субконто из БухИт.Субконто(1) до БухИт.Субконто(5). В счете субконто 5 штук, но получить можно только три. В цикл "Пока БухИт.ПолучитьСубконто() = 1" отладчик заходит три раза, но их там точно 5. Подскажите, в чем ошибка.
Есть несколько примеров выгрузки в сети, но все они для 1-3 субконто, для 5-и по аналогии не работает."
29.06.2010
17:26
#3
"Я понял, что он оборотный, но следующий за ним субконто не оборотный, а если ходить так по циклам:
БухИт.ВыбратьСубконто(2,1,,,1);
Пока БухИт.ПолучитьСубконто(2) = 1 Цикл
БухИт.ВыбратьСубконто(3,1,,,1);
Пока БухИт.ПолучитьСубконто(3) = 1 Цикл
отладчик выйдет из цикла, как только встретит оборотный субконто и необоротный не будет задан. Например, субконто: КБК, КОСГУ(об), Номенклатура, Центры ответственности. Цикл выйдет уже на втором условии, посчитаются итоги только в разрезе КБК, без учета Номенклатуры."
БухИт.ВыбратьСубконто(2,1,,,1);
Пока БухИт.ПолучитьСубконто(2) = 1 Цикл
БухИт.ВыбратьСубконто(3,1,,,1);
Пока БухИт.ПолучитьСубконто(3) = 1 Цикл
отладчик выйдет из цикла, как только встретит оборотный субконто и необоротный не будет задан. Например, субконто: КБК, КОСГУ(об), Номенклатура, Центры ответственности. Цикл выйдет уже на втором условии, посчитаются итоги только в разрезе КБК, без учета Номенклатуры."
Читают тему
(гостей: 1)