Молочников Олег Spb. 2024.

Простой способ  выделения цветом в печатных формах. “M-11”, “М-4”,” Сборка товаров” c номенклатурой поставщика.

Один из клиентов попросил сделать вышеназванные печатные формы. Для номенклатуры выводится наименование поставщика из последнего прихода. Если нет, то просто наименование подсвеченное красным.  Принцип раскраски простой. В алгоритме вывода  печатной формы всегда есть фрагмент выводящий макет строки. Например:

ВыборкаПоСтрокам = ВыборкаДокументы.ТаблицаТовары.Выбрать();
Пока ВыборкаПоСтрокам.Следующий() Цикл
ОбластьМакета = Макет.ПолучитьОбласть(ОбластьСтроки);
ОбластьМакета.Параметры.Заполнить(ВыборкаПоСтрокам);
ОбластьМакета.Параметры.НоменклатураПредставление = НоменклатураКлиентСервер.ПредставлениеНоменклатурыДляПечати(
ВыборкаПоСтрокам.НоменклатураПредставление,
ВыборкаПоСтрокам.ХарактеристикаПредставление);
ТабДокумент.Вывести(ОбластьМакета);
КонецЦикла;

Для табличного документа команда “вывести()” возвращает область табличного документа, куда был осуществлен вывод.  Это можно  использовать для выделения цветом по условию:

Пока ВыборкаПоСтрокам.Следующий() Цикл
ОбластьМакета = Макет.ПолучитьОбласть(ОбластьСтроки);
ОбластьМакета.Параметры.Заполнить(ВыборкаПоСтрокам);
ОбластьМакета.Параметры.НоменклатураПредставление = ?((""+ВыборкаПоСтрокам.НаименованиеПоставщика)<>"",ВыборкаПоСтрокам.НаименованиеПоставщика,НоменклатураКлиентСервер.ПредставлениеНоменклатурыДляПечати(
СокрЛП(ВыборкаПоСтрокам.НоменклатураПредставление),
СокрЛП(ВыборкаПоСтрокам.ХарактеристикаПредставление)));
ОбластьТекущейСтроки=ТабДокумент.Вывести(ОбластьМакета);
Горизонталь=ОбластьТекущейСтроки.Верх;
Если ВыводитьДопКолонку Тогда
ТабДокумент.Область(Горизонталь,8,Горизонталь,8).ЦветТекста =?((""+ВыборкаПоСтрокам.НаименованиеПоставщика)="",WebЦвета.Красный,WebЦвета.Черный);
Иначе
ТабДокумент.Область(Горизонталь,4,Горизонталь,4).ЦветТекста =?((""+ВыборкаПоСтрокам.НаименованиеПоставщика)="",WebЦвета.Красный,WebЦвета.Черный);
КонецЕсли;
КонецЦикла;

Печатные формы гарантированно работают на платформе 8.3 (тестировано на релизе 8.3.8.2054)с конфигурациями 1С:ERP Управление предприятием 2 (тестировано на релизе 2.2.1.102) .

Акция! Вы можете скачать эту разработку в  составе архива всех моих разработок, которые я предлагаю за StartMone, по Специальной  цене:  //infostart.ru/public/960899/#archive

P.S.: Надеюсь, вам понравится эта и другие мои статьи и разработки на //infostart.ru/profile/48714/.

Очень жду ваших комментариев  и пожеланий.

Молочников Олег Spb. 2024.