Бух 7.7 Получение результатов в режиме запроса
07.10.2009
09:45
#1
"Нужно получить данные по оборотам счетов 10 с "26", "20", "25"
Делаю запрос
>Таб.ИсходнаяТаблица("Таблица");
>Ит = СоздатьОбъект("БухгалтерскиеИтоги");
>Ит.ИспользоватьСубконто(Видысубконто.Материалы);
>Ит.ВыполнитьЗапрос(ВыбНачПериода,ВыбКонПериода,"10.1","26",,,,"СК");
>Ит.ВыбратьСубконто(ВидыСубконто.материалы,);
>Пока Ит.ПолучитьСубконто(ВидыСубконто.материалы) = 1 Цикл
отключаю элементы где не было движения
>Если (Ит.ДО()>0) тогда
>НОМ = ИТ.ДО();
>НОМ_К = ИТ.ДО(3);
>Таб.ВывестиСекцию("Субконто1");
>КонецЕсли;
>КонецЦикла;
>Таб.ТолькоПросмотр(1);
>Таб.Показать("Сформировать","""");
выдает движение по всем счетам ("20", "25", "26"), а надо по конкретному счету"
Делаю запрос
>Таб.ИсходнаяТаблица("Таблица");
>Ит = СоздатьОбъект("БухгалтерскиеИтоги");
>Ит.ИспользоватьСубконто(Видысубконто.Материалы);
>Ит.ВыполнитьЗапрос(ВыбНачПериода,ВыбКонПериода,"10.1","26",,,,"СК");
>Ит.ВыбратьСубконто(ВидыСубконто.материалы,);
>Пока Ит.ПолучитьСубконто(ВидыСубконто.материалы) = 1 Цикл
отключаю элементы где не было движения
>Если (Ит.ДО()>0) тогда
>НОМ = ИТ.ДО();
>НОМ_К = ИТ.ДО(3);
>Таб.ВывестиСекцию("Субконто1");
>КонецЕсли;
>КонецЦикла;
>Таб.ТолькоПросмотр(1);
>Таб.Показать("Сформировать","""");
выдает движение по всем счетам ("20", "25", "26"), а надо по конкретному счету"
Регистр учета выбытия имущества, работ,услуг,прав1c 7,7 Бюджетная. 634. Обработка для переноса данных в ББУ8
Читают тему
(гостей: 1)