Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
14 дек 2024, 23:37

Помогите с макетом

Автор TamKar, 11 мая 2012, 12:52

0 Пользователей и 1 гость просматривают эту тему.

TamKar

ЗапросОрг = новый Запрос;
         ЗапросОрг.Текст = "ВЫБРАТЬ
                           |   РасчетыйСчетОстаткиИОбороты.Организация КАК Организация,
                           |   РасчетыйСчет.ВидДвижения КАК ВидДвижения,
                           |   РасчетыйСчетОстаткиИОбороты.ВидДеятельности КАК ВидДеятельности,
                           |   РасчетыйСчетОстаткиИОбороты.Статья.Родитель КАК Родитель,
                           |   РасчетыйСчетОстаткиИОбороты.Статья КАК Статья,
                           |   РасчетыйСчетОстаткиИОбороты.СуммаПриход КАК СуммаПриход,
                           |   РасчетыйСчетОстаткиИОбороты.СуммаРасход КАК СуммаРасход,
                           |   РасчетыйСчет.Организация КАК Организация1,
                           |   РасчетыйСчет.Статья КАК Статья1
                           |ИЗ
                           |   РегистрНакопления.РасчетыйСчет КАК РасчетыйСчет
                           |      ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрНакопления.РасчетыйСчет.ОстаткиИОбороты(&ДатаН, &ДатаК, , , ) КАК РасчетыйСчетОстаткиИОбороты
                           |      ПО РасчетыйСчет.Организация = РасчетыйСчетОстаткиИОбороты.Организация
                           |         И РасчетыйСчет.Статья = РасчетыйСчетОстаткиИОбороты.Статья
                           |         И РасчетыйСчет.ВидДеятельности = РасчетыйСчетОстаткиИОбороты.ВидДеятельности
                           |ГДЕ
                           |   РасчетыйСчет.Период >= &ДатаН
                           |   И РасчетыйСчет.Период <= &ДатаК
                           |   И РасчетыйСчет.Организация = &Организация
                           |
                           |СГРУППИРОВАТЬ ПО
                           |   РасчетыйСчетОстаткиИОбороты.Организация,
                           |   РасчетыйСчетОстаткиИОбороты.Статья,
                           |   РасчетыйСчет.ВидДвижения,
                           |   РасчетыйСчет.Организация,
                           |   РасчетыйСчет.Статья,
                           |   РасчетыйСчетОстаткиИОбороты.ВидДеятельности,
                           |   РасчетыйСчетОстаткиИОбороты.СуммаПриход,
                           |   РасчетыйСчетОстаткиИОбороты.СуммаРасход,
                           |   РасчетыйСчетОстаткиИОбороты.Статья.Родитель
                           |ИТОГИ
                           |   СУММА(СуммаПриход),
                           |   СУММА(СуммаРасход)
                           |ПО
                           |   Организация,
                           |   ВидДвижения,
                           |   ВидДеятельности,
                           |   Родитель,
                           |   Статья" ;
         ЗапросОрг.УстановитьПараметр("ДатаН",НачалоДня(ДатаНачала));
         ЗапросОрг.УстановитьПараметр("ДатаК",КонецДня(ДатаОканчание));
         ЗапросОрг.УстановитьПараметр("Организация",Организация);

   
   
РезультатОрг = ЗапросОрг.Выполнить();
      ВыборкаОрг = РезультатОрг.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам,"Организация");
      
      Пока ВыборкаОрг.Следующий() Цикл
         ДоходОрганизация.Параметры.Заполнить(ВыборкаОрг);
         ТабДок.Вывести(Доход);
         ТабДок.Вывести(ДоходОрганизация, ВыборкаОрг.Уровень());
         РасходОрганизации.Параметры.Заполнить(ВыборкаОрг);
         ТабДок.Вывести(Расход);
         ТабДок.Вывести(РасходОрганизации,ВыборкаОрг.Уровень());
      ВыборкаДеятельностьОрг = ВыборкаОрг.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам,"ВидДеятельности");
      Пока ВыборкаДеятельностьОрг.Следующий() Цикл
          ОбластьДеятельность.Параметры.Заполнить(ВыборкаДеятельностьОрг);
          ТабДок.Вывести(ОбластьДеятельность,ВыборкаДеятельностьОрг.Уровень());
          ОбластьДеятельностьРасход.Параметры.Заполнить(ВыборкаДеятельностьОрг);
          ТабДок.Вывести(ОбластьДеятельностьРасход,ВыборкаДеятельностьОрг.Уровень());
      ВыборкаРодительОрг = ВыборкаДеятельностьОрг.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам,"Родитель");
      Пока ВыборкаРодительОрг.Следующий() Цикл
          ОбластьРодитель.Параметры.Заполнить(ВыборкаРодительОрг);
          ТабДок.Вывести(ОбластьРодитель,ВыборкаРодительОрг.Уровень());
          ОбластьРодительРасход.Параметры.Заполнить(ВыборкаРодительОрг);
          ТабДок.Вывести(ОбластьРодительРасход,ВыборкаРодительОрг.Уровень());
      ВыборкаСтатьяОрг = ВыборкаРодительОрг.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам,"Статья");
      Пока ВыборкаСтатьяОрг.Следующий() Цикл
          ОбластьСтатья.Параметры.Заполнить(ВыборкаСтатьяОрг);
          ТабДок.Вывести(ОбластьСтатья,ВыборкаСтатьяОрг.Уровень());
          ОбластьСтатьяРасход.Параметры.Заполнить(ВыборкаСтатьяОрг);
          ТабДок.Вывести(ОбластьСтатьяРасход,ВыборкаСтатьяОрг.Уровень());
      КонецЦикла;
      КонецЦикла;   
      КонецЦикла;   
      КонецЦикла;   
         
   
   
   ТабДок.ЗакончитьАвтогруппировкуСтрок();
   ТабДок.ОтображатьСетку = Ложь;
   ТабДок.ФиксацияСверху = 11;
   ТабДок.Защита = Истина;
   ТабДок.ТолькоПросмотр = Ложь;
   ТабДок.ОтображатьЗаголовки = Ложь;
   ТабДок.Показать(Истина);
Выводи в строки макета в расходную часть и данные доходной части, помогите как мне вывести данные приходной части в приходной, где делаю я ошибку?

cska-fanat-kz

Наведите порядок в коде с помощью тех же комментариев
чтобы было видно, где, в каком месте, какая часть отчета выводится...

можете секции еще осмысленно поназывать...

в итоге будет проще разобраться.
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

TamKar

   Пояснение к макету

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск