Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Процедура ОбработатьПорциюЗаполненияШаблонаДанныеБизнесПроцессов(мБизнесПроцессы) Экспорт
- ЗаписьЖурналаРегистрации("ОбработатьПорциюЗаполненияШаблонаДанныеБизнесПроцессов"
- ,УровеньЖурналаРегистрации.Предупреждение
- ,,,"Обрабатывается порция из " + Формат(мБизнесПроцессы.Количество(), "ЧГ=0") + " записей.");
- Для Каждого КлючЗнч Из мБизнесПроцессы Цикл
- МенеджерЗаписи = РегистрыСведений.ДанныеБизнесПроцессов.СоздатьМенеджерЗаписи();
- МенеджерЗаписи.БизнесПроцесс = КлючЗнч.БизнесПроцесс;
- МенеджерЗаписи.Завершен = КлючЗнч.Завершен;
- МенеджерЗаписи.Прочитать();
- МенеджерЗаписи.УК_Шаблон = КлючЗнч.Шаблон;
- Попытка
- //НачатьТранзакцию();
- //Блокировка = Новый БлокировкаДанных;
- //ЭлементБлокировки = Блокировка.Добавить("РегистрСведений.ДанныеБизнесПроцессов");
- //ЭлементБлокировки.УстановитьЗначение("БизнесПроцесс", КлючЗнч.БизнесПроцесс);
- //ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
- //Блокировка.Заблокировать();
- МенеджерЗаписи.Записать();
- //ЗафиксироватьТранзакцию();
- Исключение
- //ОтменитьТранзакцию();
- КонецПопытки;
- КонецЦикла;
- КонецПроцедуры
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement