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