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