Имя: Пароль:
1C
1С v8
вывести два макета в одном табличном поле
0 LouRENs
 
09.12.11
14:41
Есть два отчета, похожих по смыслу, хочу вывести так:

Отчет 1                          Отчет 2
Колонка 1 Колонка 2          Колонка 1 Колонка 2
1 LouRENs
 
09.12.11
14:42
Не хочу объединять в один запрос оба и выводить, можно как то их так соединить ?
Заранее спасибо!
2 Лефмихалыч
 
09.12.11
14:42
ТабличныйДокумент.Присоединить (SpreadsheetDocument.Join)
ТабличныйДокумент (SpreadsheetDocument)
Присоединить (Join)
Синтаксис:

Присоединить(<Таблица>, <Уровень>, <ИмяГруппы>, <Открыта>)
Параметры:

<Таблица> (обязательный)

Тип: ТабличныйДокумент; ПолеТабличногоДокумента. Выводимая таблица.
<Уровень> (необязательный)

Тип: Число. Уровень используется для автоматической группировки колонок табличного документа. Соседние колонки с одинаковым уровнем будут отнесены к одной группе. Строки с минимальным уровнем в группу не объединяются.
<ИмяГруппы> (необязательный)

Тип: Строка. Название группы, к которой относятся выводимые колонки.
<Открыта> (необязательный)

Тип: Булево. Истина - выведенная группа будет открыта,
Ложь - группа будет выведена в свернутом виде.
Возвращаемое значение:

Тип: ОбластьЯчеекТабличногоДокумента. Область, в которую был осуществлен вывод.
Описание:

Присоединяет табличный документ к результирующему табличному документу, помещая его в следующей колонке правее самой правой выведенной колонки, начиная со строки, с которой выводился предыдущий табличный документ.

Доступность:

Сервер, толстый клиент, внешнее соединение.
Пример:

ТабДок = Новый ТабличныйДокумент;
Секция = ТабДок.ПолучитьОбласть("R1C1");
ТабДок.НачатьАвтогруппировкуКолонок();
Секция.Область("R1C1").Текст = "Параметр";
ТабДок.Вывести(Секция,1,"Группа 1",Ложь);
Для К=1 По 10 Цикл
   Секция = ТабДок.ПолучитьОбласть("R1C1");
   Секция.Область().Текст = "А"+К;
   Секция.Область().ГоризонтальноеПоложение = ГоризонтальноеПоложение.Право;
   ТабДок.Присоединить(Секция,2,"Группа 2",Истина);
КонецЦикла;
Секция.Область("R1C1").Текст = "Итого:";
ТабДок.Присоединить(Секция,1,"Группа 2",Ложь);
Секция.Область("R1C1").Текст = "Значение";
ТабДок.Вывести(Секция,1,"Группа 2",Ложь);
Цена = 10; Итог = Цена;
Для К=1 По 10 Цикл
   Секция = ТабДок.ПолучитьОбласть("R1C1");
   Секция.Область().Текст = Цена;
   ТабДок.Присоединить(Секция,2,"Группа 2",Истина);
   Цена = Цена + 10;
   Итог = Итог + Цена;
КонецЦикла;
Секция.Область("R1C1").Текст = Итог;
ТабДок.Присоединить(Секция,1,"Группа 2",Ложь);
ТабДок.ЗакончитьАвтогруппировкуКолонок();
ТабДок.ИтогиСправа = Истина;
ТабДок.ОтображатьСетку = Ложь;
ТабДок.Защита = Ложь;
ТабДок.ТолькоПросмотр = Истина;
ТабДок.Показать("Пример использования гор. автогруппировки");


См. также:

ТабличныйДокумент, метод Вывести
3 LouRENs
 
09.12.11
14:51
спасибо!
Оптимист верит, что мы живем в лучшем из миров. Пессимист боится, что так оно и есть.