Ошибка при установке значения атрибута контекста картинка несоответствие типов

Всем привет!

1С 8.1.15.14

УТ 10.03

Распределенная БД.

Проблема:

К каждому элементу в справочнике «Номенклатура» прилеплена картинка!

И вот как то в один прекрасный день после очередного обмена на дочерней базе в справочнике Номенклатура при выделении какого либо элемента выскакивает ошибка:

{Справочник.Номенклатура.Форма.ФормаСписка(161)}: Ошибка при установке значения атрибута контекста (Картинка): Несоответствие типов

            ЭлементыФормы.ОсновноеИзображение.Картинка = ТекущиеДанныеСписка.ОсновноеИзображение.Хранилище.Получить();

по причине:

Несоответствие типов

Соответственно это ооооочень мешает работе.

В чем может быть причина, ведь фотки на месте и в главной базе все нормально показывает?!!

Ставлю точку останова, после срабатывания вычисляю выражение:

ЭлементыФормы.ОсновноеИзображение.Картинка

Значение — Пустая

Тип — ВидКартинки

ТекущиеДанныеСписка.ОсновноеИзображение.Хранилище.Получить();

Значение — Неопределено

ТекущиеДанныеСписка.ОсновноеИзображение.Хранилище.Получить();

Значение — Ничего нет

Тип — Неопределено

Вот так.

Здравствуйте. Есть справочник хранилище дополнительной информации. Из него вызывается форма другого справочника Изображения Номенклатуры, в котором картинки хранятся в реквизите хранилище значений. Так вот в первом справочнике нужно по ссылке открывать картинку. Когда выбираю позицию в справочнике Изображения Номенклатуры, в справочник Хранилище дополнительной информации записывается ссылка — СсылкаНаФайл. Так вот проблема в том, что не отображается картинка..
Вот код
Процедура ПоказатьКартинкуТекущейСтроки(Элемент)

   Если Элемент.ТекущиеДанные = Неопределено Тогда
      ЭлементыФормы.ПолеИзображения.Картинка = Новый Картинка();
      Возврат;
   КонецЕсли;

   //Проверка на новую строку, если новая то не обновляем изображение.
   Если НЕ Элемент.ТекущаяСтрока.Пустая() Тогда
      ЭлементыФормы.ПолеИзображения.Картинка = СсылкаНаФайл.Хранилище.Получить();
Ошибка:
{Справочник.ХранилищеДополнительнойИнформации.Форма.ФормаСпискаФайловИИзображений.Форма(98)}: Ошибка при установке значения атрибута контекста (Картинка)
ЭлементыФормы.ПолеИзображения.Картинка = СсылкаНаФайл.Хранилище.Получить();
по причине:
Несоответствие типов
Пробовала так
ЭлементыФормы.ПолеИзображения.Картинка = Новый Картинка(СсылкаНаФайл.Хранилище.Получить()) Тогда ругается на параметр 1..

Представьте себе, какая была бы тишина, если бы люди говорили только то, что знают

Спасибо.

Добавлено: 05 мар 2014, 12:03

Спасибо. Я уже разобралась.

1. 

   
   

   Offline

   Громов

   Регистрация:

   10 май 2012

   Сообщения:

   3

   Симпатии:

   0

   Баллы:

   1

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

   Код:

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

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

   или поправьте, если совсем не так делаю..

   
   Громов,
   30 авг 2012
   

   #1