1с дерево значений печать

Сохранить дерево значений в excel или табличный документ

Добрый день,
Подскажите есть ли простой способ вывести в табличный документ сформированное дерево значений на форме или сохранить напрямую это дерево в excel с сохранением иерархии без формирования табличного документа?
Например есть стандартная команда формы в командной панели «Вывести список», можно ли к ней обратится программно и получить на выходе табличный документ? а полученный табличный документ можно сохранить в формате xls.

Перем ТабДок, Секция; Процедура ПечатьДерева (СтрокаДерева,Уровень = 0,Колонки) Для Каждого стр Из СтрокаДерева.Строки Цикл НомерКолонки = 0; отступ = ""; Для н = 1 По Уровень Цикл отступ = отступ + " "; КонецЦикла; Для Каждого КЛ Из Колонки Цикл НомерКолонки = НомерКолонки + 1; Секция.Область(1, НомерКолонки).Текст = ?(НомерКолонки = 1, отступ+стр[КЛ.Имя], стр[КЛ.Имя]); КонецЦикла; ТабДок.Вывести(Секция,Уровень+1); ПечатьДерева(стр,Уровень+1,Колонки); КонецЦикла; КонецПроцедуры Процедура СформироватьТабДок() ТабДок = Новый ТабличныйДокумент; Секция = ТабДок.ПолучитьОбласть("R1"); ТабДок.НачатьАвтогруппировкуСтрок(); ПечатьДерева (Дерево,,Дерево.Колонки); ТабДок.ЗакончитьАвтогруппировкуСтрок(); ВременныйКаталог = КаталогВременныхФайлов(); ИмяФайла = "Журнал выгрузки " + Формат( ТекущаяДата(), "ДФ = 'гггг-ММ-дд_чч-мм-сс'") + ".xls";; ИмяВременногоФайла = ВременныйКаталог + ИмяФайла; ТабДок.Записать(ИмяВременногоФайла , ТипФайлаТабличногоДокумента.XLS); КонецПроцедуры

Prad2002; Kilka_v_Kepke; It-developer; Jenya78; user1474628; hasp_x; nekit_rdx; curdate; bohdan-k; jane_de_rio; orfos; Legin; + 12 – Ответить

Источник

Дерево значений в печатную форму

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

. ТабДок.НачатьАвтогруппировкуСтрок(); Уровень = 0; ВывестиСтрокуДерева(табДок, ОбластьРасшифровкиНоменклатуры, ВыборкаНоменклатуры, Уровень); ТабДок.ЗакончитьАвтогруппировкуСтрок(); . Функция ВывестиСтрокуДерева(табДок, ОбластьРасшифровкиНоменклатуры, СтрокаДереваЗначений, Уровень) Для Каждого СтрокаНоменклатуры Из СтрокаДереваЗначений.Строки Цикл ОбластьРасшифровкиНоменклатуры.Параметры.Наименование = СтрокаНоменклатуры.Номенклатура; ОбластьРасшифровкиНоменклатуры.Параметры.Товарооборот = СтрокаНоменклатуры.Стоимость; ТабДок.Вывести(ОбластьРасшифровкиНоменклатуры, Уровень, Ложь); ВывестиСтрокуДерева(табДок, ОбластьРасшифровкиНоменклатуры, СтрокаНоменклатуры, Уровень+1); КонецЦикла; КонецФункции;

Вместо дерева выводит что-то странное номенклатура поделеная в две группировки без имен

ВЫБРАТЬ Продажи.Регистратор КАК Регистратор, Продажи.Количество КАК Количество, Продажи.Стоимость КАК Стоимость, Продажи.Подразделение КАК Подразделение, Продажи.Номенклатура КАК Номенклатура, Продажи.Регистратор.КодСвязиРазделенныхРеализаций КАК РегистраторКод, Продажи.Номенклатура.Наименование КАК НаименованиеНоменклатуры ИЗ Справочник.Номенклатура КАК Товар ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрНакопления.Продажи КАК Продажи ПО Товар.Ссылка = Продажи.Номенклатура.Ссылка ГДЕ Продажи.Подразделение В(&ГруппаПодразделения) И НЕ Продажи.Номенклатура В ИЕРАРХИИ (&ГруппаНоменклатура) И ВЫБОР КОГДА &ФЛАГ = ИСТИНА ТОГДА ИСТИНА ИНАЧЕ Продажи.Номенклатура.Категория = &АСС КОНЕЦ И Продажи.Регистратор.Дата МЕЖДУ НАЧАЛОПЕРИОДА(&НачалоОтчета, ДЕНЬ) И КОНЕЦПЕРИОДА(&КонецОтчета, ДЕНЬ) УПОРЯДОЧИТЬ ПО Подразделение ИТОГИ КОЛИЧЕСТВО(РАЗЛИЧНЫЕ Регистратор), КОЛИЧЕСТВО(РАЗЛИЧНЫЕ РегистраторКод) ПО Номенклатура ИЕРАРХИЯ

Источник

Вывод на печать таблицы или дерева значений. Управляемая форма #572566

В обычных формах делал это через построитель отчета. А в управляемых есть возможность выводить быстро, без перебора строк?

пиши сам, рекурсивная процедура обхода дерева проста как утренний рассвет. Я в макете делаю разные строки для уровней дерева, с тональной раскраской, выделением шрифтом старших уровней и т.д. Вообще нужно взять за правило в 8.2., если вы работаете с деревом формы и хотите его печать, то в структуре колонок этого дерева обязательно должна быть колонка «Уровень»(0,1, 2, N — значения). Я еще ввожу дополнительно колонку «УровеньИдентификатор», чтобы дифференцировать узлы на одном уровне в случае неоднородного дерева(«1_1», «1_К», . ). Наличие этих двух колонок достаточно для организации самого «богатого» условного оформления и печати

