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

Отчёт из 2-х документов

Автор Will, 01 мая 2011, 19:24

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

Will

Есть документ ТоварныйЧек и НарядНаСборку.
Из них составляется отчёт НачислениеЗарплаты.
Зарплата начисляется для менеджера из Товарного чека
и для сборщика из наряд на Сборку.
Из одного документа нормально, а из двух не получается.
Прописываю запрос для Товарного чека, оно работает, после добавила тоже самое для Наряда на сборку и получился такой бред, но это не работает:

_____________________________________________________________________________
Процедура КнопкаСформироватьНажатие(Кнопка)
   Запрос = Новый Запрос;
   Запрос.Текст = "ВЫБРАТЬ

|Документ.ТоварныйЧек.Менеджер КАК Менеджер,
|Документ.ТоварныйЧек.СуммаДокумента КАК Сумма,
|Документ.ТоварныйЧек.СуммаДокумента*0.05 КАК СуммаДокумента,
|Документ.ТоварныйЧек.Номер КАК Номер,
|Документ.ТоварныйЧек.Номер КАК Надпись,
|ИЗ
|Документ.ТоварныйЧек КАК ТоварныйЧек
|ГДЕ
|ТоварныйЧек.Дата МЕЖДУ &ДатаНач И &ДатаКон
|СГРУППИРОВАТЬ ПО
|ТоварныйЧек.Менеджер,
|ТоварныйЧек.Ссылка";

|Документ.НарядНаСборку.Сборщик КАК Сборщик,
|Документ.НарядНаСборку.СуммаНаряда КАК Сумма,
|Документ.НарядНаСборку.СуммаНаряда*0,03 КАК СуммаНаряда,
|Документ.НарядНаСборку.Номер КАК Номер,
|Документ.НарядНаСборку.Номер КАК Надпись
|ИЗ
|Документ.НарядНаСборку КАК НарядНаСборку
|ГДЕ
|НарядНаСборку.Дата МЕЖДУ &ДатаНач И &ДатаКон
|СГРУППИРОВАТЬ ПО
|НарядНаСборку.Сборщик,
|НарядНаСборку.Ссылка";
      
   Запрос.УстановитьПараметр("ДатаНач",ДатаНач);
   Запрос.УстановитьПараметр("ДатаКон",ДатаКон);
   
   Результат = Запрос.Выполнить().Выбрать();      
   ТабДок = Новый ТабличныйДокумент;      
   Макет = Отчеты.НачислениеЗарплаты.ПолучитьМакет("Макет");
   Область = Макет.ПолучитьОбласть("Заголовок");
   Область.Параметры.Дата_Нач=ДатаНач;
   Область.Параметры.Дата_Кон=ДатаКон;
   ТабДок.Вывести(Область);   
   Область = Макет.ПолучитьОбласть("Шапка");   
   ТабДок.Вывести(Область);
   Н=0;
   Пока Результат.Следующий() Цикл
      Область = Макет.ПолучитьОбласть("Строка");
      Н = Н+1;
      Область.Параметры.Номер = Н;

      Область.Параметры.Сотрудник = Результат.Менеджер;
      Область.Параметры.Сумма = Результат.СуммаДокумента;
      Область.Параметры.Надпись = Результат.Номер;
      Область.Параметры.Сотрудник = Результат.Сборщик;
      Область.Параметры.Сумма = Результат.СуммаНаряда;
      Область.Параметры.Надпись = Результат.Номер;

      ТабДок.Вывести(Область);
   КонецЦикла;

cska-fanat-kz

с разных таблиц - надо через ОБЪЕДИНИТЬ ВСЕ
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Теги:

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

Рейтинг@Mail.ru

Поиск