0
gnomich
03.06.15
✎
09:54
|
Прошу сильно не пинать, это мои первые попытки кодить в 1с.
создал отчет по расходам вот код:
Процедура Сформировать()
перем кто;
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сформировать");
Ит = СоздатьОбъект("БухгалтерскиеИтоги");
Ит.ИспользоватьСубконто(ВидыСубконто.ДвиженияДенежныхСредств,, 1);
Ит.ВыполнитьЗапрос(ВыбНачПериода, ВыбКонПериода, "50.1",,, 1, "Проводка", "С");
Таб.ВывестиСекцию("Шапка");
Таб.Опции(0,0,Таб.ВысотаТаблицы(),0);
Ит.ВыбратьСубконто(ВидыСубконто.ДвиженияДенежныхСредств);
Пока Ит.ПолучитьСубконто(ВидыСубконто.ДвиженияДенежныхСредств) = 1 Цикл
Таб.ВывестиСекцию("Субконто1");
Ит.ВыбратьПериоды();
Пока Ит.ПолучитьПериод() = 1 Цикл
Док=Ит.Операция;
Если (Док.Документ.Вид()="РасходныйОрдер")или (Док.Документ.Вид()="ПриходныйОрдер")тогда
Если (Док.Документ.Вид()="РасходныйОрдер") тогда
кто=Док.Документ.Выдать; иначе
кто=Док.Документ.ПринятоОт;
КонецЕсли;
ВидЗатрат=Док.Документ.Субконто1;
Осн=Док.Документ.Основание;
Дат=Док.Документ.ДатаДок;
Ком=Док.Документ.Комментарий;
КонецЕсли;
Таб.ВывестиСекцию("Период");
КонецЦикла;
КонецЦикла;
Таб.ВывестиСекцию("Подвал");
Таб.ТолькоПросмотр(1);
Таб.Показать("Сформировать","");
КонецПроцедуры
подскажите как мне добавить группировку с итого по колонке "кто"
|
|