Некоторые картинки не загружаются из РФ и РК, используйте VPN.

пятница, 30 января 2026 г.

1С Удалить записи регистра по отбору

2026 год, УТ 11.5.22.137, помеченный на удаление документ "Передача товаров между организациями" имеет движения в регистре "Резервы товаров организаций". Очистка ТЧ Товары, добавление левого товара и проведение создают набор записей, согласно списку товаров. Отмена проведения возвращает старые записи, хотя в ТЧ товары их нет. При этом отключение контроля остатков (галка и кнопка на время сеанса) никак не влияет. Разбираться было лень, накидал обработку и удалил записи вручную.



На коленке, за сообщить на сервере не бить, работает, меня устраивает


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

&НаКлиенте
Процедура УдалитьЗаписи(Команда)
	УдалитьЗаписиНаСервере();
КонецПроцедуры

Комментариев нет:

Отправить комментарий