запрос

1С v8

запрос

17.09.13

✎

11:11

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

Подскажите где ошибки и как вывести запрос?

1 Aleksey

17.09.13

✎

11:12

а где заполения макета?

2 Ёпрст

17.09.13

✎

11:14

(0)
а тебе точно нужны приходы и расходы за весь период работы базы ?
:))

3 r2d24

17.09.13

✎

11:14

(1) Видимо это я и хотел спросить

4 r2d24

17.09.13

✎

11:15

(2) нет, мне надо научиться выводить запросы, а это для примера

5 Ёпрст

17.09.13

✎

11:15

ну и 2 раза выполнять запрос не стоит.

6 Ёпрст

17.09.13

✎

11:16

(4) ну дык делай
Область.Параметры.Заполнить(Выборка); в цикле обхода выборки и привет..

7 ОфисныйБабай

17.09.13

✎

11:22

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

8 r2d24

17.09.13

✎

11:30

(7) большое спасибо, разберусь!