1c8 как программно добавить значение доп свойства

У заказчика интернет магазин на 1с-битрикс и УТ (обычное приложение), операторы заказчика не верно завели значения нескольких свойств (значений под несколько тысяч).

Задача стояла следующая, необходимо завести новые свойства с типом данных число и перевести на них значение с других свойств типом данных Значения свойств объектов.

Привожу кусок кода решения, существует обработка готов отдать её бесплатно, чтобы получить пишите к Комменты на сайте.

Для решения задачи я отобрал из регистра все значения старого свойства и добавил в новое.

Запрос = Новый Запрос ("ВЫБРАТЬ
                       |	ЗначенияСвойствОбъектов.Объект,
                       |	ЗначенияСвойствОбъектов.Свойство,
                       |	ЗначенияСвойствОбъектов.Значение
                       |ИЗ
                       |	РегистрСведений.ЗначенияСвойствОбъектов КАК ЗначенияСвойствОбъектов
                       |ГДЕ
                       |	ЗначенияСвойствОбъектов.Свойство = &Свойство");
Запрос.УстановитьПараметр("Свойство", ЭтаФорма.ИЗ);
Выборка = Запрос.Выполнить().Выбрать();
МенеджерЗаписи = РегистрыСведений.ЗначенияСвойствОбъектов.СоздатьНаборЗаписей();
Выборка.Следующий();
Сообщить(Выборка.Количество());
Пока Выборка.Следующий() Цикл 	
ОписаниеТипа = Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(10, 2));
Запись = МенеджерЗаписи.Добавить();
Запись.Объект = Выборка.Объект; 
Запись.Свойство = ЭтаФорма.В;
Запись.Значение = ОписаниеТипа.ПривестиЗначение();
Запись.Значение = Число(Выборка.Значение.Наименование);	
КонецЦикла;

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *