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

Уважаемые специалисты помогите с циклом новичку...

Автор kodeks, 06 окт 2010, 15:36

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

kodeks

У меня следующий вопрос: в результате в табличной части выходит ОбластьДетали и ОбластьПодписи, а ОбластьЗаголовок пустая. Пока в ОбластьЗаголовок один параметр ВидОперации, но по аналогии добавлю параметры Дата, Номер и т.д.

Функция ПечатьАкт()

   Запрос = Новый Запрос;
   Запрос.УстановитьПараметр("ТекущийДокумент", ЭтотОбъект.Ссылка);

   Запрос.Текст =
   "ВЫБРАТЬ
   |   ВозвратПереданныхТоваров.Организация КАК Организация,
   |   ВозвратПереданныхТоваров.Дата КАК Дата,
   |   ВозвратПереданныхТоваров.Номер КАК Номер,
   |   ВозвратПереданныхТоваров.ВидОперации КАК ВидОперации,
   |   ВозвратПереданныхТоваровТовары.НомерСтроки КАК НомерСтроки,
   |   ВозвратПереданныхТоваровТовары.Номенклатура КАК Номенклатура,
   |   ВозвратПереданныхТоваровТовары.Количество КАК Количество,
   |   ВозвратПереданныхТоваровТовары.Цена КАК Цена,
   |   ВозвратПереданныхТоваровТовары.Сумма КАК Сумма,
   |   ВозвратПереданныхТоваровТовары.ЕдиницаИзмерения КАК ЕдИзмерения
   |ИЗ
   |   Документ.ВозвратПереданныхТоваров.Товары КАК ВозвратПереданныхТоваровТовары
   |      ЛЕВОЕ СОЕДИНЕНИЕ Документ.ВозвратПереданныхТоваров КАК ВозвратПереданныхТоваров
   |      ПО ВозвратПереданныхТоваровТовары.Ссылка = ВозвратПереданныхТоваров.Ссылка
   |ГДЕ
   |   ВозвратПереданныхТоваров.Ссылка = &ТекущийДокумент";

   Шапка = Запрос.Выполнить().Выбрать();

   ТабДокумент = Новый ТабличныйДокумент;
   Макет       = ПолучитьМакет("Акт");
   
    
   ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
   ОбластьЗаголовок.Параметры.ВидОперации     = Шапка.ВидОперации;
             ТабДокумент.Вывести(ОбластьЗаголовок);

      Пока Шапка.Следующий() Цикл   
   
   ОбластьДетали = Макет.ПолучитьОбласть("Детали");
      
   ОбластьДетали.Параметры.НомерСтроки     = Шапка.НомерСтроки;
   ОбластьДетали.Параметры.Номенклатура     = Шапка.Номенклатура;
   ОбластьДетали.Параметры.Количество     = Шапка.Количество;
   ОбластьДетали.Параметры.Цена     = Шапка.Цена;
   ОбластьДетали.Параметры.Сумма     = Шапка.Сумма;
   ОбластьДетали.Параметры.ЕдИзмерения     = Шапка.ЕдИзмерения;
   ТабДокумент.Вывести(ОбластьДетали);   
   
       КонецЦикла;
   
   ОбластьПодписи = Макет.ПолучитьОбласть("Подписи");
   ОбластьПодписи.Параметры.Организация = Шапка.Организация;
   ТабДокумент.Вывести(ОбластьПодписи);
ТабДокумент.Показать();
   
КонецФункции

skyther

Это можно и без левого сделать:
ВозвратПереданныхТоваров.Ссылка.ВидОперации КАК ВидОперации,

kodeks

Утро вечера мудренее что называется. Спасибо skyther, внес изменения в запрос и все встало на свои места.

Теги:

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

Рейтинг@Mail.ru

Поиск