Очистка регистра Версии Объектов

07.03.18

База данных - Чистка данных

Очистка регистра Версии Объектов - пожалуй самого быстрорастущего регистра в базе (v. 1.1)

Обработки

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование По подписке [?] Купить один файл
Удаление версионирования
.epf 6,87Kb ver:1.1
348
348 Скачать (1 SM) Купить за 1 850 руб.

Если в вашей базе включен режим отслеживания истории изменения объектов, это очень помогает в поиске КТО, С ЧЕМ, КОГДА и ЧТО сделал в информационной базе. Однако этот режим заставляет регистр Версии Объектов, расти как на дрожжах. И в скором времени таблица этого регистра будет самой большой в базе.
Данная обработка позволяет очищать этот регистр.
Проблема в том, что если этот регистр весит уже гигабайт или больше, то очистка регистра займёт очень продолжительное время и может привести к ошибке памяти 1С. Для избежания этого, была добавлена возможность частичного удаления регистра. Для этого достаточно указать номер начальной и конечной версии, которые Вы хотите удалить.

версионирование история очистка

См. также

Инструментарий разработчика Чистка данных Свертка базы Инструменты администратора БД Системный администратор Программист Руководитель проекта Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 Россия Платные (руб)

Инструмент представляет собой обработку для проведения свёртки или обрезки баз данных. Работает на ЛЮБЫХ конфигурациях (УТ, БП, ERP, УНФ, КА и т.д.). Поддерживаются серверные и файловые базы, управляемые и обычные формы. Может выполнять свертку одновременно в несколько потоков. А так же автоматически, без непосредственного участия пользователя. Решение в Реестре отечественного ПО

8400 руб.

20.08.2024    20048    132    70    

134

Чистка данных Системный администратор Программист Платформа 1С v8.3 Управляемые формы 1C:Бухгалтерия 1С:Управление торговлей 10 1С:Управление торговлей 11 Платные (руб)

Данные обработки помогут Вам легко и, главное быстро, выполнить удаление любых данных в Ваших базах 1С на платформах 8.1-8.3. Обработки помогут легко просмотреть связи ссылок в виде дерева, выбрать что удалять, а что нет, используя любые отборы. Это позволит уменьшить объем лишней и не нужной информации в справочниках и документах, планах видов характеристик и др. объектах и облегчит работу с данными пользователям и Вам. Понятное расположение команд и настроек, в сочетании с описанием и справкой, еще упростят процесс. (Обновление от 29.06.2023, версия 4.2)

9600 руб.

22.02.2013    139657    267    144    

438

Чистка данных Системный администратор Программист Платформа 1С v8.3 Управляемые формы 1C:Бухгалтерия 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Розница 3.0 Платные (руб)

Позволяет удалить организации из любых из информационных баз 1С на управляемых формах (БП 3.0, УТ 11, КА 2, ERP 2, ЗУП 3.0, УНФ, Розница 2.0 и пр.). Главное требование - программа должна содержать справочник "Организации". Реализован самый быстрый алгоритм непосредственного удаления объектов. Работает даже на базах большого размера. Для ускорения работы алгоритма не запускается проверка контроля ссылочной целостности. Проверку учета можно запустить отдельно с помощью дополнительной обработки. Необходимо перед удалением самостоятельно проверить базу на наличие перекрестных ссылок разных организаций в одном документе. Эту дополнительную обработку проверки перекрестных ссылок по запросу предоставляем бесплатно нашим покупателям.

3582 руб.

16.03.2015    203651    219    82    

255

Чистка данных Программист Пользователь Платформа 1С v8.3 Управляемые формы 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Зарплата и кадры государственного учреждения 3 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Зарплата и Управление Персоналом 3.x Платные (руб)

Обработка позволяет удобно и выборочно удалить данные из базы 1С на управляемых формах например БП 3.0, УТ 11, КА 2, ERP, УНФ, ЗУП 3, Розница и др. Это могут быть как неиспользуемые элементы справочников, так и неактуальные организации. При этом есть возможность провести анализ пересечений документов с другими организациями и таким образом уберечься от того, что при удалении обороты по другой организации изменятся.

3350 руб.

28.11.2019    26705    65    18    

80

Оптовая торговля Логистика, склад и ТМЦ Чистка данных Программист Бухгалтер Пользователь Платформа 1С v8.3 Оперативный учет 1С:Управление торговлей 11 Россия Управленческий учет Платные (руб)

Если вы начали работать в программном продукте Управление Торговлей, редакция 11 или Комплексная Автоматизация редакция 2 и включили механизм учёта серий, то перейти обратно в учёт без серий будет не так-то просто. Сложность заключается в том, что нужно очистить серии в табличной части документа, например, Реализация Товаров и услуг. Предлагаем алгоритм перехода на учет без серий для программного продукта УТ11. (Очистка серий.)

2400 руб.

09.04.2019    29532    45    15    

47

Чистка данных Системный администратор Программист Бухгалтер Пользователь Управляемые формы 1C:Бухгалтерия Россия Платные (руб)

Решение по удалению дублей позволяет определить связанные элементы в двух синхронизированных базах в качестве оригиналов и избежать необходимости ручного сравнения объектов в базах перед синхронизацией.

3960 руб.

27.06.2018    19419    12    3    

17

Чистка данных Инструментарий разработчика Системный администратор Программист Платформа 1С v8.3 Абонемент ($m)

Очередная вариативная очистка кэша 1С с помощью Исполнителя 3.0.2.2.

1 стартмани

25.10.2023    5768    5    SerVer1C    27    

25

Чистка данных Программист Платформа 1С v8.3 Управляемые формы Платформа 1C v8.2 1C:Бухгалтерия 1С:ERP Управление предприятием 2 Бесплатно (free)

ВАЖНО!!! Очистку регистров накопления и регистров сведений рекомендуется делать пользователям со знанием дела и с осознанием последствий! Обработка поможет быстро очистить выбранный регистр. Делаю данную обработку в первую очередь для себя, т.к. были случаи, когда нужно было очищать регистры, а делать красиво и удобно времени не было.

06.02.2023    23231    1592    Neiron_1C    22    

17
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. petrov_al 10 30.08.12 22:11 Сейчас в теме
А почему бы не удалять самые старые по периоду...
2. pepe 64 31.08.12 13:44 Сейчас в теме
(1) Я с вами согласен. Я даже видел пример удаления, не помню у кого. Я на основании его создал регламентное задание.
Процедура УдалитьВерсии()
//Очистка регистра версионирования, по истечению срока хранения
	КоличествоДней = Константы.ХранениеВерсионированияДней.Получить();
	Если КоличествоДней > 0 Тогда
		ДатаПо = НачалоДня(ТекущаяДата()) - КоличествоДней *60*60*24; 
		ЗаписьЖурналаРегистрации("ОчистаВерсий", УровеньЖурналаРегистрации.Информация, , , "Очистка регистра сведений версии объекта, до: " + Формат(ДатаПо, "ДЛФ=DD"));

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

Процедура ОчиститьНаДату(ДатаОчистки)
	
	ЗапросОчистка = Новый Запрос;

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

  
Показать
3. worker1c 116 07.09.12 11:59 Сейчас в теме
Удаляя версии объектов, теряется история изменения объектов. Предлагаю более "мягкий" вариант оптимизации регистра "Версии объектов": Удалять записи в которых не содержится изменений относительно предыдущей записи. Обработка здесь: http://infostart.ru/public/150314/
Работает она конечно намного дольше вашей, но результат того стоит
4. serge_focus 4 23.08.13 23:44 Сейчас в теме
И чем кардинально отличается данная обработка, от представленных здесь в изобилии бесплатных обработок? ;)
5. serge_focus 4 23.08.13 23:56 Сейчас в теме
А еще с подобной задачей может справиться так называемый "чистильщик" регисторов -также на infostart.ru присутствует где-то.
Или стандартный механизм от 1С:
--------------------------------------------------------------------------------

Сервис - прочие обмены - универсальный обмен хмл - удаление данных
Bernstein_13; +1 Ответить
6. user1476964 09.04.21 18:22 Сейчас в теме
Это конечно интересно, но зачем?

&НаСервере
Процедура ОчиститьРегистрНаСервере()
	Записи = РегистрыСведений[Объект._Регистр].СоздатьНаборЗаписей(); // _Регистр - строковый реквизит формы, куда внесем "ВерсииОбъектов" (или любой другой)
	// или
	//Записи = РегистрыСведений.ВерсииОбъектов.СоздатьНаборЗаписей(); // Напрямую
	Записи.Записать();
КонецПроцедуры


&НаКлиенте
Процедура ОчиститьРегистр(Команда)
	ОчиститьРегистрНаСервере();
КонецПроцедуры
Показать


2 строки - вместо обработки. Типа, запишем "ничего" вместо всего. У меня КА на 50 пользаков - Версии объектов "удалялись" секунд пять
7. CaSH_2004 374 14.04.24 01:50 Сейчас в теме
(6)Можно и в одну строку уложиться:
РегистрыСведений.ВерсииОбъектов.СоздатьНаборЗаписей().Записать()
Оставьте свое сообщение