Вывод картинки на печать

@kat2504 · Регистрация: 09.05.2017

Author24 — интернет-сервис помощи студентам

Есть документ КоммерческоеПредложение в нем табличная часть Оборудование в ней реквизиты Наименование(тип Справочники.Номенклатура), Фото (тип Справочники.НоменклатураПрисоединенныеФайлы) и т.д....

При заполнении строки Наименование происходит автоматическое заполнение всех остальных строк включая столбец Фото (но заполняется названием этого фото).

В справочнике Номенклатура есть реквизит ФайлКартинки (тип Справочники.НоменклатураПрисоединенныеФайлы) через него загружаются изображения

Все изображения хранятся в РегистрыСведений.ПрисоединенныеФайлы в котором есть Измерения ПрисоединенныйФайл и ресурс ХранимыйФайл (тип ХранилищеЗначения)

Мне нужно, чтобы при печати выводилось не название этого фото, а само изображение. Помогите исправить код.
Постоянно выдает ошибки при попытке распечатать
{Документ.КоммерческоеПредложение.МодульМенеджера(45)}: Метод объекта не обнаружен (НоменклатураПрисоединенныеФайлы)
Фото = Новый Картинка(Справочники.НоменклатураПрисоединенныеФайлы());

Как только не писала этот путь. Ошибка все равно есть.

В модуле менеджере:

1C

Процедура Печать(ТабДок, Ссылка) Экспорт
    //{{_КОНСТРУКТОР_ПЕЧАТИ(Печать)
    Макет = Документы.КоммерческоеПредложение.ПолучитьМакет("Печать");
    Запрос = Новый Запрос;
    Запрос.Текст =
    "ВЫБРАТЬ
    |   КоммерческоеПредложение.ВидПредложения,
    |   КоммерческоеПредложение.Дата,
    |   КоммерческоеПредложение.ИтогоСтоимость,
    |   КоммерческоеПредложение.Контрагент,
    |   КоммерческоеПредложение.Номер,
    |   КоммерческоеПредложение.СтоимостьОборудования,
    |   КоммерческоеПредложение.СтоимостьРабот,
    |   КоммерческоеПредложение.Оборудование.(
    |       НомерСтроки,
    |       Фото,
    |       Группа,
    |       Наименование,
    |       Описание,
    |       Количество,
    |       ЕдиницаИзмерения,
    |       Цена,
    |       Сумма
    |   ),
    |   КоммерческоеПредложение.РаботыУслуги.(
    |       НомерСтроки,
    |       Наименование,
    |       Количество,
    |       ЕдиницаИзмерения,
    |       Цена,
    |       Сумма
    |   )
    |ИЗ
    |   Документ.КоммерческоеПредложение КАК КоммерческоеПредложение
    |ГДЕ
    |   КоммерческоеПредложение.Ссылка В (&Ссылка)";   
    Запрос.Параметры.Вставить("Ссылка", Ссылка);
    Выборка = Запрос.Выполнить().Выбрать();
    
Пока Выборка.Следующий()Цикл
        
        ОбластьКартинки = Макет.ПолучитьОбласть("Картинка"); 
Фото = Новый Картинка(Справочники.НоменклатураПрисоединенныеФайлы()); 
ОбластьКартинки.Параметры.Фото = Выборка.Оборудование.Колонки.Фото; 
ТабДок.Вывести(ОбластьКартинки); 
ТабДок.Показать();
        КонецЦикла;
 
    ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
    Шапка = Макет.ПолучитьОбласть("Шапка");
    ОбластьОборудованиеШапка = Макет.ПолучитьОбласть("ОборудованиеШапка");
    ОбластьОборудование = Макет.ПолучитьОбласть("Оборудование");
    ОбластьРаботыУслугиШапка = Макет.ПолучитьОбласть("РаботыУслугиШапка");
    ОбластьРаботыУслуги = Макет.ПолучитьОбласть("РаботыУслуги");
    ТабДок.Очистить();
 
    ВставлятьРазделительСтраниц = Ложь;
    Пока Выборка.Следующий() Цикл
        Если ВставлятьРазделительСтраниц Тогда
            ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
        КонецЕсли;
 
        ТабДок.Вывести(ОбластьЗаголовок);
 
        Шапка.Параметры.Заполнить(Выборка);
        ТабДок.Вывести(Шапка, Выборка.Уровень());
 
        ТабДок.Вывести(ОбластьОборудованиеШапка);
        ВыборкаОборудование = Выборка.Оборудование.Выбрать();
        Пока ВыборкаОборудование.Следующий() Цикл
            ОбластьОборудование.Параметры.Заполнить(ВыборкаОборудование);
            ТабДок.Вывести(ОбластьОборудование, ВыборкаОборудование.Уровень());
                    КонецЦикла;
            
 
        ТабДок.Вывести(ОбластьРаботыУслугиШапка);
        ВыборкаРаботыУслуги = Выборка.РаботыУслуги.Выбрать();
        Пока ВыборкаРаботыУслуги.Следующий() Цикл
            ОбластьРаботыУслуги.Параметры.Заполнить(ВыборкаРаботыУслуги);
            ТабДок.Вывести(ОбластьРаботыУслуги, ВыборкаРаботыУслуги.Уровень());
        КонецЦикла;
 
        ВставлятьРазделительСтраниц = Истина;
    КонецЦикла;
    //}}
КонецПроцедуры

Добавлено через 35 минут

1C

ОбластьКартинка = Макет.ПолучитьОбласть("Картинка"); 
Картинка = Новый Картинка(РегистрыСведений.ПрисоединенныеФайлы.Получить()); 
ОбластьКартинка.Рисунки.Фото.Картинка = Картинка; 
ТабДок.Вывести(ОбластьКартинка);

Прорбую так все равно ошибка

{Документ.КоммерческоеПредложение.МодульМенеджера(45)}: Ошибка при вызове метода контекста (Получить)
Картинка = Новый Картинка(РегистрыСведений.ПрисоединенныеФайлы.Получить());
по причине:
Недопустимое значение параметра (параметр номер '1')

@GreenkA · 09.05.2017, 19:47

kat2504,укажите название вашей конфигурации и покажите ваш макет.
Вы дважды пытаетесь обойти Выборку, без сброса. Во второй цикл обхода выборки отладка просто не зайдет...
По картинкам - обращайтесь через реквизит Фото. В справочнике НоменклатураПрисоединенныеФайлы есть же реквизит ФайлХранилище типа ХранилищеЗначения? Как пример: Новый Картинка(ВыборкаОборудование.Фото.Получить()).

@kat2504 · 09.05.2017, 20:03 **[ТС]**

Конфигурация сервисный центр 1.6.

@kat2504 · 09.05.2017, 20:55 **[ТС]**

макет

@kat2504 · 10.05.2017, 12:39 **[ТС]**

1C

Пока Выборка.Следующий()Цикл
        ОбластьКартинка = Макет.ПолучитьОбласть("Картинка"); 
Картинка = Новый Картинка(Выборка.Оборудование.Фото.Получить()); 
ОбластьКартинка.Рисунки.Фото.Картинка = Картинка; 
ТабДок.Вывести(ОбластьКартинка); 
 
ТабДок.Показать()
        КонецЦикла;

Выдает ошибку при попытке печати

{Документ.КоммерческоеПредложение.МодульМенеджера(45)}: Поле объекта не обнаружено (Фото)
Картинка = Новый Картинка(Выборка.Оборудование.Фото.Получить());

Если так

1C

1	Картинка = Новый Картинка(ВыборкаОборудование.Фото.Получить());

Ошибка при проверке модуля

{Документ.КоммерческоеПредложение.МодульМенеджера(45,27)}: Переменная не определена (ВыборкаОборудование)
Картинка = Новый Картинка(<<?>>ВыборкаОборудование.Фото.Получить()); (Проверка: Сервер)

Добавлено через 15 часов 41 минуту

1C

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

Ошибка при попытке печати
{Документ.КоммерческоеПредложение.МодульМенеджера(48)}: Ошибка при вызове конструктора (Картинка)
Картинка = Новый Картинка (Выборка.Оборудование.Колонки.Фото);
по причине:
Несоответствие типов (параметр номер '1')

@polax · 10.05.2017, 14:18

В Выборке вашего запроса НЕТ (Выборка.Оборудование.Колонки.Фото)! есть Результат запроса - Выборка.Оборудование.
В данном случае либо стройте запрос на основе таблицы Оборудование документа а не по самому доку, а данные по документу вытаскивайте через ссылку
(типа КоммерческоеПредложениеОборудование.Ссылка.ВидПредложения)
либо в цикле выборки получайте ТЗ из Результата по типу:

1C

Пока Выборка.Следующий()Цикл
// ваш код
ТЗ = Выборка.Оборудование.Выгрузить();
// Действия с извлечением ссылки на фото из ТЗ
КонецЦикла;

@kat2504 · 10.05.2017, 18:28 **[ТС]**

А можно подробный код, а то я уже много перепробовала, и каждый раз ошибки, может ваш рабочий будет

@polax · 11.05.2017, 15:10

kat2504, Никогда не выполнял такой задачи. На форму - все выводится, картинка как вкопанная, а в печатную форму у меня тоже не получилось (((

@GreenkA 3062 / 2009 / 524 Регистрация: 25.06.2009 Сообщений: 6,964
	09.05.2017, 19:47	2
	kat2504,укажите название вашей конфигурации и покажите ваш макет. Вы дважды пытаетесь обойти Выборку, без сброса. Во второй цикл обхода выборки отладка просто не зайдет... По картинкам - обращайтесь через реквизит Фото. В справочнике НоменклатураПрисоединенныеФайлы есть же реквизит ФайлХранилище типа ХранилищеЗначения? Как пример: Новый Картинка(ВыборкаОборудование.Фото.Получить()). 0

@kat2504 0 / 0 / 0 Регистрация: 09.05.2017 Сообщений: 5
	09.05.2017, 20:03 [ТС]	3
	Конфигурация сервисный центр 1.6. 0

@kat2504 0 / 0 / 0 Регистрация: 09.05.2017 Сообщений: 5
	09.05.2017, 20:55 [ТС]	4
	макет Миниатюры 0

@kat2504 0 / 0 / 0 Регистрация: 09.05.2017 Сообщений: 5
	10.05.2017, 18:28 [ТС]	7
	А можно подробный код, а то я уже много перепробовала, и каждый раз ошибки, может ваш рабочий будет 0

@polax 2195 / 1519 / 543 Регистрация: 16.01.2015 Сообщений: 6,530
	11.05.2017, 15:10	8
	kat2504, Никогда не выполнял такой задачи. На форму - все выводится, картинка как вкопанная, а в печатную форму у меня тоже не получилось ((( 0