ОчиститьУстаревшиеВерсииОбъектов (БСП)

Автор: 1С
ОбщийМодуль.ВерсионированиеОбъектов
БСП

Очистить устаревшие версии объектов. Только для служебного использования.

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

///////////////////////////////////////////////////////////////////////////////////////////////////////
// Copyright (c) 2019, ООО 1С-Софт
// Все права защищены. Эта программа и сопроводительные материалы предоставляются 
// в соответствии с условиями лицензии Attribution 4.0 International (CC BY 4.0)
// Текст лицензии доступен по ссылке:
// https://creativecommons.org/licenses/by/4.0/legalcode
///////////////////////////////////////////////////////////////////////////////////////////////////////

Рекомендации

Похожие публикации

ИнформацияОбУстаревшихВерсияхВФоне (БСП)

УдалениеУстаревшихПараметровРаботыВерсийРасширенийОбработчикЗадания (БСП)

ОчиститьСертификатыШифрования (БСП)

ЗаписатьВерсиюОбъекта (БСП)

ИгнорироватьВерсиюОбъекта (БСП)

ПриПереходеНаВерсиюОбъекта (БСП)

ОткрытьОтчетПоВерсииОбъекта (БСП)

ЕстьПравоЧтенияИнформацииОВерсияхОбъектов (БСП)

ЕстьПравоЧтенияДанныхВерсийОбъектов (БСП)

TurboConf ИР адаптер 1.96