1C Программирование и поддержка - [69] :: Прикладное программирование

Почему не могу получить информацию о банке и номере счета? Значение ОбластьСтрока.Параметры.РасчетныйСчет получаю равным Null.

Цитата:

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

    // параметры
    Запрос.УстановитьПараметр("Дата", Дата);
    Запрос.УстановитьПараметр("Счет", ПланыСчетов.Хозрасчетный.РасчетыСПокупателямиИЗаказчиками);
    Запрос.УстановитьПараметр("Вид", Справочники.ВидыКонтактнойИнформации.ЮрАдресКонтрагента);
    Запрос.УстановитьПараметр("Организация", Организация);
    Запрос.УстановитьПараметр("Контрагент", Контрагент);

    Выборка = Запрос.Выполнить().Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);

    // получаем макет
    Макет = ПолучитьМакет("Таблица");
    ОбластьЗаголовок     = Макет.ПолучитьОбласть("Шапка");
    ОбластьГруппа         = Макет.ПолучитьОбласть("Группа");
    ОбластьСтрока         = Макет.ПолучитьОбласть("Строка");

    // параметры
    ОбластьЗаголовок.Параметры.Дата = Дата;

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

    // выбираем счета
    Пока Выборка.Следующий() Цикл
        ОбластьГруппа.Параметры.Заполнить(Выборка);
        ОбластьГруппа.Параметры.Наименование = Выборка.Счет.Наименование;
        ТабДок.Вывести(ОбластьГруппа, Выборка.Уровень(),, Ложь);
        // выбираем контрагентов
        ВыборкаКонтрагентов = Выборка.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
        Пока ВыборкаКонтрагентов.Следующий() Цикл
            ОбластьСтрока.Параметры.Заполнить(ВыборкаКонтрагентов);
            ОбластьСтрока.Параметры.РасчетныйСчет = ВыборкаКонтрагентов.НомерСчета;
            ТабДок.Вывести(ОбластьСтрока, ВыборкаКонтрагентов.Уровень(),, Ложь);
        КонецЦикла;
    КонецЦикла;

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

Модерирует : ShIvADeSt
ShIvADeSt (06-02-2008 02:31): продолжаем тут http://forum.ru-board.com/topic.cgi?forum=33&topic=9226	Версия для печати • Подписаться • Добавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104