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



Функция Печать() Экспорт
   
       ТабДокумент = Новый ТабличныйДокумент;
       Макет       = ПолучитьМакет("Макет");

       Для Каждого Строка из СсылкаНаОбъект.Товары Цикл
                   
           Запрос=Новый Запрос;
           Запрос.Текст=
           "ВЫБРАТЬ
           |    ХранилищеДополнительнойИнформации.Хранилище,
           |    ХранилищеДополнительнойИнформации.Ссылка
           |ИЗ
           |    Справочник.ХранилищеДополнительнойИнформации КАК ХранилищеДополнительнойИнформации
           |ГДЕ
           |    ХранилищеДополнительнойИнформации.Объект = &Объект";
           Запрос.УстановитьПараметр("Объект",Строка.Номенклатура);
           Если НЕ Запрос.Выполнить().Пустой() Тогда
           ВыборкаХранИзображений=Запрос.Выполнить().Выбрать();
           Пока ВыборкаХранИзображений.Следующий() Цикл
               ОбластьМакета = Макет.ПолучитьОбласть("Изображение");            
               РисунокСертификат = ОбластьМакета.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
               РисунокСертификат = ВыборкаХранИзображений.Хранилище.Получить();
               РисунокСертификат.Защита = Истина;
               РисунокСертификат.Лево=0;
               РисунокСертификат.Верх=0;
               РисунокСертификат.Высота=280;
               РисунокСертификат.Ширина=180;
               
               ТабДокумент.Вывести(ОбластьМакета);
               ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();
               
           КонецЦикла;
       Иначе
           Сообщить("Для номенклатуры "+СокрЛП(Строка.Номенклатура)+" сертификат не загружен");
       КонецЕсли;            
           
       КонецЦикла;    
       ТабДокумент.ПолеСверху = 0;
       ТабДокумент.ПолеСлева  = 0;
       ТабДокумент.ПолеСнизу  = 0;
       ТабДокумент.ПолеСправа = 0;
       ТабДокумент.ОриентацияСтраницы = ОриентацияСтраницы.Портрет;
       ТабДокумент.АвтоМасштаб = Истина;
       
       ТабДокумент.Показать();

КонецФункции

Заранее благодарен за любую помощь!

РисунокСертификат = Новый Картинка(ВыборкаХранИзображений.Хранилище.Получить());

icipher, спасибо, но теперь пишет:
Ошибка при вызове конструктора (Картинка): Несоответствие типов (параметр номер '1')

никто не знает?