Для отображения персонализированного контента и рекламных сообщений, а также хранения личных настроек на локальном компьютере веб-сайт www.vdgb.ru используют технологию cookie и аналогичные. Продолжив использование наших веб-сайтов, Вы даете согласие на обработку персональных данных, выражаете согласие с Политикой конфиденциальности www.vdgb.ru и применением этих технологий.

ПРОДАЖА И ВНЕДРЕНИЕ 1С

по всей России

Пример вывода в шапке отчета произвольного текста и Картинки

Проконсультироваться
со специалистом 1С

Консультироваться

Многие спрашивают "Как в шапке отчета созданом с помощи СКД разместить произвольный текст и Картинку?", так вот:

1. Для примера буду использовать отчет созданный в Пример разработки простого отчета - Схема Компоновки Данных (СКД)
2. В отчете создадим основную форму и для кнопки сформировать пропишем процедуру ПечатьНажатие:

Код 1C v 8.х
 Процедура ПечатьНажатие(Элемент)
      
СхемаКомпоновкиДанных = ПолучитьМакет("ОсновнаяСхемаКомпоновкиДанных");

КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
ДанныеРасшифровки = Новый ДанныеРасшифровкиКомпоновкиДанных;
Настройки = КомпоновщикНастроек.Настройки;
МакетКомпоновки = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных, Настройки, ДанныеРасшифровки);

ПроцессорКомпоновкиДанных = Новый ПроцессорКомпоновкиДанных;
ПроцессорКомпоновкиДанных.Инициализировать(МакетКомпоновки,, ДанныеРасшифровки);

ДокументРезультат = ЭлементыФормы.Результат;
ДокументРезультат.АвтоМасштаб = Истина; // Сделаем по ширине листа
//А если сделать так как на следующей строчке, то можно вывести в новый Табличный документ
//ДокументРезультат = Новый ТабличныйДокумент;

//Вывод текста и картинки
Макет = ПолучитьМакет("НазваниеСРисунком");
ОбластьВывести = Макет.ПолучитьОбласть("Вывести");
ОбластьВывести.Параметры.ТекДата=ТекущаяДата();
ДокументРезультат.Вывести(ОбластьВывести);
//Текст и картинку вывели, теперь сам отчет

ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
ПроцессорВывода.УстановитьДокумент(ДокументРезультат);
ПроцессорВывода.Вывести(ПроцессорКомпоновкиДанных);

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


3. И создаем макет "НазваниеСРисунком"


4. Сохраняем, запускаем, получаем:


Автор: Евгений Мигачев


Заказать обратный звонок

Позвонить
Отправлено! В самое ближайшее время наш менеджер свяжется с Вами.