0
RICK
04.06.14
✎
18:24
|
Помогите пожалуйста разобраться
Есть документ и есть макет для печати мне надо чтобы на этом макете данные отображались не только с данного документа, но и из справочник(типо если я выбрал поставщика то все данные из справочника тоже бы вывелись на печать)
я делаю выборку но когда вывожу ничего не выводиться
вот выборка
Макет = Документы.Приходная.ПолучитьМакет("Макет1");
Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ
| Приходная.Дата,
| Приходная.МестоХранения,
| Приходная.Номер,
| Приходная.Принял,
| Приходная.Автомобили.(
| НомерСтроки,
| Автомобиль,
| Количество,
| Цена,
| Сумма,
| Автомобиль.Код
| ),
| Приходная.Поставщик.Наименование,
| Приходная.Поставщик.ИНН КАК ПИНН,
| Приходная.Поставщик.Город КАК ПГород,
| Приходная.Поставщик.Улица КАК ПУлица,
| Приходная.Поставщик.Дом КАК ПДом,
| Приходная.Поставщик.Телефон КАК ПТелефон,
| Приходная.Поставщик.Факс КАК ПФакс,
| Приходная.Поставщик.РС КАК ПРС,
| Приходная.Поставщик.Банк КАК ПБанк,
| Приходная.Поставщик.БИК КАК ПБИК,
| Приходная.Поставщик.КС КАК ПКС,
| Константы.НаименованиеКомпании,
| Константы.Улица,
| Константы.Дом,
| Константы.Город,
| Константы.Телефон,
| Константы.РС,
| Константы.Банк,
| Приходная.Поставщик.Ссылка,
| Приходная.Принял.ИНН,
| Приходная.Поставщик
|ИЗ
| Документ.Приходная КАК Приходная,
| Константы КАК Константы
|ГДЕ
| Приходная.Ссылка В(&Ссылка)
| И Приходная.Поставщик = &Ссылка";
Запрос.Параметры.Вставить("Ссылка", Ссылка);
Выборка = Запрос.Выполнить().Выбрать();
ОбластьЗаголовок = Макет.ПолучитьОбласть("ЗаголовокТаб");
Шапка = Макет.ПолучитьОбласть("Шапка");
ОбластьАвтомобилиШапка = Макет.ПолучитьОбласть("Строка");
ОбластьАвтомобили = Макет.ПолучитьОбласть("Подвал");
ТабДок.Очистить();
ВставлятьРазделительСтраниц = Ложь;
Пока Выборка.Следующий() Цикл
Если ВставлятьРазделительСтраниц Тогда
ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
КонецЕсли;
ТабДок.Вывести(ОбластьЗаголовок);
Шапка.Параметры.Заполнить(Выборка);
ТабДок.Вывести(Шапка, Выборка.Уровень());
ТабДок.Вывести(ОбластьАвтомобилиШапка);
ВыборкаАвтомобили = Выборка.Автомобили.Выбрать();
Пока ВыборкаАвтомобили.Следующий() Цикл
ОбластьАвтомобили.Параметры.Заполнить(ВыборкаАвтомобили);
ТабДок.Вывести(ОбластьАвтомобили, ВыборкаАвтомобили.Уровень());
КонецЦикла;
ВставлятьРазделительСтраниц = Истина;
КонецЦикла;
|
|