Имя: Пароль:
1C
1С v8
Обединить две табличные части внешней обработки в макете
0 lero4ka23
 
17.11.16
13:07
Подскажите как вывести в макет две табличные части внешней обработки,http://dropmefiles.com/2wYFm
1 lero4ka23
 
17.11.16
13:07
Для Каждого СтрокаТЧ  Из Объект.ПоДаннымОрганизации Цикл
                ОбластьОбороты.Параметры.ДатаДокумента = СтрокаТЧ.Дата;
                ОбластьОбороты.Параметры.РегистраторПредставление = СтрокаТЧ.Представление;
                ОбластьОбороты.Параметры.СуммаОборотДт = СтрокаТЧ.Дебет;
                ОбластьОбороты.Параметры.СуммаОборотКт = СтрокаТЧ.Кредит;
                ОбластьОбороты.Параметры.Заполнить(СтрокаТЧ);
                ТабличныйДокумент.Вывести(ОбластьОбороты);
            КонецЦикла;

                                                
            Для Каждого СтрокаТЧКонтр Из Объект.ПоДаннымКонтрагента Цикл
                ОбластьОбороты.Параметры.ДатаДокументаКонтр = СтрокаТЧКонтр.Дата;
                ОбластьОбороты.Параметры.РегистраторПредставлениеКонтр = СтрокаТЧКонтр.Представление;
                ОбластьОбороты.Параметры.СуммаОборотДтКонтр = СтрокаТЧКонтр.Дебет;
                ОбластьОбороты.Параметры.СуммаОборотКтКонтр = СтрокаТЧКонтр.Кредит;
                 ОбластьОбороты.Параметры.Заполнить(СтрокаТЧКонтр);
                ТабличныйДокумент.Вывести(ОбластьОбороты);
             КонецЦикла;
2 lero4ka23
 
17.11.16
13:58
up
3 Ёпрст
 
17.11.16
14:01
Через Присоединить
4 lero4ka23
 
17.11.16
14:02
(3) можно пример, я не знаю как
5 Ёпрст
 
17.11.16
14:09
ОбластьЛевая= Макет.ПолучитьОбласть("Строка|Левая");
ОбластьПравая= Макет.ПолучитьОбласть("Строка|Правая");

КоличествоПоОрганизации = Объект.ПоДаннымОрганизации.Количество;
КоличествоПоКлиентосу = (Объект.ПоДаннымКонтрагента.Количество();
Для к = 1 По Макс(КоличествоПоОрганизации, ,КоличествоПоКлиентосу) Цикл

    Если к<=КоличествоПоОрганизации Тогда
       ОбластьЛевая.Параметры.Заполнить(Объект.ПоДаннымОрганизации[к-1])
    Иначе
     ОбластьЛевая.Параметры.Очистить();
    КонецЕсли;
    ТабличныйДокумент.Вывести(ОбластьЛевая);
    Если к<=КоличествоПоКлиентосу Тогда
       ОбластьПравая.Параметры.Заполнить(Объект.ПоДаннымКонтрагента[к-1])
    Иначе
     ОбластьПравая.Параметры.Очистить();
    КонецЕсли;
ТабличныйДокумент.Присоединить(ОбластьПравая);

КонецЦикла;
Независимо от того, куда вы едете — это в гору и против ветра!