1С-Предприятие 8.0. Практическое пособие разработчика


Отчет РеестрДокументовОказаниеУслуги - часть 4


Теперь обратим внимание на то, как выводится результат запроса в табличный документ.

Процедура РеестрДокументовОказаниеУслуги(ТабДок) Экспорт

   //{{КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ(РеестрДокументовОказаниеУслуги)

   // Данный фрагмент построен конструктором.

   // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!

 

   Макет = ОтчетОбъект.ПолучитьМакет("РеестрДокументовОказаниеУслуги");

   Запрос = Новый Запрос;

   Запрос.Текст =

   "ВЫБРАТЬ

   |    ОказаниеУслуги.Дата КАК Дата,

   |    ОказаниеУслуги.Номер КАК Номер,

   |    ОказаниеУслуги.Склад,

   |    ПРЕДСТАВЛЕНИЕ(ОказаниеУслуги.Склад),

   |    ОказаниеУслуги.Мастер,

   |    ПРЕДСТАВЛЕНИЕ(ОказаниеУслуги.Мастер),

   |    ОказаниеУслуги.Клиент,

   |    ПРЕДСТАВЛЕНИЕ(ОказаниеУслуги.Клиент)

   |ИЗ

   |    Документ.ОказаниеУслуги КАК ОказаниеУслуги

   |

   |УПОРЯДОЧИТЬ ПО

   |    Дата,

   |    Номер";

 

   Результат = Запрос.Выполнить();

 

   ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");

   ОбластьПодвал = Макет.ПолучитьОбласть("Подвал");

   ОбластьШапкаТаблицы = Макет.ПолучитьОбласть("ШапкаТаблицы");

   ОбластьПодвалТаблицы = Макет.ПолучитьОбласть("ПодвалТаблицы");

   ОбластьДетальныхЗаписей = Макет.ПолучитьОбласть("Детали");

 

   ТабДок.Очистить();

   ТабДок.Вывести(ОбластьЗаголовок);

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

   ТабДок.НачатьАвтогруппировкуСтрок();

 

   ВыборкаДетали = Результат.Выбрать();




Начало  Назад  Вперед