Вывод изображения в Отчете. Подкажите, что не так?

1С v8

15.12.18

✎

13:41

Хочу вывести изображения номенклатуры и штрихкоды в отчете. Если с выводом ШК проблем нет, то с выводом изображений трудности. Пытаюсь адаптировать под себя урок:
https://курсы-по-1с.рф/news/2016-05-05-skd-free-video/

В уроке показано на примере Демо конфигурации которая идет с платформой. Я пытаюсь адаптировать под Розницу 2 со справочником НоменклатураПрисоединенныеФайлы.



Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка)

    

    СтандартнаяОбработка = Ложь;

    

    НастройкиКомпоновки = КомпоновщикНастроек.ПолучитьНастройки();

    

    КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;

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

    

    ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных;

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

    

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

    ПроцессорВывода.УстановитьДокумент(ДокументРезультат);

    ПроцессорВывода.Вывести(ПроцессорКомпоновки);

    

    КоличествоСтрок = ДокументРезультат.ВысотаТаблицы;

    КоличествоКолонок = ДокументРезультат.ШиринаТаблицы;

    

    Для СтрокаДокумента = 1 По КоличествоСтрок Цикл

        Для КолонкаДокумента = 1 По КоличествоКолонок Цикл

            Область = ДокументРезультат.Область(СтрокаДокумента,КолонкаДокумента);

            Расшифровка = Область.Расшифровка;

            Если ТипЗнч(Расшифровка) = Тип("ИдентификаторРасшифровкиКомпоновкиДанных") Тогда

                ПоляРасшифровки = ДанныеРасшифровки.Элементы.Получить(Расшифровка).ПолучитьПоля();

                НайденноеПоле = ПоляРасшифровки.Найти("Изображение");

                Если Не НайденноеПоле = Неопределено Тогда

                    ХранимыйФайл = НайденноеПоле.Значение;

                    Если ТипЗнч(ХранимыйФайл) = Тип("СправочникСсылка.НоменклатураПрисоединенныеФайлы") И ЗначениеЗаполнено(ХранимыйФайл) Тогда

                        УстановитьПривилегированныйРежим(Истина);

                        Если ХранимыйФайл.ТипХраненияФайла = Перечисления.ТипыХраненияФайлов.ВИнформационнойБазе Тогда

                            СтуктураРег = РегистрыСведений.ПрисоединенныеФайлы.Получить(Новый Структура("ПрисоединенныйФайл", ХранимыйФайл));

                            ДанныеИзображения = СтуктураРег.ХранимыйФайл.Получить();

                        Иначе

                            ДанныеИзображения = ?(ЗначениеЗаполнено(ХранимыйФайл.Том.ПолныйПутьWindows), ХранимыйФайл.Том.ПолныйПутьWindows, ХранимыйФайл.Том.ПолныйПутьLinux)

                            + ХранимыйФайл.ПутьКФайлу;

                        КонецЕсли;

                        УстановитьПривилегированныйРежим(Ложь);

                        

                        ИзображениеВДок = ДокументРезультат.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);

                        ИзображениеВДок.Картинка = ДанныеИзображения;

                        ИзображениеВДок.РазмерКартинки = РазмерКартинки.Пропорционально;

                        ИзображениеВДок.Расположить(Область);

                    КонецЕсли;

                КонецЕсли;

            КонецЕсли;

        КонецЦикла;

    КонецЦикла;

    

    ОбщегоНазначенияРТ.ВывестиДатуФормированияОтчета(ДокументРезультат);

    

КонецПроцедуры

Но что я видимо делаю не так. Получаю ошибку:
"Несоответствие типов".

1 nihi1ist

15.12.18

✎