Доброго времени суток!

Такая проблема. Есть справочник "контрагенты" и есть макет печатной формы элемента справочника. На печатную форму выводятся реквизиты справочника в столбик, но есть реквизиты которые не заполнены.

Задача: не выводить на печатную форму пустые реквизиты. Форма создавалась конструктором печатных форм.

Вот код.

Процедура Печать() Экспорт
   ТабДок = Новый ТабличныйДокумент;
   Макет = Справочники.КонтрагентыСчета.ПолучитьМакет("Печать");
   Шапка = Макет.ПолучитьОбласть("Шапка");
   
   Шапка.Параметры.Заполнить(ЭтотОбъект);
   
   шапка.ТекущаяОбласть.пус
   ТабДок.Вывести(Шапка);
   
   
   
   ТабДок.ОтображатьСетку = Ложь;
   ТабДок.Защита = Ложь;
   ТабДок.ТолькоПросмотр = Ложь;
   ТабДок.ОтображатьЗаголовки = Ложь;
   ТабДок.Показать();
КонецПроцедуры

Опечатка. Такой вот код!


Процедура Печать() Экспорт
   ТабДок = Новый ТабличныйДокумент;
   Макет = Справочники.КонтрагентыСчета.ПолучитьМакет("Печать");
   Шапка = Макет.ПолучитьОбласть("Шапка");
   
   Шапка.Параметры.Заполнить(ЭтотОбъект);
   
   ТабДок.Вывести(Шапка);
   
   
   
   ТабДок.ОтображатьСетку = Ложь;
   ТабДок.Защита = Ложь;
   ТабДок.ТолькоПросмотр = Ложь;
   ТабДок.ОтображатьЗаголовки = Ложь;
   ТабДок.Показать();
КонецПроцедуры

задача ясна

как сделать так чтобы пустые реквизиты не выводились ?

(3) пробежаться по параметрам, при заполненности выводить

что-то типа Если ЗначениеЗаполнено(ЭтотОбъект[ТекПараметр])

использовать больше областей

создать в макете ОбластьРеквизиты, там 2 параметра: Имя реквизита и значение реквизита. И при обходе реквизитов справчоника, по условию использоватье ПрисоединитьОбласть.

(7) А можете расписать подробнее? Я просто новичок совсем в программировании. Область я создал, а как привязать к ним реквизиты справочника ?

(8) а тебе из всех подряд незаполненные выводить надо или из какого-то подмножества?

(9) *не выводить

спр=Справочники.Контрагенты.НайтиПоКоду();
Для Каждого ТекРеквизит Из спр.Метаданные().Реквизиты Цикл
   ЗначениеРеквизита=спр[ТекРеквизит.Имя];
   Если ЗначениеЗаполнено(ЗначениеРеквизита) Тогда
   КонецЕсли;
КонецЦикла;

(8) у области в свойствах есть тип заполнения. Надо выбрать Параметр. Чуть ниже задать его имя и потом в коде .... Область.Параметры.ИмяПараметра = ЗначениеПараметра.

из всех

(13) на здоровье

в общим я сделал вот так

ТабДок = Новый ТабличныйДокумент;
   Макет = Справочники.КонтрагентыСчета.ПолучитьМакет("Печать");
   // Заголовок
   //Область = Макет.ПолучитьОбласть("Заголовок");
   //ТабДок.Вывести(Область);
   // Шапка
   Шапка = Макет.ПолучитьОбласть("Шапка");
   Шапка.Параметры.Заполнить(ЭтотОбъект);
   Шапка.Параметры.Наименование = "" + ЭтотОбъект.Наименование + Символы.ПС + "ФИО" + ЭтотОбъект.Фамилия + Символы.ПС +
   "г." + ЭтотОбъект.Город + Символы.ПС + "с." + ЭтотОбъект.Село + Символы.ПС + "обл." + ЭтотОбъект.Область + Символы.ПС +
   "Р-н" + ЭтотОбъект.Район + Символы.ПС + "ул." + ЭтотОбъект.Улица + Символы.ПС ;
   ТабДок.Вывести(Шапка);

   ТабДок.ОтображатьСетку = Ложь;
   ТабДок.Защита = Ложь;
   ТабДок.ТолькоПросмотр = Ложь;
   ТабДок.ОтображатьЗаголовки = Ложь;
   ТабДок.Показать();


Теперь где-то тут нужно поставить проверку заполнения.

зачем наврал в (13)?

(15) Какой бюджет?

+(11) Шапка.Параметры.ИмяРеквизита=ТекРеквизит.Имя;
Шапка.Параметры.ЗначениеРеквизита=ЭтотОбъект[ЗначениеРеквизита];
ТабДок.Вывести(Шапка);

даже Шапка.Параметры.ИмяРеквизита=ТекРеквизит.Синоним

(17) не понял вопрос

Сделал так :

Процедура Печать() Экспорт
   ТабДок = Новый ТабличныйДокумент;
   Макет = Справочники.КонтрагентыСчета.ПолучитьМакет("Печать");
   Шапка = Макет.ПолучитьОбласть("Шапка");
   Шапка.Параметры.Заполнить(ЭтотОбъект);
   Шапка.Параметры.Наименование = "" + ?(ЗначениеЗаполнено(ЭтотОбъект.Наименование),ЭтотОбъект.Наименование + Символы.ПС,"") +
   
   ?(ЗначениеЗаполнено(ЭтотОбъект.Фамилия),"ФИО: " + ЭтотОбъект.Фамилия,"")+ Символы.ПС +
   ?(ЗначениеЗаполнено(ЭтотОбъект.Город),"г. " + ЭтотОбъект.Город + Символы.ПС,"") +
   ?(ЗначениеЗаполнено(ЭтотОбъект.Село),"с. " + ЭтотОбъект.Село + Символы.ПС,"") +
   ?(ЗначениеЗаполнено(ЭтотОбъект.Область),"обл. " + ЭтотОбъект.Область + Символы.ПС,"") +
   ?(ЗначениеЗаполнено(ЭтотОбъект.Район),"Р-н. " + ЭтотОбъект.Район + Символы.ПС,"") +
   ?(ЗначениеЗаполнено(ЭтотОбъект.Улица),"ул. " + ЭтотОбъект.Улица + Символы.ПС,"") +
   ?(ЗначениеЗаполнено(ЭтотОбъект.Дом),"Дом. " + ЭтотОбъект.Дом + Символы.ПС,"") +
   ?(ЗначениеЗаполнено(ЭтотОбъект.Корпус),"Корп. " + ЭтотОбъект.Корпус + Символы.ПС,"") +
   ?(ЗначениеЗаполнено(ЭтотОбъект.Офис),"офис: " + ЭтотОбъект.Офис + Символы.ПС,"") ;
   
   
   ТабДок.Вывести(Шапка);

   ТабДок.ОтображатьСетку = Ложь;
   ТабДок.Защита = Ложь;
   ТабДок.ТолькоПросмотр = Ложь;
   ТабДок.ОтображатьЗаголовки = Ложь;
   ТабДок.Показать();
КонецПроцедуры



Может кому-то это поможет.

(20) кому это может помочь?

(21) например тому у кого возникнет такая же проблема

(22) тому мы посоветуем делать заполнение и вывод области пореквизитно

(20) Боже мой... Тебе же написали в (11) как это делается.

спр=Справочники.Контрагенты.НайтиПоКоду(); // Берешь твой объект
Для Каждого ТекРеквизит Из спр.Метаданные().Реквизиты Цикл // Начинаешь перебирать все его реквизиты
   ЗначениеРеквизита=спр[ТекРеквизит.Имя]; // Берешь значение какого-то реквизита
   Если ЗначениеЗаполнено(ЗначениеРеквизита) Тогда // если оно заполнено делаешь
      Область = ПолучитьОбласть("ИменнованнаяОбласть");
      Область.Параметр.ЗначениеПараметра = "Значение твоего параметра";
      ТабДок.Присоединить(Область); // Почитай разницу в синтаксис-помошнике для табличного документа между Присоединить и Вывести.
   КонецЕсли;
КонецЦикла;

Я всё понимаю, и все мы были новичками и когда-то даже ходить не умели, но я соглашусь с (21), и очень надеюсь, что это никому и никогда не поможет. Потому что когда я встречаю такой код, то становится как-то не по себе (мягко говоря).
И ещё. Открой УТ 10.3 типовую (например) и посмотри формирование печатной формы, например, у счета.
Там есть колонка, которая добавляется в зависимости от того, какую ты в настройка программы выбрал доп. колонку печати (Артикул или код).
Там очень простой и понятный код формирования печатных форм с присоединяемой колонкой в шапке и строках.

эх, и я когда то был в 1С полным лопухом. Как меня тут пинали *по щеке стекает слеза ностальгии*

(24) получать одну и ту же область в цикле нехорошо

(25) + 1. Да все такие были)))
(1) Так что не ленись, открой формирование любой печ. формы и почитай, как это делается. Времени потратишь - час - два максимум, а пользы от этого будет много, особенно если ты собираешься заниматься 1сом серьёздно.

(24) Согласен. Это всё понедельник. Я особо и не думал.

(28) такие вещи на уровне рефлексов должны быть )

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

По поводу печатных форм в УТ, почитаю спасибо!

дело не в конфе, пока учишься - формируется общий подход. Этот как почерк. Одно дело его поставить сразу, а другое после его исправлять.

пелядь, какие все вумные... типа, уже не новички, да? пороху понюхали?

(32) завидно?

(32) а у тебя даже полоска на 2 см длиннее моей