Создание макета

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