|
Конвертация данных. Дополнительные реквизиты. | ☑ | ||
---|---|---|---|---|
0
Margarita_Irk
23.05.18
✎
07:22
|
Доброго дня всем.
Настраиваю обмен между 1С УПП и БП 3.0. Нужно перекинуть справочник Основных средств из УПП в БП. Причем часть реквизитов карточки ОС УПП загрузить в Дополнительные реквизиты карточки ОС БП. Доп реквизиты в БП хранятся в таблице. На текущий момент данные в нее загружаются, но на форму карточки ОС БП не выводятся. В чем может быть проблема? Код обработчика После загрузки: Если Не ПараметрыОбъекта = Неопределено и ТипЗнч(ПараметрыОбъекта) = Тип("Структура")Тогда Объект.ДополнительныеРеквизиты.Очистить(); Если ПараметрыОбъекта.Свойство("упп_ВидДвигателя") = Истина Тогда НовСтр = Объект.ДополнительныеРеквизиты.Добавить(); НовСтр.Значение = ПараметрыОбъекта.упп_ВидДвигателя; НовСтр.ТекстоваяСтрока= ПараметрыОбъекта.упп_ВидДвигателя; НовСтр.Свойство = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоНаименованию("Вид двигателя"); КонецЕсли; Если ПараметрыОбъекта.Свойство("упп_ГабаритныеРазмеры") = Истина Тогда НовСтр = Объект.ДополнительныеРеквизиты.Добавить(); НовСтр.Значение = ПараметрыОбъекта.упп_ГабаритныеРазмеры; НовСтр.ТекстоваяСтрока= ПараметрыОбъекта.упп_ГабаритныеРазмеры; НовСтр.Свойство = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоНаименованию("Габаритные размеры"); КонецЕсли; Если ПараметрыОбъекта.Свойство("упп_ГаражныйНомерТС") = Истина Тогда НовСтр = Объект.ДополнительныеРеквизиты.Добавить(); НовСтр.Значение = ПараметрыОбъекта.упп_ГаражныйНомерТС; НовСтр.ТекстоваяСтрока= ПараметрыОбъекта.упп_ГаражныйНомерТС; НовСтр.Свойство = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоНаименованию("Гаражный номер ТС"); КонецЕсли; Если ПараметрыОбъекта.Свойство("упп_ГодИзготовленияТС") = Истина Тогда НовСтр = Объект.ДополнительныеРеквизиты.Добавить(); НовСтр.Значение = ПараметрыОбъекта.упп_ГодИзготовленияТС; НовСтр.ТекстоваяСтрока= ПараметрыОбъекта.упп_ГодИзготовленияТС; НовСтр.Свойство = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоНаименованию("Год изготовления ТС"); КонецЕсли; Если ПараметрыОбъекта.Свойство("упп_КатегорияТС") = Истина Тогда НовСтр = Объект.ДополнительныеРеквизиты.Добавить(); НовСтр.Значение = ПараметрыОбъекта.упп_КатегорияТС; НовСтр.ТекстоваяСтрока= ПараметрыОбъекта.упп_КатегорияТС; НовСтр.Свойство = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоНаименованию("Категория ТС"); КонецЕсли; Если ПараметрыОбъекта.Свойство("упп_КонструкциоонаяМасса") = Истина Тогда НовСтр = Объект.ДополнительныеРеквизиты.Добавить(); НовСтр.Значение = ПараметрыОбъекта.упп_КонструкциоонаяМасса; НовСтр.ТекстоваяСтрока= ПараметрыОбъекта.упп_КонструкциоонаяМасса; НовСтр.Свойство = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоНаименованию("Конструкционная масса"); КонецЕсли; Объект.Записать(); КонецЕсли; |
|||
1
DrShad
23.05.18
✎
07:55
|
назначение свойств
|
|||
2
Margarita_Irk
23.05.18
✎
09:33
|
то есть?
|
|||
3
hhhh
23.05.18
✎
09:37
|
(2) наверно всё-таки лучше с типовой такие вещи общедоступные копипастить, чем самому мучиться.
|
|||
4
rozer76
23.05.18
✎
09:44
|
(0) намекаю что кроме пвх есть еще спр. НаборыДополнительныхРеквизитовИСведений
|
|||
5
rozer76
23.05.18
✎
09:45
|
(3) + 1
|
|||
6
Margarita_Irk
23.05.18
✎
10:47
|
не помогло
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |