Здравия!
Помогите, пожалуйста.
Сделал отчет для УТ 11, который выводит кроме всего прочего и изображение номенклатур. Но, почему то, 1с выбивает после вывода отчета. Не всегда на первый раз, но больше двух выводов не выдерживает. Думаю, может это только у меня такой косяк... Пожалуйста, протестите на какой-нить УТ.

Вот ссыль: http://yadi.sk/d/a7-XLwy336hU1

(0) 1С:Предприятие 8.2 (8.2.17.157) выбиваний не было

(1), а картинки выводит норм?

Кстати, забыл написать. У меня: 1С:Предприятие 8.2 (8.2.17.153)
На всякий случай)

может быть дело в платформе?

(4) я в детстве тоже на платформу думал

(5), в смысле?

если не мог разобраться думал что платформа виновата. Да и у меня отчет вылетает.

платформа 8.2.17.169

(5) попробуй упростить. По отчету даже курсором водить нельзя

(9), на счет этого да. Но это второй вопрос. Сейчас бы разобраться с вылетами

Сделал по типу: infostart.ru/public/95442/
Только перенес код в модуль объекта из формы и адаптировал под УТ 11 (изображения получаем иным способом)

Что может быть не так?

Кто нить еще проверил. Выбивает отчет или нет?

(9), Кстати, проблема скроллинга решилась при помощи "Меню-Таблица-ЗафиксироватьТаблицу"

Блин, теперь выбивает при каждом формировании отчета =(

еще немного - добъешься что база не будет запускаться .
и потом будет лучше

(16), чего же делать? Не забить же =)

:)

у меня не вылетает

(19), а картинки при этом выводятся? просто, если без картинок, то и у меня не вылетает =)

help =(

ни как, выводи вручную ..

(22), ась?

определи макет, вставь в область элемент "картинка", если я правильно понимаю, изображение хранится в иб, вытаскивай в файл и устанавливай картинки путь изображения

(24), эмм... ты пост (0) прочитал?

Эмс...
Это жесть.
В процедуре ПриКомпоновкиРезультата поставил СтандартнаяОбработка = Ложь и перестало выкидывать!

И решилась проблема с скроллингом!

Мдяс =)

Вот код, который нужно вставить в модуль отчета для вывода картинок. Может кому пригодится. Подробнее можно узнать infostart.ru/public/95442/
Я лишь адаптировал код под модуль объекта и УТ11.


Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка)
   
   
   СтандартнаяОбработка = Ложь;
   
   СхемаКомпоновкиДанных = ПолучитьМакет("ОсновнаяСхемаКомпоновкиДанных");    
   Настройки = КомпоновщикНастроек.Настройки;
   
   ДанныеРасшифровки = Новый ДанныеРасшифровкиКомпоновкиДанных;    
   КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
   МакетКомпоновки = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных,Настройки, ДанныеРасшифровки);
   
   ПроцессорКомпоновкиДанных = Новый ПроцессорКомпоновкиДанных;
   ПроцессорКомпоновкиДанных.Инициализировать(МакетКомпоновки,,ДанныеРасшифровки);
   
   ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
   ПроцессорВывода.УстановитьДокумент(ДокументРезультат);
   
   ПроцессорВывода.Вывести(ПроцессорКомпоновкиДанных);    
   
   
   // //Шаманим над картинками
   Если ВыводитьКартинки Тогда
       
       ТабДок = ДокументРезультат;
       ТабДок.ФиксацияСверху = Ложь;
       ТабДок.ФиксацияСлева  = Ложь;
       
       В = ДокументРезультат.ВысотаТаблицы;
       Ш = ДокументРезультат.ШиринаТаблицы;
       
       Для с=1 По В Цикл
           Для к=1 По Ш Цикл
               Область     = ТабДок.ПолучитьОбласть("R"+Формат(с,"ЧГ=0")+"C"+Формат(к,"ЧГ=0"));
               ТекОбласть  = ТабДок.Область("R"+Формат(с,"ЧГ=0")+"C"+Формат(к,"ЧГ=0"));
               Расшифровка = ТекОбласть.Расшифровка;
               Если ТипЗнч(Расшифровка) = Тип("СправочникСсылка.НоменклатураПрисоединенныеФайлы") Тогда

                   Если Расшифровка.Пустая() тогда
                       Продолжить;
                   КонецЕсли;
                   
                   
                   Картинка = (ПолучитьИзВременногоХранилища(ПрисоединенныеФайлы.ПолучитьДанныеФайла(Расшифровка).СсылкаНаДвоичныеДанныеФайла));
                   Картинка = Новый Картинка(Картинка);
                   
                   
                   Если Картинка = Неопределено Тогда
                       Продолжить;
                   КонецЕсли;
                   ТекОбласть.ВысотаСтроки     = ВысотаКартинки;
                   ТекОбласть.ШиринаКолонки = ШиринаКартинки/4;
                   
                   Рисунок     = Область.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
                   Рисунок.Картинка = Картинка;
                   
                   Рисунок.Лево   = 1;
                   Рисунок.Верх   = 1;
                   
                   Рисунок.Высота = ВысотаКартинки;
                   Рисунок.Ширина = ШиринаКартинки/4;
                   
                   Рисунок.ГраницаСверху = Истина;
                   Рисунок.ГраницаСлева  = Истина;
                   Рисунок.ГраницаСнизу  = Истина;
                   Рисунок.ГраницаСправа = Истина;
                   
                   Рисунок.РазмерКартинки = РазмерКартинки.АвтоРазмер;
                   Рисунок.ВыводитьНаПечать = Истина;
                   
                   Рисунок.Расположить(Область.ТекущаяОбласть);
                   
                   ТабДок.ВставитьОбласть(Область.ТекущаяОбласть,ТабДок.Область("R"+Формат(с,"ЧГ=0")+"C"+Формат(к,"ЧГ=0")));
                   
               КонецЕсли;
           КонецЦикла;
       КонецЦикла;
   КонецЕсли;
   ПроцессорВывода.ЗакончитьВывод();
   
КонецПроцедуры