11 июн. 2018 г.

Печать в несколько колонок

&НаСервере Функция ПечатьКолонкамиНаСервере() Обработка = РеквизитФормыВЗначение("Объект"); Макет = Обработка.ПолучитьМакет("Шаблон_480х166_Товары"); Область = Макет.ПолучитьОбласть("Область|Область1"); табДок = Новый ТабличныйДокумент; КоличествоКолонок = 1; Для Каждого Эл Из Объект.Товары Цикл Область.Параметры.Код = Эл.Номенклатура.Артикул; Область.Параметры.Наименование = Эл.Номенклатура.НаименованиеПолное; Если КоличествоКолонок = 1 Или КоличествоКолонок = 5 Тогда //печать в 4 колонки табДок.Вывести(Область); КоличествоКолонок = 1; Иначе табДок.Присоединить(Область); КонецЕсли; КоличествоКолонок = КоличествоКолонок + 1; КонецЦикла; Возврат табДок; КонецФункции

Комментариев нет:

Отправить комментарий

 

CopyPaste Copyright © 2017 - |- Шаблон создан O Pregador - |- Отредактирован myr4ik07