Всем доброго дня!
Пожалуйста помогите решить проблему: есть Отчет (не на СКД), в нем есть табличная часть. Заголовки колонок формируются автоматически, в зависимости от содержимого колонок (все колонки числовые). По команде "Сформировать" заполняется эта ТЧ и в зависимости от Итогов в колонках, пустые колонки "прячутся" (Видимость=Ложь). Не могу сообразить, как вывести на печать (в макет) только видимые колонки (с заголовками как в ТЧ)??? Может быть это вааще не возможно сделать?
P.S. Управляемые формы, платформа 8.3.14, ЗУП-3.1 релиз 3.1.10.111
Пожалуйста помогите решить проблему: есть Отчет (не на СКД), в нем есть табличная часть. Заголовки колонок формируются автоматически, в зависимости от содержимого колонок (все колонки числовые). По команде "Сформировать" заполняется эта ТЧ и в зависимости от Итогов в колонках, пустые колонки "прячутся" (Видимость=Ложь). Не могу сообразить, как вывести на печать (в макет) только видимые колонки (с заголовками как в ТЧ)??? Может быть это вааще не возможно сделать?
P.S. Управляемые формы, платформа 8.3.14, ЗУП-3.1 релиз 3.1.10.111
По теме из базы знаний
- Универсальный конструктор отчетов (Новейший отчет) для 1C 7.7
- Универсальный просмотр/отчет/печать движений/остатков любых регистров 1С:Предприятия 7.7
- Отчет по выпуску (производство)
- Вывод изображения номенклатуры в отчете "Печать прайс-листа"
- Пользовательские настройки отчетов 1С. Часть 1. Простые и расширенные настройки
Найденные решения
В форме создайте реквизит Результат с типом "ТабличныйДокумент" и расположите его временно на форме, его надо заполнить на основании Вашей ТЧ. Заполнение идет с помощью макета, где описаны области заполнения "Шапка", "СтрокаТЧ" и т.п. После заполнения Вы получите полный вывод ТЧ, а потом сделайте кнопку "Удалить" и по ней удалите лишние колонки - посмотрите результат. Далее кнопку можно будет убрать и сразу формировать Результат и удалять колонки.
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(1)
В 8-ке этот метод стал называться Присоединить(), но принцип не изменился:
В вашем случае можно предложить следующий алгоритм:
1. Заполняем массив или список значений именами колонок, которые нужно вывести.
2. Создаем табличный документ.
3. Выводим в табличный документ методом Вывести() общую секцию заголовка (секцию, которая должна выводиться в любом случае).
4. В цикле по массиву (или списку значений) методом Присоединить() добавляем справа заголовки тех колонок, которые должны быть выведены.
5. Методом Вывести() выводим в новую строку общую секцию строки.
6. В цикле по массиву (или списку значений) методом Присоединить() добавляем справа ячейки тех колонок, которые должны быть выведены.
7. Повторяем в цикле по строкам пп. 5 и 6.
Не могу сообразить, как вывести на печать (в макет) только видимые колонки (с заголовками как в ТЧ)??? Может быть это вааще не возможно сделать?
Очень даже возможно, даже в 1С 7.7 эта задача решалась при помощи метода ПрисоединитьСекцию()
В 8-ке этот метод стал называться Присоединить(), но принцип не изменился:
В вашем случае можно предложить следующий алгоритм:
1. Заполняем массив или список значений именами колонок, которые нужно вывести.
2. Создаем табличный документ.
3. Выводим в табличный документ методом Вывести() общую секцию заголовка (секцию, которая должна выводиться в любом случае).
4. В цикле по массиву (или списку значений) методом Присоединить() добавляем справа заголовки тех колонок, которые должны быть выведены.
5. Методом Вывести() выводим в новую строку общую секцию строки.
6. В цикле по массиву (или списку значений) методом Присоединить() добавляем справа ячейки тех колонок, которые должны быть выведены.
7. Повторяем в цикле по строкам пп. 5 и 6.
Есть такой объект ТабличныйДокумент, там можно выводить в
нужную область программно информацию.
Это может быть реквизит формы, его можно не выводить на форму.
Можно заполнить его полностью, а потом ненужные колонки
удалить (есть метод УдалитьОбласть).
А так желательно на СКД все-таки сделать.
нужную область программно информацию.
Это может быть реквизит формы, его можно не выводить на форму.
Можно заполнить его полностью, а потом ненужные колонки
удалить (есть метод УдалитьОбласть).
А так желательно на СКД все-таки сделать.
(2) На СКД сделать мозгов не хватает: ТЧ этого отчета заполняется из Документа/ов, в котором две ТЧ и в одной колонки стандартно по горизонтали, а в другой, так сказать "по вертикали" (т.е. "вертикаль" перестроена в "горизонталь" и добавлена/присоединена к колонкам первой ТЧ). Вот такая "хитрая" ТЧ в этом Отчете.
(8) Документы, из которых формируется Отчет специфические и довольно сложные по структуре и не имеют отношения к Типовому функционалу. Поэтому объяснять их содержание очень сложно и трудоемко. А в этом Отчете уже есть Табличная часть, в которой все правильно заполняется и остается только без пустографок вывести на печать.
Метод УдалитьОбласть - он полностью удаляет например колонку и сдвигает влево правые колонки или его нужно еще использовать для Строк и Подвала?
Метод УдалитьОбласть - он полностью удаляет например колонку и сдвигает влево правые колонки или его нужно еще использовать для Строк и Подвала?
(9) Вы задаете область ("R2C2:R2C2") и определяете тип смещения По вертикали По горизонтали. Не пробовал - можно ли в качестве области задать сразу колонку. Если да - задаете ее и тип смещения по горизонтали. Посмотрите синтаксис-помощник поиском "ТабличныйДокумент"
(9)
Да и с шапкой не все так просто, если в ней есть объединенные ячейки.
P.S. Если все-таки решите делать через удаление, то надо отдавать себе отчет: удалять области надо справа налево (начиная с самой правой), иначе собьете выборку.
Метод УдалитьОбласть - он полностью удаляет например колонку
Как вы себе представляете указание в качестве области целиком колонки?
или его нужно еще использовать для Строк и Подвала?
Разумеется, для строк обязательно! А вот для подвала - смотря что там, в этом подвале.
Да и с шапкой не все так просто, если в ней есть объединенные ячейки.
P.S. Если все-таки решите делать через удаление, то надо отдавать себе отчет: удалять области надо справа налево (начиная с самой правой), иначе собьете выборку.
(17) ОК, осталось проверить - как будет выглядеть результат, если в шапке и подвале отчета есть объединенные ячейки - так часто делают, чтобы заголовки и подписи выводились "красиво"
Макет не видели ни вы, ни я, так что не вижу смысла дальше спорить, все в руках автора.
Макет не видели ни вы, ни я, так что не вижу смысла дальше спорить, все в руках автора.
Проверил - вот такой код прекрасно сработал
Маленькая "Тонкость" - С2 надо латинским шрифтом писать.
&НаСервереБезКонтекста
Процедура УдалитьКолонкуНаСервере(ТабДок)
Область = ТабДок.Область("C2");
ТабДок.УдалитьОбласть(Область,ТипСмещенияТабличногоДокумента.ПоГоризонтали);
КонецПроцедуры
&НаКлиенте
Процедура УдалитьКолонку(Команда)
УдалитьКолонкуНаСервере(Результат);
КонецПроцедуры ПоказатьМаленькая "Тонкость" - С2 надо латинским шрифтом писать.
(24)ТабДок у меня наверное Макет?! Но
Область = ТабДок.Область("C2");
ТабДок.УдалитьОбласть(Область,ТипСмещенияТабличногоДокумента.ПоГоризонтали);
не дает ни какого результата!!! Все остается на своем месте.
Кстати, извиняюсь, в модуле объекта у меня не Процедура Печать, а функция.
Может перетащить это все в модуль формы?
Область = ТабДок.Область("C2");
ТабДок.УдалитьОбласть(Область,ТипСмещенияТабличногоДокумента.ПоГоризонтали);
не дает ни какого результата!!! Все остается на своем месте.
Кстати, извиняюсь, в модуле объекта у меня не Процедура Печать, а функция.
Может перетащить это все в модуль формы?
В форме создайте реквизит Результат с типом "ТабличныйДокумент" и расположите его временно на форме, его надо заполнить на основании Вашей ТЧ. Заполнение идет с помощью макета, где описаны области заполнения "Шапка", "СтрокаТЧ" и т.п. После заполнения Вы получите полный вывод ТЧ, а потом сделайте кнопку "Удалить" и по ней удалите лишние колонки - посмотрите результат. Далее кнопку можно будет убрать и сразу формировать Результат и удалять колонки.
(27)
Макет должен содержать всего одну колонку с данными, в цикле перебираем колонки ТЧ, каждую проверяем на необходимость вывода по тому же условию, что и видимость, если не должна выводиться (невидима), то пропускаем.
Если должна, то заполняем данными из нее соответствующую область макета и присоединяем ее к выходному табличному документу.
Таких однотипных циклов будет всего 3: по заголовкам, по строкам (в цикле) и по подвалу.
И не надо потом ничего удалять.
P.S. Впрочем, кому что нравится.
Заполнение идет с помощью макета, где описаны области заполнения "Шапка", "СтрокаТЧ" и т.п. После заполнения Вы получите полный вывод ТЧ, а потом сделайте кнопку "Удалить" и по ней удалите лишние колонки
Это называется "создать себе трудности, чтобы потом их героически преодолевать".
Макет должен содержать всего одну колонку с данными, в цикле перебираем колонки ТЧ, каждую проверяем на необходимость вывода по тому же условию, что и видимость, если не должна выводиться (невидима), то пропускаем.
Если должна, то заполняем данными из нее соответствующую область макета и присоединяем ее к выходному табличному документу.
Таких однотипных циклов будет всего 3: по заголовкам, по строкам (в цикле) и по подвалу.
И не надо потом ничего удалять.
P.S. Впрочем, кому что нравится.
(31)
У вас там должна быть шапка? Содержащая, например, наименование организации, период (или дату) отчета и т.д.? То же самое - подвал? Подписанты и прочее?
Откуда это будет выводиться? Или только голая таблица с данными?
не пойму, что это за "макет"
Грубо говоря - заготовка печатной формы вашего отчета.
У вас там должна быть шапка? Содержащая, например, наименование организации, период (или дату) отчета и т.д.? То же самое - подвал? Подписанты и прочее?
Откуда это будет выводиться? Или только голая таблица с данными?
(40) Наконец-то. "В основном в хвосте" или "всегда в хвосте"- от этого зависит выбор алгоритма.
Я бы взял за образец код из ссылки в (3):
1. Создаем объект Табличный документ.
2. Из вашего макета получаем область шапки - допустим, строки R1-R5.
3. Выводим их в ТД.
4. Получаем область R6C1:R6C3 ("Класс" - "Педоклад") и выводим ее в ТД методом Вывести() - с новой строки.
5. В цикле перебираем ячейки строки заголовка: R6C4, R6C5, R6C6 и т.д. (нумерация не с единицы, т.к. "постоянные" колонки уже выведены).
6. Определяем для каждой колонки - должна ли она выводиться? Если да, то получаем область макета R6Cn:R6Cn и присоединяем ее к ТД методом Присоединить() - в той же строке ТД.
7. В цикле по строкам макета R6-Rn повторяем пункты 4-6.
8. Повторяем пп.2-3 для подвала с учетом номеров их строк.
Я бы взял за образец код из ссылки в (3):
1. Создаем объект Табличный документ.
2. Из вашего макета получаем область шапки - допустим, строки R1-R5.
3. Выводим их в ТД.
4. Получаем область R6C1:R6C3 ("Класс" - "Педоклад") и выводим ее в ТД методом Вывести() - с новой строки.
5. В цикле перебираем ячейки строки заголовка: R6C4, R6C5, R6C6 и т.д. (нумерация не с единицы, т.к. "постоянные" колонки уже выведены).
6. Определяем для каждой колонки - должна ли она выводиться? Если да, то получаем область макета R6Cn:R6Cn и присоединяем ее к ТД методом Присоединить() - в той же строке ТД.
7. В цикле по строкам макета R6-Rn повторяем пункты 4-6.
8. Повторяем пп.2-3 для подвала с учетом номеров их строк.
(42) Не всегда "в хвосте", иногда бывает где-либо в середине, например, ни у кого из сотрудников не заполнен параметр "Квалификация", т.е. колонка пустая, вот и желательно спрятать ее с глаз и на бумаге сэкономить место для других колонок. Но главное - не печать последние пустые колонки!
В Макете правее, чем Доплата9 ничего нет.
Колонки Доплата1 по Доплата9 могут быть заполнены, зависит от количества доплат назначенных сотруднику, а если их меньше 9, то и в ТЧ и в Макете пустые колонки, которые нужно удалить.
Колонки Доплата1 по Доплата9 могут быть заполнены, зависит от количества доплат назначенных сотруднику, а если их меньше 9, то и в ТЧ и в Макете пустые колонки, которые нужно удалить.
Но это все - если хотите визуально посмотреть.
А удаление пустых (дополнительных) через
Область = ТабДок.Область("C20:С30");
ТабДок.УдалитьОбласть(Область,ТипСмещенияТабличногоДокумента.ПоГоризонтали)
У табдок есть свойство ширинаТаблицы.
А удаление пустых (дополнительных) через
Область = ТабДок.Область("C20:С30");
ТабДок.УдалитьОбласть(Область,ТипСмещенияТабличногоДокумента.ПоГоризонтали)
У табдок есть свойство ширинаТаблицы.
На мой взгляд, в 30 дан правильный совет.
В макете абсолютно не нужны многочисленные колонки.
И названия колонок и итоги в них элементарно получаются.
Добавьте реквизит формы, например "НевидимыеКолонки", с типом "СписокЗначений" и когда "пустые колонки "прячутся" (Видимость=Ложь)" заполните его.
Дальше заполняете ТабличныйДокумент.
В макете абсолютно не нужны многочисленные колонки.
И названия колонок и итоги в них элементарно получаются.
Добавьте реквизит формы, например "НевидимыеКолонки", с типом "СписокЗначений" и когда "пустые колонки "прячутся" (Видимость=Ложь)" заполните его.
Дальше заполняете ТабличныйДокумент.
(62) Тут предлагают более сложный алгоритм, но зато универсальный
Делаем в макете область Область1 одну ячейку и в ней параметр "ЗначениеЯчейки"
Вывод в Табличный документ пойдет по 2 циклам - сначала по строкам ТЧ,
затем по колонкам ТЧ.
Причем первую ячейку будете выводить ТабДок.Вывести(Область1),
а последующие - при проверке наличия итогов по колонке <> 0
ТабДок.Присоединить(Область1).
Также в цикле будете выводить заголовки нужных колонок.
Делаем в макете область Область1 одну ячейку и в ней параметр "ЗначениеЯчейки"
Вывод в Табличный документ пойдет по 2 циклам - сначала по строкам ТЧ,
затем по колонкам ТЧ.
Причем первую ячейку будете выводить ТабДок.Вывести(Область1),
а последующие - при проверке наличия итогов по колонке <> 0
ТабДок.Присоединить(Область1).
Также в цикле будете выводить заголовки нужных колонок.
Примерно так:
На форме создать реквизит "ВидимыеКолонки" с типом "СписокЗначений".
Когда в коде определяется видимость колонок
ВидимыеКолонки.Добавить(ИмяКолонки, Заголовок)
Затем формируем из "ВидимыеКолонки" строку и выгружаем в Таблицу значений данные из таблицы на форме ТЗ = Таб.Выгрузить( , строка колонок)
Ну а дальше заполняем табличный документ, сначала имена колонок, затем значения ,и наконец, итоги по колонкам
На форме создать реквизит "ВидимыеКолонки" с типом "СписокЗначений".
Когда в коде определяется видимость колонок
ВидимыеКолонки.Добавить(ИмяКолонки, Заголовок)
Затем формируем из "ВидимыеКолонки" строку и выгружаем в Таблицу значений данные из таблицы на форме ТЗ = Таб.Выгрузить( , строка колонок)
Ну а дальше заполняем табличный документ, сначала имена колонок, затем значения ,и наконец, итоги по колонкам
Вот рабочий код
&НаСервере
Функция ПечатьНаСервере()
Отчетик = РеквизитФормыВЗначение("Отчет");
Макет = Отчетик.ПолучитьМакет("Макет");
ТабДок = Новый ТабличныйДокумент;
РеквизитыТЧ = Отчетик.Метаданные().ТабличныеЧасти.ТЧ.Реквизиты;
ОбластьЗаголовок = Макет.ПолучитьОбласть("ЗаголовокКолонки");
ОбластьЧисловойЯчейки = Макет.ПолучитьОбласть("ЗначениеЧисловойЯчейки");
ОбластьСотрудника = Макет.ПолучитьОбласть("ОбластьСотрудника");
ПерваяКолонка = 1;
Для Каждого Колонка из РеквизитыТЧ Цикл
ОбластьЗаголовок.Параметры.Заголовок = Колонка.Синоним;
Если ПерваяКолонка = 1 Тогда
ТабДок.Вывести(ОбластьЗаголовок);
ПерваяКолонка = 0;
Иначе
Если Отчет.ТЧ.Итог(Колонка.Имя) > 0 Тогда
ТабДок.Присоединить(ОбластьЗаголовок);
КонецЕсли;
КонецЕсли;
КонецЦикла;
Для Каждого Строка из Отчет.ТЧ Цикл
ПерваяКолонка = 1;
Для Каждого Колонка из РеквизитыТЧ Цикл
Значение = Строка[Колонка.Имя];
Если ПерваяКолонка = 1 Тогда
ОбластьСотрудника.Параметры.Значение = Значение;
ТабДок.Вывести(ОбластьСотрудника);
ПерваяКолонка = 0;
Иначе
Если Отчет.ТЧ.Итог(Колонка.Имя) > 0 Тогда
ОбластьЧисловойЯчейки. Параметры.Значение = Значение;
ТабДок.Присоединить(ОбластьЧисловойЯчейки);
КонецЕсли;
КонецЕсли
КонецЦикла;
КонецЦикла;
Возврат ТабДок;
КонецФункции
&НаКлиенте
Процедура Печать(Команда)
Результат = ПечатьНаСервере();
Результат.Показать();
КонецПроцедуры
Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот