Инструменты пользователя

Инструменты сайта


1c:algoritmy_dlja_gruppovoj_obrabotki

Это старая версия документа!


Алгоритмы для групповой обработки

Удалить дополнительный реквизит у элемента справочника

// нужно заполнить наименования свойств отсюда: Наборы дополнительных реквизитов и сведений: e1cib/list/Справочник.НаборыДополнительныхРеквизитовИСведений
// имя для заполнения взять из раздела "для разработчиков"
///////////////////////////////////////////////////////////////////////////////////////
ИмяСвойства = "СюдаНаписатьИмяСвойстваКотороеБудемОчищать";   // ПРИМЕР  "ПрименемостьДетали_c99f7bab121c4a299319920bbd76cb88"
///////////////////////////////////////////////////////////////////////////////////////

Свойство = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоРеквизиту("Имя", ИмяСвойства );
Для Каждого Строка Из Объект.ДополнительныеРеквизиты Цикл
    Если Строка.Свойство = Свойство Тогда
        Объект.ДополнительныеРеквизиты.Удалить(Строка);
        Объект.Записать();
        Прервать;
    КонецЕсли;
КонецЦикла;

Скопировать значение одного доп реквизита в другой

// нужно заполнить наименования свойств отсюда: Наборы дополнительных реквизитов и сведений: e1cib/list/Справочник.НаборыДополнительныхРеквизитовИСведений
// имя для заполнения взять из раздела "для разработчиков"
///////////////////////////////////////////////////////////////////////////////////////
ИмяСвойстваИсточник = "СюдаНаписатьИмяСвойстваИзкоторогоБудемКопировать";   // ПРИМЕР  "ПрименемостьДетали_c99f7bab121c4a299319920bbd76cb88"
ИмяСвойстваПриемник = "СюдаНаписатьИмяСвойстваВкотороеБудемКопировать";
///////////////////////////////////////////////////////////////////////////////////////
СвойствоИсточник = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоРеквизиту("Имя", ИмяСвойстваИсточник);
СвойствоПриемник = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоРеквизиту("Имя", ИмяСвойстваПриемник);
Ссылка = Объект.Ссылка;

ЗначениеИсточник = УправлениеСвойствами.ЗначениеСвойства(Ссылка, СвойствоИсточник);
ЗначениеПриемник = УправлениеСвойствами.ЗначениеСвойства(Ссылка, СвойствоПриемник);

Если ЗначениеЗаполнено(ЗначениеИсточник) И Не ЗначениеЗаполнено(ЗначениеПриемник) Тогда
    Свойства = Новый ТаблицаЗначений;
    Свойства.Колонки.Добавить("Свойство");
    Свойства.Колонки.Добавить("Значение");
    ЗаполнитьЗначенияСвойств(Свойства.Добавить(), Новый Структура("Свойство,Значение", СвойствоПриемник, ЗначениеИсточник));
    УправлениеСвойствами.ЗаписатьСвойстваУОбъекта(Ссылка, Свойства);
КонецЕсли;

Скопировать значение дополнительного реквизита в обычный

СвойствоИсточник = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоРеквизиту("Имя", "ПрименяемостьСвечи_49f1b95c86784e28a2d5eb0f32ede243");
СвойствоПриемник = "Применяемость";
Ссылка = Объект.Ссылка;

ЗначениеИсточник = УправлениеСвойствами.ЗначениеСвойства(Ссылка, СвойствоИсточник);
ЗначениеПриемник = Объект[СвойствоПриемник];

Если ЗначениеЗаполнено(ЗначениеИсточник) И Не ЗначениеЗаполнено(ЗначениеПриемник) Тогда
    Объект[СвойствоПриемник] = ЗначениеИсточник;
КонецЕсли;
/var/www/html/data/attic/1c/algoritmy_dlja_gruppovoj_obrabotki.1757141786.txt.gz · Последнее изменение: Павел Зайцев

Donate Powered by PHP Valid HTML5 Valid CSS Driven by DokuWiki