Похожие вопросы 1С

• Таблицы, таблицы, таблицы. Будь они неладны
• Печать таблицы значений.гдето слышал про универс. обраб. печатьи ТЗ
• Вывод на печать таблицы справа 8.0
• Построитель отчетов: вывод (не вывод) группировок
• Как программно раскрыть ветку дерева значений в табличном поле дерева значений?
• Ошибка «. Вывод запрещен по причине: Вывод запрещен» — ничего не понимаю 🙁
• СКД: СКД: Вывод итогов запроса периодами, вывод счетчика строк.
• Вывод таблицы значений на печать
• Сортировка дерева значений (управляемая форма)
• в СКД необходим вывод группировок выглядящий как вывод детальных записей
• (ЗУП 2.5.48.1) тормозит вывод на печать у одного из пользователей
• Заполнение дерева значений из таблицы значений

В этой группе 1С

• 8.2 Управляемая форма, ТЧ.ОтборСтрок
• Выбрать документы по реквизиту
• v7: Копирование справочников между одинаковыми базами 1С77 Бухгалтерия предприятия
• Как получить в УТ 10.3 Значение по умолчанию из настроек пользователя
• v7: Как сделать выгрузку в XML файл такого формата?
• v8: Пилообразная загрузка процессора
• Регистрация изменений конфигурации в РИБ 1С 8
• в РС «первоначальная стоимость об ОС» УУ не проставляется стоимость
• v7: Создание таблиц значений в цикле.
• Из 8 ядер работает только 1. Расскажите что к чему?
• Spec 8 Создание собственной иерархии в СКД — Для чего нужно?
• Значение поля «Номер» не уникально
• Как 1с определяет текущую дату?
• Ошибка при открытии формы
• v7: Чем открыть DBA?
• Как отловить поиск в форме списка? Управляемые формы
• Зависает отладчик в терминале (УПП)
• Как лучше разнести SQL и пользователей.
• 1C ЗУП 8.2 Формулы для расчета
• v7: Не закрепляется окно сообщений

Источник

Как вывести дерево значений на печать? #731670

Добрый вечер, уважаемые форумчане. Подскажите пожалуйста как вывести дерево значений на печать. Есть управляемая форма 1С8.2., на ней реквизит ДеревоТоваров тип ДеревоЗначений Вопрос — как вывести на печать? Так получаю только верхний уровень, свойства ДеревоТоваров.Строки — нету, как достучаться до всех уровней ума не приложу. Заранее спасибо!

Рекурсию сделать не проблема, я не могу понять как через ЭЛЕМЕНТ УПРАВЛЕНИЯ достучаться до всех уровней

мда. ЗЫ ПолучитьЭлементы (GetItems) Синтаксис: ПолучитьЭлементы Возвращаемое значение: Тип: ДанныеФормыКоллекцияЭлементовДерева. Описание: Получает коллекцию элементов дерева верхнего уровня. Доступность: Тонкий клиент, веб-клиент, сервер, толстый клиент, мобильное приложение(клиент), мобильное приложение(сервер). и ПолучитьЭлементы (GetItems) Синтаксис: ПолучитьЭлементы Возвращаемое значение: Тип: ДанныеФормыКоллекцияЭлементовДерева. Описание: Получает коллекцию дочерних элементов. Доступность: Тонкий клиент, веб-клиент, сервер, толстый клиент, мобильное приложение(клиент), мобильное приложение(сервер). Разницу видим?

у себя в коде «СписокЭлементов = ДеревоТоваров.ПолучитьЭлементы;» видишь? вот тоже самое и сделай для каждого элемента «Эл1»

без рекурсии получишь только 2-й уровень, а следующие? =)))) Спасибо, дальше разберусь. 15 лет как ни как в 1С. Просто кризис, деньги нужны, работаю на износ. Туплю ужасно.

Похожие вопросы 1С

• Как заполнить и вывести диаграмму в табличном документе ?
• Как вывести иерархическое дерево в отчете?
• Как быстро выгрузить таблицу значений в дерево значений?
• Подскажите, плиз, можно ли вывести дерево значений.
• Можно ли в 7.7 вывести зачеркнутый шрифт?
• Дерево значений, в Таблицу значений
• Вывести дерево значений на форму.
• Как вывести иерархический справочник в Дерево значений?
• v8: Как вывести дерево значений на управляемую форму?
• Таблица значений в дерево значений.
• Скопировать колонки из таблицы значений в дерево значений
• Вывести дерево значений на форму

В этой группе 1С

• конвертация данных документа операция бухгалтерская
• Списание материалов в документе «Отчет производства за смену»
• выгрузка из БП 3.0 в БП 3.0
• Первоначальная выгрузка данных из УТ 10.3 в БП 3.0
• 1C 8.2 + Citrix. Документы создаются на час позже текущего времени
• Как получить текст запроса РЛС из роли?
• Эмулятор считывателя магнитных карт
• УТ 11.1 Штрихкодирование серий товара
• БП 2.0. Переход с 1 октября с УСН на ОСНО. Как ввести остатки по товару и НДС ?
• v7: Регистры в 1с 7.7
• Веб-клиент, windows авторизация
• Как попасть на экзамен 1С:Эксперт по технологическим вопросам?
• ПриКопировании(ОбъектКопирования)
• Перебор реквизитов в УФ на клиенте для запрета. Как?
• Отбор в найтиПоСсылкам()
• как передать в запрос список значений
• OFF: Разбили стекло в машине. КАСК нет. Есть смысл обращаться в полицию?
• Как восстановить субконто?
• Помогите в 1с 8.3 в модуле объекта «увидеть» переменную, объявленную в нём же
• Как и где получить значение константы в управляемой форме

Источник