УТ 10.3 Как установить тип значения свойства номенклатуры?
Переношу свойства номенклатуры из другой базы с помощью OLE.
Свойства номенклатуры переносятся, но все устанавливается реквизит "Тип значения свойства" для всех свойств одинаковый "Значения свойств объектов", хотя в другой базе есть и "Число" и "Строка".
Процедура КнопкаВыполнитьНажатие(Кнопка)
ИмяCOM=УправлениеСоединениямиИБ.ИмяCOMСоединителя();
Состояние("База Херсонская ...");
Пользователь=СокрЛП(Пользователь);
Пароль=СокрЛП(Пароль);
// Создается объект-коннектор
БД = Новый COMObject(ИмяCOM);
СоединениеБД = БД.Connect("File="+СокрЛП(КаталогМода)+";Usr="+Пользователь+";pwd=" + Пароль + ";");
ЗапросБД = СоединениеБД.NewObject("Запрос");
// ЗапросБД = Новый Запрос;
ЗапросБД.Текст = "ВЫБРАТЬ
| СвойстваОбъектов.Ссылка,
| СвойстваОбъектов.ВерсияДанных,
| СвойстваОбъектов.ПометкаУдаления,
| СвойстваОбъектов.Предопределенный,
| СвойстваОбъектов.Код,
| СвойстваОбъектов.Наименование,
| СвойстваОбъектов.ТипЗначения,
| СвойстваОбъектов.НазначениеСвойства,
| СвойстваОбъектов.НазначениеСвойства.ТипЗначения
|ИЗ
| ПланВидовХарактеристик.СвойстваОбъектов КАК СвойстваОбъектов
|ГДЕ
| СвойстваОбъектов.НазначениеСвойства = &НазначениеСвойства";
ЗапросБД.УстановитьПараметр("НазначениеСвойства",СоединениеБД.ПланыВидовХарактеристик.НазначенияСвойствКатегорийОбъектов.Справочник_Номенклатура);
Выборка = ЗапросБД.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
ПВХ = ПланыВидовХарактеристик.СвойстваОбъектов;
ТекПВХ = ПВХ.НайтиПоНаименованию(Выборка.Наименование);
Если ТекПВХ=ПВХ.ПустаяСсылка() Тогда
НовыйПлан = ПланыВидовХарактеристик.СвойстваОбъектов.СоздатьЭлемент();
Иначе
НовыйПлан = ТекПВХ.ПолучитьОбъект();
КонецЕсли;
НовыйПлан.Наименование = Выборка.Наименование;
ТипСтрока = СоединениеБД.String(Выборка.ТипЗначения);
Если ТипСтрока = "Число" Тогда
// НовыйПлан.ТипЗначения =;
ИначеЕсли ТипСтрока = "Строка" Тогда
// НовыйПлан.ТипЗначения = Тип("Строка");
Иначе
// НовыйПлан.ТипЗначения = Тип("СправочникСписок.ЗначенияСвойствОбъектов");
КонецЕсли;
НовыйПлан.НазначениеСвойства = ПланыВидовХарактеристик.НазначенияСвойствКатегорийОбъектов.Справочник_Номенклатура;
Попытка
НовыйПлан.Записать();
Исключение
Сообщить("--- "+ОписаниеОшибки());
КонецПопытки;
КонецЦикла;
Сообщить("Конец загрузки !!!");
КонецПроцедуры
ПоказатьСвойства номенклатуры переносятся, но все устанавливается реквизит "Тип значения свойства" для всех свойств одинаковый "Значения свойств объектов", хотя в другой базе есть и "Число" и "Строка".
По теме из базы знаний
- Выгрузка данных из УТ (Управления торговлей) 10.3 / 10.2 в БП (Бухгалтерию предприятия), ред. 3.0 (Версия 3.7.13)
- Загрузка номенклатуры c картинками (несколько потоков одновременно) и сопутствующими данными в базу и любые документы из yml, xls, xlsx, xlsm, ods, ots, csv для УТ 10.3, УТ 11 (все), БП 3, КА 2, ERP 2, УНФ 1.6/3.0, Розница 2/3.0
- Свертка базы - или как свернуть базу УТ 10.3
- Множественный выбор значения дополнительного свойства при обмене с сайтом на Битрикс
- Загрузка чеков в 1С из ФНС в документы БП, УНФ, ERP, КА и УТ
Найденные решения
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот