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

Вывод реквизитов контрагента

Автор kastembay, 16 фев 2012, 13:55

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

kastembay

Доброго времени суток! Говорю сразу, я в 1с очень начинающий пользователь smile:)

И вот тут на работе возник один вопрос: написать отчет, который считает сумму поступившего товара за определенное время. Сумму выводит, а вот реквизиты поставщика не хочет. Я уже замучился с этим отчетом.
Люди добрые, подскажите, как вывести реквизиты поставщика?

Платформа 7.7 (7.0.019)
Конфигурация Бухгалтерский учет для Казахстана ред. 2.5


Вот сам код
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Сформировать)
|Период с ВыбНачПериода по ВыбКонПериода;
|Наименование = Документ.ПоступлениеМатериалов.Контрагент.Наименование;
|Сумма = Документ.ПоступлениеМатериалов.Сумма;
|РНН = Справочник.Контрагенты.РНН;
|СправНаимен = Справочник.Контрагенты.Наименование;
|Функция СуммаСумма = Сумма(Сумма);
|Группировка Наименование;
|"//}}ЗАПРОС
;
// Если ошибка в запросе, то выход из процедуры
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Возврат;
КонецЕсли;

// Подготовка к заполнению выходных форм данными запроса
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сформировать");
// Заполнение полей "Заголовок"
Таб.ВывестиСекцию("Заголовок");
Состояние("Заполнение выходной таблицы...");
Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
Пока Запрос.Группировка(1) = 1 Цикл
// Заполнение полей Наименование
Таб.ВывестиСекцию("Наименование");

КонецЦикла;

// Заполнение полей "Итого"
Таб.ВывестиСекцию("Итого");
// Вывод заполненной формы
Таб.ТолькоПросмотр(1);
Таб.Показать("Сформировать", "");
КонецПроцедуры


sergejK74

  "//{{ЗАПРОС(Сформировать)
    |Период с ВыбНачПериода по ВыбКонПериода;
    |Контрагент = Документ.ПоступлениеМатериалов.Контрагент;
    |Сумма = Документ.ПоступлениеМатериалов.Сумма;
    |Функция СуммаСумма = Сумма(Сумма);
    |Группировка Контрагент;
    |"//}}ЗАПРОС
    ;
так попробуй

Перед         Таб.ВывестиСекцию("Наименование");
добавь
РНН = Запрос.Контрагент.РНН
Наименование = Запрос.Контрагент.Наименование
Кнопочка Спасибо - слева!

kastembay

РНН = Запрос.Контрагент.РНН;
{Отчет.ВсеСРнн.Форма.Модуль(33)}: Поле агрегатного объекта не обнаружено (Контрагент)

kastembay

исправил предыдущую ошибку...

kastembay

Цитата: sergejK74 от 16 фев 2012, 14:29
  "//{{ЗАПРОС(Сформировать)
    |Период с ВыбНачПериода по ВыбКонПериода;
    |Контрагент = Документ.ПоступлениеМатериалов.Контрагент;
    |Сумма = Документ.ПоступлениеМатериалов.Сумма;
    |Функция СуммаСумма = Сумма(Сумма);
    |Группировка Контрагент;
    |"//}}ЗАПРОС
    ;
так попробуй

Перед         Таб.ВывестиСекцию("Наименование");
добавь
РНН = Запрос.Контрагент.РНН
Наименование = Запрос.Контрагент.Наименование

Не работает - выдает таблицу в таком виде:
Запрос.Наименование потом сумма и так по всем контрагентам!

kastembay

а ошибка поле агрегатного объекта не обнаружено (Наименование)

sergejK74

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

kastembay


sergejK74

Запрос.Контрагент.Наименование должно быть в ячейке таблицы
Кнопочка Спасибо - слева!

kastembay

Не помогает. Все равно появляется та, таблица, которая в прикрепленном файле

Теги:

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

Рейтинг@Mail.ru

Поиск