Очистить устаревшие версии объектов. Только для служебного использования.
// Только для служебного использования.
Процедура ОчиститьУстаревшиеВерсииОбъектов(Параметры = Неопределено, АдресРезультата = Неопределено) Экспорт
ОбщегоНазначения.ПриНачалеВыполненияРегламентногоЗадания(Метаданные.РегламентныеЗадания.ОчисткаУстаревшихВерсийОбъектов);
УстановитьПривилегированныйРежим(Истина);
ТекстЗапроса =
"ВЫБРАТЬ
| ВерсииОбъектов.Объект,
| ВерсииОбъектов.НомерВерсии
|ИЗ
| РегистрСведений.ВерсииОбъектов КАК ВерсииОбъектов
|ГДЕ
| ВерсииОбъектов.ЕстьДанныеВерсии
| И &ДополнительныеУсловия";
Запрос = ЗапросПоУстаревшимВерсиям(ТекстЗапроса);
Выборка = Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
МенеджерЗаписи = РегистрыСведений.ВерсииОбъектов.СоздатьМенеджерЗаписи();
МенеджерЗаписи.Объект = Выборка.Объект;
МенеджерЗаписи.НомерВерсии = Выборка.НомерВерсии;
МенеджерЗаписи.Прочитать();
МенеджерЗаписи.ВерсияОбъекта = Неопределено;
МенеджерЗаписи.Записать();
КонецЦикла;
КонецПроцедуры
///////////////////////////////////////////////////////////////////////////////////////////////////////
// Copyright (c) 2019, ООО 1С-Софт
// Все права защищены. Эта программа и сопроводительные материалы предоставляются
// в соответствии с условиями лицензии Attribution 4.0 International (CC BY 4.0)
// Текст лицензии доступен по ссылке:
// https://creativecommons.org/licenses/by/4.0/legalcode
///////////////////////////////////////////////////////////////////////////////////////////////////////
ИнформацияОбУстаревшихВерсияхВФоне (БСП)
УдалениеУстаревшихПараметровРаботыВерсийРасширенийОбработчикЗадания (БСП)
ОчиститьСертификатыШифрования (БСП)
ИгнорироватьВерсиюОбъекта (БСП)
ПриПереходеНаВерсиюОбъекта (БСП)
ОткрытьОтчетПоВерсииОбъекта (БСП)