ТабличныйДокумент.Вывести

Методы · Put

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

Синтаксис

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

Примеры платформы

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

ТабличныйДокумент.Вывести (SpreadsheetDocument.Put)

ТабличныйДокумент (SpreadsheetDocument)

Вывести (Put)

Доступен, начиная с версии 8.0.

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

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

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

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

<Открыта> (необязательный)
Тип: Булево.
Истина - выведенная группа будет открыта; Ложь - группа будет выведена в свернутом виде.
Значение по умолчанию: Истина.
Возвращаемое значение:
Тип: ОбластьЯчеекТабличногоДокумента.
Область, в которую был осуществлен вывод.
Описание:

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

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

Сервер, толстый клиент, внешнее соединение, мобильное приложение (сервер), мобильный автономный сервер.

Примечание:
Свойство Формат ячейки табличного документа не используется для форматирования значений, выводимых в при помощи шаблона.
Пример:

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

См. также:
ТабличныйДокумент, метод Присоединить

Использование в версии:

Доступен, начиная с версии 8.0.

Методическая информация

Практические примеры

Отличить область исходной таблицы от её независимой копии

Область позволяет менять оригинал; ПолучитьОбласть создаёт отдельный табличный документ. Проверяем оба варианта на собственных ячейках.

Где и как запускать

В учебной управляемой форме создайте команду УчебныйПример и кнопку для неё. Назначьте обработчик действия УчебныйПример. Приведённую процедуру целиком вставьте в модуль формы. Не вставляйте её внутрь другой процедуры. Запустите форму в тонком или толстом клиенте Windows.

Подготовка

  1. Создайте отдельную учебную обработку с управляемой формой; рабочие печатные формы не изменяйте.

  2. ТабличныйДокумент.Показать открывает окно просмотра, но не отправляет документ на физический принтер.


&НаКлиенте
Процедура УчебныйПример(Команда)
    Исходный = Новый ТабличныйДокумент;
    Исходный.Область(1, 1).Текст = "Книга";
    Исходный.Область(2, 1).Текст = "Ручка";
    СсылкаНаОбласть = Исходный.Область("R1C1:R1C1");
    Копия = Исходный.ПолучитьОбласть(1, 1, 2, 1);
    СсылкаНаОбласть.Текст = "Книга исправленная";
    Сообщить(Исходный.Область(1, 1).Текст);
    Сообщить(Копия.Область(1, 1).Текст);
    Копия.Область(2, 1).Очистить(Истина, Ложь, Ложь);
    Сообщить(Исходный.Область(2, 1).Текст);
    Результат = Новый ТабличныйДокумент;
    Результат.Вывести(Исходный);
    Результат.Вывести(Копия);
    Результат.Область(, 1, , 1).ШиринаКолонки = 32;
    Результат.Показать("Оригинал и независимая копия");
    Копия.Очистить();
    Сообщить(Исходный.Область(1, 1).Текст);
КонецПроцедуры

Разбор по шагам

  1. Заполняем две строки и получаем ссылку на первую ячейку оригинала методом Область.

  2. ПолучитьОбласть возвращает новый ТабличныйДокумент с двумя скопированными строками.

  3. Изменение ссылки затрагивает оригинал, а очистка ячейки копии — только копию.

  4. Вывести добавляет оба документа последовательно в результат. Очистка копии не меняет исходный документ.

Как проверить результат

  1. После изменения вывод: Книга исправленная у оригинала и Книга у копии.

  2. После очистки второй ячейки копии оригинал по-прежнему содержит Ручка.

  3. После полной очистки копии оригинал содержит Книга исправленная; вывод в Результат уже выполнен.

Ожидаемый результат

На конкретных ячейках показано различие между ссылкой на область и отдельной копией.

На что обратить внимание

  1. Не используйте Область вместо ПолучитьОбласть, если собираетесь исправлять копию независимо от исходника.

  2. Очистить у области управляет текстом, форматированием и рамками отдельными параметрами; у ТабличногоДокумента очищается весь документ.

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

Разделить собственный отчёт на страницы без вызова печати

Отдельно отмечаем начало/конец страницы и выводим разделители при сборке нового документа. Это настройки будущей печати, не отправка на принтер.

Где и как запускать

Полный модуль управляемой формы собственной учебной внешней обработки. Построение выполняется на сервере без контекста; показ — на клиенте. Вставляйте на уровне модуля.

Подготовка

  1. Создайте новую внешнюю обработку с управляемой основной формой в учебной базе. Каждый урок — отдельная копия модуля.

  2. На форме создайте команду УчебныйПример и перетащите её на форму как кнопку. В действии команды выберите процедуру УчебныйПример(Команда).

  3. Вставьте весь модуль из примера: УчебныйПример, ПостроитьУчебныйДокумент и УчебнаяТаблица. Серверный вызов возвращает собственный табличный документ клиенту; директивы не удаляйте.

  4. Никакие макеты, документы и справочники конфигурации не нужны. Всё построение — в памяти, без печати, записи файлов и отправки в сервисы.

  5. Показ и ручную проверку выполняйте в тонком клиенте Windows 8.5.1.1343. Каждый урок — отдельная копия формы с пустым модулем до вставки.

&НаКлиенте
Процедура УчебныйПример(Команда)
    ТабДок = ПостроитьУчебныйДокумент();

    ТабДок.Показать("Учебный документ — без печати и сохранения");
КонецПроцедуры

&НаСервереБезКонтекста
Функция ПостроитьУчебныйДокумент()
    ТабДок = УчебнаяТаблица();
    Заголовок = ТабДок.Область(2, , 2, );
    Заголовок.ВместеСоСледующим = Истина;
    СтрокаКниги = ТабДок.Область(3, , 3, );
    СтрокаКниги.НачалоСтраницы = Ложь;
    СтрокаКниги.КонецСтраницы = Истина;
    Сообщить(Заголовок.ВместеСоСледующим);
    Сообщить(СтрокаКниги.КонецСтраницы);
    Копия = Новый ТабличныйДокумент;
    Копия.Вывести(ТабДок.ПолучитьОбласть(1, 1, 3, 4));
    Копия.ВывестиГоризонтальныйРазделительСтраниц();
    Копия.Вывести(ТабДок.ПолучитьОбласть(4, 1, 5, 4));
    Копия.ВывестиВертикальныйРазделительСтраниц();
    Сообщить(Копия.ВысотаТаблицы = 5);
    Сообщить(ТабДок.Область(5, 4).Значение = 800);
    ТабДок = Копия;
    Возврат ТабДок;
КонецФункции

&НаСервереБезКонтекста
Функция УчебнаяТаблица()
    ТабДок = Новый ТабличныйДокумент;
    ТабДок.ТолькоПросмотр = Истина;
    ТабДок.ОтображатьСетку = Ложь;
    ТабДок.Область(, 1, , 1).ШиринаКолонки = 35;
    ТабДок.Область(, 2, , 2).ШиринаКолонки = 10;
    ТабДок.Область(, 3, , 3).ШиринаКолонки = 14;
    ТабДок.Область(, 4, , 4).ШиринаКолонки = 15;
    Заголовок = ТабДок.Область(1, 1, 1, 4);
    Заголовок.Объединить();
    Заголовок.Текст = "Учебная таблица — данные только в памяти";
    Заголовок.Шрифт = Новый Шрифт("Arial", 12, Истина);
    Заголовок.ЦветФона = Новый Цвет(230, 242, 255);
    Заголовок.ВысотаСтроки = 24;
    ТабДок.Область(2, 1).Текст = "Товар";
    ТабДок.Область(2, 2).Текст = "Количество";
    ТабДок.Область(2, 3).Текст = "Цена";
    ТабДок.Область(2, 4).Текст = "Сумма";
    Товары = Новый Массив;
    Товары.Добавить(Новый Структура("Название,Количество,Цена", "Книга", 3, 250));
    Товары.Добавить(Новый Структура("Название,Количество,Цена", "Ручка", 1, 50));
    НомерСтроки = 3;
    Итого = 0;
    Для Каждого Товар Из Товары Цикл
        ТабДок.Область(НомерСтроки, 1).Текст = Товар.Название;
        Значения = Новый Массив;
        Значения.Добавить(Товар.Количество);
        Значения.Добавить(Товар.Цена);
        Значения.Добавить(Товар.Количество * Товар.Цена);
        Для НомерКолонки = 2 По 4 Цикл
            Ячейка = ТабДок.Область(НомерСтроки, НомерКолонки);
            Ячейка.СодержитЗначение = Истина;
            Ячейка.ТипЗначения = Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(12, 2));
            Ячейка.Значение = Значения.Получить(НомерКолонки - 2);
            Ячейка.Формат = "ЧДЦ=2; ЧН=0";
        КонецЦикла;
        Итого = Итого + Товар.Количество * Товар.Цена;
        НомерСтроки = НомерСтроки + 1;
    КонецЦикла;
    ПодписьИтога = ТабДок.Область(5, 1, 5, 3);
    ПодписьИтога.Объединить();
    ПодписьИтога.Текст = "Итого";
    Итог = ТабДок.Область(5, 4);
    Итог.СодержитЗначение = Истина;
    Итог.ТипЗначения = Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(12, 2));
    Итог.Значение = Итого;
    Итог.Формат = "ЧДЦ=2; ЧН=0";
    Все = ТабДок.Область(2, 1, 5, 4);
    Все.Шрифт = Новый Шрифт("Arial", 10);
    Граница = Новый Линия(ТипЛинииЯчейкиТабличногоДокумента.Сплошная, 1, Ложь);
    Все.Обвести(Граница, Граница, Граница, Граница);
    Возврат ТабДок;
КонецФункции

Разбор по шагам

  1. ВместеСоСледующим связывает строки заголовка с последующей строкой при разбиении.

  2. Флаги страницы и явные разделители имеют разные способы применения; оба показаны на собственных данных.

  3. Новый документ собираем из двух своих областей; разделитель не является новой строкой товара.

  4. Напечатать не вызывается, поэтому физическая печать и фактическое число страниц здесь не проверены.

Как проверить результат

  1. Четыре сравнения Истина: связь заголовка, конец страницы, пять строк копии и прежний итог.

  2. Не должно появиться задание в очереди принтера; результат показан только как табличный документ.

Ожидаемый результат

Подготовлена структура разбиения собственного отчёта без печати.

На что обратить внимание

  1. Количество страниц зависит от выбранного принтера, полей и масштаба.

  2. Не путайте вертикальный разделитель страниц с вертикальной линией рамки ячейки.

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

Не хотите разбираться сами?

Адаптируем это решение под вашу базу. Оценка бесплатно.

Оставить задачу

1С, 1С:Предприятие — товарные знаки ООО «1С». Сайт не является официальным представительством фирмы «1С» и не аффилирован с ней.