Блокировка данных непериодического независимого регистра сведений

Форум Учет и отчетность Производственный учет (MRP)

1С:Управление производственным предприятием Платформа 1С v8.3

1. Anesk 17 11.08.16 09:03 Сейчас в теме

Есть процедура записи данных в непериодический независимый регистр сведений, в котором свойство Блокировки данных установлено в свойство "Управляемый".

Эта процедура делает записи в регистре сведений:

                НаборЗаписей = РегистрыСведений.НачислениеНаТабло.СоздатьНаборЗаписей();
		
	НаборЗаписей.Прочитать();	
		
		ТекущаяДата = ТекущаяДата();
		Пока Выборка.Следующий() Цикл
			Запись = НаборЗаписей.Добавить();
			Запись.ДатаВремя = ТекущаяДата;
			Запись.ДатаГотовности = Выборка.ДатаГотовности; //измерение
			Запись.НомерВКассете = Выборка.НомерВКассете; //измерение 
			Запись.НомерКассеты = Выборка.НомерКассеты; //измерение
			Запись.ПорядокВывода = Счетчик;
			Счетчик = Счетчик + 1;			
		КонецЦикла;

НаборЗаписей.Записать();

Показать

Другая процедура удаляет какую-то одну запись из этого регистра. Нужно установить блокировку данных, чтобы с момента "НаборЗаписей.Прочитать();" установилась блокировка данных и процедура, удаляющая запись, подождала бы пока не будет выполнено "НаборЗаписей.Записать()"

УПП 1.3

По теме из базы знаний

Ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. пользователь 11.08.16 13:47

Сообщение было скрыто модератором.

...

3. spe1c 6 06.09.16 11:31 Сейчас в теме

Используйте объект "БлокировкаДанных"
Примеры:


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

Показать

4. sokol_6630 3 27.06.23 10:09 Сейчас в теме

Спасибо. Воспользовался вашим кодом блокировки регистра сведений

Оставьте свое сообщение

E-mail: