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

Печатная форма документа

Автор Ly_Alena, 23 окт 2014, 08:09

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

Ly_Alena

Доброе утро! Столкнулась с непонятной ошибкой. Вывожу на печать документ:

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

   РезультатЗапросаТовары = Запрос.Выполнить();
   Если НЕ РезультатЗапросаТовары.Пустой() Тогда
   
      Индекс = 0;
      Область = Макет.ПолучитьОбласть("Товары");
      Обход = РезультатЗапросаТовары.Выбрать();
      ОбходТовары = РезультатЗапросаТовары.Выбрать();
      Пока Обход.Следующий() Цикл
      
         Если Обход.Количество = 0 Тогда
            Продолжить;
         КонецЕсли;
            
         Если Не ЗначениеЗаполнено(Обход.Номенклатура) Тогда
            Сообщить("В одной из строк не заполнено значение номенклатуры - строка при печати пропущена.", СтатусСообщения.Важное);
            Продолжить;
         КонецЕсли;
         
         Индекс = Индекс + 1;
         Область.Параметры.НомерСтроки = Индекс;
         //Область.Параметры.НомерЛота = Обход.НомерЛота;
         Область.Параметры.ЗапрашиваемоеНаименование = Обход.ЗапрашиваемоеНаименование;
         Если ЗначениеЗаполнено(Обход.НовоеНаименование) Тогда
         Область.Параметры.НовоеНаименование = Обход.НовоеНаименование;
         Иначе Область.Параметры.НовоеНаименование = Обход.Номенклатура;
         КонецЕсли;
         Область.Параметры.Номенклатура = Обход.Номенклатура;
         Область.Параметры.ЕдИзм = Обход.ЕдИзм;
         Область.Параметры.Количество = Обход.КоличествоВПроизводство;
         Область.Параметры.Себестоимость = Обход.ПлановаяСебестоимость;
         Область.Параметры.СуммаСебестоимости = Обход.СуммаСебестоимости;
         Область.Параметры.ЦенаБезНДС = Обход.ЦенаБезНДС;
         Область.Параметры.СуммаБезНДС = Обход.СуммаБезНДС;
         Область.Параметры.Цена = Обход.Цена;
         Область.Параметры.Сумма = Обход.Сумма;
         Область.Параметры.Транспортные = Обход.Транспортные;
         Область.Параметры.Накладные = Обход.Накладные;
         Область.Параметры.УслПостоянные = Обход.УслПостоянные;
         Область.Параметры.Прибыль = Обход.Прибыль;
         Область.Параметры.Рентабельность = Обход.Рентабельность;
         
         ТабДокумент.Вывести(Область);
         
      КонецЦикла;
   КонецЕсли;   

Выдает что не знает поле НомерЛота

Ly_Alena


Теги:

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

Рейтинг@Mail.ru

Поиск