0
НАТалья Голубева
31.10.16
✎
14:01
|
Здравствуйте..Подскажите, пожалуйста
Как скопировать основное изображения из СтрокаТабличнойЧасти.Номенклатура.ОсновноеИзображение.Ссылка и подчинить к новому объекту НовыйОбъект=Справочники["Номенклатура"].СоздатьЭлемент();
По Моему коду создается НовыйОбъектХД=Справочники.ХранилищеДополнительнойИнформации.СоздатьЭлемент();
Но изображение само не скопировалось
СтрокаТабличнойЧасти = ЭлементыФормы.Товары.ТекущиеДанные;
Для каждого СтрокаТабличнойЧасти Из Товары Цикл
НаименованиеДляСайта=СтрокаТабличнойЧасти.Номенклатура.НаименованиеДляСайта;
Размер=СтрокаТабличнойЧасти.ХарактеристикаНоменклатуры;
Спр=НаименованиеДляСайта+" ("+Строка(СтрокаТабличнойЧасти.ХарактеристикаНоменклатуры)+")";
СсылкаНом=Справочники.Номенклатура.НайтиПоНаименованию(Спр).Ссылка;
СсылкаРазм=Справочники.ст_Размеры.НайтиПоНаименованию(Размер).Ссылка;
Если СсылкаРазм=Справочники.ст_Размеры.ПустаяСсылка() Тогда
НовыйОбъект1=Справочники["ст_Размеры"].СоздатьЭлемент();
НовыйОбъект1.Наименование= Размер;
НовыйОбъект1.Записать();
КонецЕсли;
Если СсылкаНом=Справочники.Номенклатура.ПустаяСсылка() Тогда
НовыйОбъект=Справочники["Номенклатура"].СоздатьЭлемент();
НовыйОбъект.Наименование= Спр;
НовыйОбъект.НаименованиеПолное=Спр;
НовыйОбъект.Артикул=СтрокаТабличнойЧасти.Номенклатура.Артикул;
НовыйОбъект.БазоваяЕдиницаИзмерения=Справочники.КлассификаторЕдиницИзмерения.НайтиПоНаименованию("шт");
НовыйОбъект.ВидНоменклатуры=Справочники.ВидыНоменклатуры.НайтиПоНаименованию("Продукция");
// НовыйОбъект.ОсновноеИзображение=СтрокаТабличнойЧасти.Номенклатура.ОсновноеИзображение.Ссылка;
НовыйОбъект.НаименованиеДляСайта=НаименованиеДляСайта;
НовыйОбъект.Родитель=Каталог;
НовыйОбъект.ст_Размер=СсылкаРазм;
НовыйОбъект.Записать();
НовыйОбъектХД=Справочники.ХранилищеДополнительнойИнформации.СоздатьЭлемент();
НовыйОбъектХД.Наименование=Спр;
НовыйОбъектХД.Объект=НовыйОбъект.Ссылка;
НовыйОбъектХД.ВидДанных=Перечисления.ВидыДополнительнойИнформацииОбъектов.Изображение;
НовыйОбъектХД.ПолучитьФорму().ОткрытьМодально();
НовыйОбъектХД.Записать();
НовыйОбъект.ПолучитьФорму().ОткрытьМодально();
НовыйОбъект.Ссылка.ПолучитьОбъект();
СтрокаТабличнойЧасти.Номенклатура=НовыйОбъект.Ссылка;
СтрокаТабличнойЧасти.ЕдиницаИзмерения=НовыйОбъект.ЕдиницаХраненияОстатков.Ссылка;
СтрокаТабличнойЧасти.ХарактеристикаНоменклатуры="";
|
|