Skip to content

РегламентОчисткиСлужебныхДанных #17

Description

@Lepeha06

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

РезультатЗапроса = Запрос.Выполнить();

ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();

Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
	ОбъектВыгружаемый = ВыборкаДетальныеЗаписи.Ссылка.ПолучитьОбъект();
	ОбъектВыгружаемый.Удалить();
КонецЦикла;

Metadata

Metadata

Assignees

No one assigned

    Labels

    No labels
    No labels

    Type

    No type

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions