Маркетплейс

Удаление организаций из информационных баз 1С

Обработка предназначена для удаления организаций из любых информационных баз 1С, имеющих в своем составе справочник "Организации". Работает на обычных и управляемых формах, на базах любого формата и размера. Обработка проверялась на следующих типовых релизах 1С: БП 2.0.66.84, БП 3.0.71.77, БГУ 1.0.59.3, БГУ 2.0.65.17, УТ 10.3.55.3, УТ 11.4.10.57, ЗУП 3.1.11.106, ЗГУ 3.1.11.106, КА 2.4.9.98, УПП 1.3.126.1, УНФ 1.6.18.168, но должна работать и на более старых, так как обработке нужен только справочник "Организации".

Арт.: 1155114

Продано: 67

Удаление организаций из информационных баз 1С 1 мес. 1 мес. 3.4

3600 руб.

Удаление организаций из информационных баз 1С: Техподдержка (1 месяц) 1 мес.

1000 руб.

Итого:

Добавить в корзину

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

Традиционный способ – пометка на удаление организаций и всех связанных с ними данных с последующим удалением помеченных объектов – является трудоёмким, затратным по времени и ресурсам, а, значит, не эффективным.

Предлагаемая обработка по удалению организаций является простой в использовании и очень быстрой, так как удаляет связанные данные непосредственно, без контроля ссылочной целостности. Единственным условием работоспособности обработки является наличие в информационной базе справочника «Организации». Обработка работает как на обычных, так и на управляемых формах.

Так выглядит обработка на управляемых формах:

Управляемая форма

Так выглядит обработка на обычных формах:

Обычная форма

Перед удалением организаций полезно убедиться, что связанные с организациями данные используются правильно. Под правильностью использования понимается следующее: если в каком-нибудь объекте используется некая организация, то связанные с ней данные не должны принадлежать другим организациям. Например, если в документе начисления зарплаты указана одна организация, а подразделение – другой организации, то такое использование связанных данных считается неправильным.

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

Для проверки правильности использования связанных данных служит специальная кнопка. При её нажатии обработка проверяет правильность использования связанной информации по выбранным организациям. Если будут обнаружены объекты, в которых связанные данные используются неправильно, они будут выведены в специальную таблицу в правой части обработки. Колонка «Ссылка на объект» будет содержать ссылку на объект с неправильными данными, колонка «Имя владельца» будет содержать имя реквизита объекта, который является «владельцем» связанной информации. Как правило, этот реквизит называется «Организация», но могут быть и другие имена. Колонка «Значение владельца» будет содержать ссылку на значение реквизита-владельца. Колонка «Имя подчиненного» будет содержать имя реквизита объекта, который «подчинён» реквизиту-владельцу, а колонка «Значение подчиненного» будет содержать ссылку на значение подчинённого реквизита. У этого реквизита, как правило, другой владелец.

Сами организации удаляются по кнопке «Удалить отмеченные организации». Так как операция удаления является необратимой, настоятельно рекомендуется перед удалением сделать архивную копию информационной базы. Удаление происходит в монопольном режиме, поэтому с базой не должны работать другие пользователи. Так же в базе не должно быть запущенных фоновых заданий.

Если обработка смогла перейти в монопольный режим, начинается процесс удаления. В этот момент обработка не реагирует на действия пользователя. Это сделано сознательно, чтобы ничего не могло помешать удалению. Данные из базы удаляются непосредственно, без проверки ссылочной целостности. Процесс удаления может длиться от нескольких минут до нескольких часов и даже суток. Всё зависит от объёма удаляемой информации и производительности техники. Прерывать работу обработки путём аварийного завершения программы нельзя, так как данные будут удалены частично, а база будет непригодна для дальнейшего использования.

После того, как обработка завершит свою работу, необходимо обязательно запустить процесс тестирования и исправления информационной базы через меню «Администрирование» в режиме конфигуратора. Параметры тестирования и исправления показаны на следующем рисунке:

Тестирование и исправление информационной базы

Код обработки открыт всем желающим. Буду признателен за отзывы, замечания и предложения.

История изменений:

24.12.2020. Доработан алгоритм поиска неправильно используемых данных.

10.01.2020. Исправлена ошибка, возникавшая при обработке табличных частей объектов с количеством строк более 1000.

Статистика:
Просмотры	27005
Загрузки	67
Рейтинг	72
Создание	20.11.19 11:30
Обновление	24.12.20 06:35
№ Публикации	1155114
Характеристики:
Теги	Обработка удаление организации
Рубрики	Чистка данных
Кому	Системный администратор , Программист
Тип файла	Внешняя обработка (ert,epf)
Платформа	Платформа 1С v8.3 , Управляемые формы
Конфигурация	Конфигурации 1cv8
Операционная система	Не имеет значения
Страна	Россия
Отрасль	Не имеет значения
Налоги	Не имеет значения
Вид учета	Не имеет значения
Доступ к файлу	Платные (руб)
Код открыт	Да

1. Alien_RS_Forever 10.12.19 17:16 Сейчас в теме

Даа, "хорошо" что есть подобные разработки. Благодаря им у нас есть работа. Клиентов конечно жалко..

3. Техподдержка 11.12.19 03:57

(1) Поконкретнее, пожалуйста. Что Вас не устраивает?

11. alex_4x 16.06.20 12:05 Сейчас в теме

Мои пять копеек. Эту обработку эту не использовал, ничего плохого или хорошего сказать не могу.
Нужно было "срочно" удалять организации из разных очень больших баз.
Вопрос был решен достаточно просто. Обработка получилась в стиле "сделано на коленке" и распространять её опасно на мой взгляд, но если интерес будет - обращайтесь.
Принцип работы такой: Автоматом проверяются все документы и справочники, имеющие в шапке реквизит Организация, формируются запросы по выборке объектов к удалению, эти объекты удаляются без контроля ссылочной целостности. Это нехорошо конечно, но быстро. Далее такие справочники как физлица, сотрудники, контрагенты - проверяются на наличие ссылок на них в базе (так как реализации, поступления, договора контрагентов с организацией и т.д. - уже удалены) и если ссылок нет или ссылки только в регистрах "соответсвия объектов для обмена" и "версии объектов" - то они тоже удаляются. Примерно так же проверятся номенклатура, но там и документы "установки цен номенклатуры" не считаются важными, если движений номенклатуры по остающимся в базе организациям нет - то номенклатуру удаляем. Всё это делать можно не монопольно, так как используется штатный механизм Объект.Удалить()

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

Показать

Функция УдалитьЭлементыСправочникаБезСсылокВДокументах(СтрТипСправочника)
	Запрос = Новый Запрос();
	Найден = Ложь;
	
	Для Каждого Справочник Из Метаданные.Справочники Цикл
		Если Справочник.Имя = СтрТипСправочника Тогда
			Если Справочник.Иерархический И Справочник.ВидИерархии = Метаданные.СвойстваОбъектов.ВидИерархии.ИерархияГруппИЭлементов Тогда
				Запрос.Текст = "ВЫБРАТЬ
	               |	Спр.Ссылка
	               |ИЗ
	               |	Справочник."+СтрТипСправочника+" КАК Спр
	               |ГДЕ
	               |	Спр.ЭтоГруппа = ЛОЖЬ";
			Иначе
				Запрос.Текст = "ВЫБРАТЬ
	               |	Спр.Ссылка
	               |ИЗ
	               |	Справочник."+СтрТипСправочника+" КАК Спр";
			КонецЕсли;
			Найден = Истина;
		КонецЕсли;
	КонецЦикла;
	
	Если НЕ Найден Тогда
		Сообщить("Справочник "+СтрТипСправочника+" не найден");
		Возврат Ложь;
	КонецЕсли;
	
	ТЗ = Запрос.Выполнить().Выгрузить();
	Ссылки = Новый Массив(1);
	ВсегоОбъектов = ТЗ.Количество();
	ТекущийОбъект = 0;
	ПоследнееДействие = "";
	Для Каждого СтрТЗ из ТЗ Цикл
		ОбработкаПрерыванияПользователя();
		ТекущийОбъект = ТекущийОбъект+1;
		Проц = Окр(ТекущийОбъект/ВсегоОбъектов*100,2);
		Состояние("Обрабатывается "+СтрТипСправочника+" "+Проц+"%	"+ПоследнееДействие);
		Ссылки[0] = СтрТЗ.Ссылка;
		ТабСсылок = НайтиПоСсылкам(Ссылки);
		НеУдалять = Ложь;
		Для Каждого Ссылка из ТабСсылок Цикл
			Если Документы.ТипВсеСсылки().СодержитТип(ТипЗнч(Ссылка[1])) Тогда
				Если СокрЛП(ТипЗнч(Ссылка[1])) = "Установка цен номенклатуры" ИЛИ
					 СокрЛП(ТипЗнч(Ссылка[1])) = "Условия поставок по договорам контрагентов" Тогда
					//Сообщить("НЕНУЖНЫЙ ДОКУМЕНТ 	"+ТипЗнч(Ссылка[1])+" // "+Ссылка[1]);
				Иначе
					НеУдалять = Истина;
					//Сообщить("ВАЖНЫЙ ДОКУМЕНТ   	"+ТипЗнч(Ссылка[1])+" // "+Ссылка[1]);
					Прервать;
				КонецЕсли;
			Иначе
				//Сообщить("НЕ ДОК!                  "+ТипЗнч(Ссылка[1])+" // "+Ссылка[1]);
			КонецЕсли;
		КонецЦикла;
		Если НеУдалять Тогда
			// Оставляем
			ПоследнееДействие = "Оставляем "+СтрТЗ.Ссылка;
		Иначе
			// Удаляем
			//Сообщить("Удаляем "+СтрТЗ.Ссылка);
			ОбъектСправочника = СтрТЗ.Ссылка.ПолучитьОбъект();
			ПоследнееДействие = "Удаляем "+СтрТЗ.Ссылка;
			Попытка
				ОбъектСправочника.Удалить();
			Исключение
				Сообщить("Не удалось удалить "+СтрТипСправочника+" "+ОбъектСправочника);
				ОбработкаПрерыванияПользователя();
			КонецПопытки;			
		КонецЕсли;
	КонецЦикла;
	Сообщить("ЗАКОНЧИЛИ Удаление "+СтрТипСправочника);
	Возврат Истина;
КонецФункции

Показать

2. nomad_irk 10.12.19 17:32 Сейчас в теме

(0)в чем выйгрыш по сравнению с типовым корректным удалением?

Потратить время на удаление данных из базы и потом еще на ТиИ, которое доудалит данные и для своего выполнения может потребовать времени, гораздо больше, чем процесс удаления данных? А оно реально надо за 3000р. весь этот геморрой?

4. Техподдержка 11.12.19 04:05

(2) Вы когда-нибудь удаляли организацию из базы? А две? А несколько, когда собственники расходятся и делят конторы? И не просто нажать "удаление помеченных объектов", а сначала пометить удаляемые данные на удаление, а потом ещё почистить их, чтобы следа не осталось. Вот это геморрой не на один день и не за 3000 р. Или может Вас цена смущает?

5. nomad_irk 11.12.19 06:13 Сейчас в теме

(4) https://infostart.ru/public/1125435/ - вот здесь ответ на ваш вопрос про удаление данных по организациям из баз.

По поводу конкретно вашего способа очистки БД от данных по организации(-ям) могу дать идею как ускорить процесс удаления: просто удалите выбранные организации, остальное удалится при ТиИ.

6. Техподдержка 11.12.19 06:41

(5) Согласен, опыт есть. Особенно впечатлило:

После примерно месяца мытарств с типовым удалением, которое так и не выполнилось до конца, мне пришлось создать данную обработку.

Ваша обработка реашет ту же задачу, что и моя, но работает ли она на файловых базах? И каков будет результат, если имеется неправильное использование данных?

Ну, а по поводу Вашего совета, боюсь он не сильно поможет. ТиИ во многих случаях очистит в объектах ссылки на удалённую организацию, вместо того, чтобы их удалить. Кстати, в моём случае ТиИ как раз очищает ссылки, например, в справочнике "Контрагенты" на договоры по умолчанию.

7. nomad_irk 11.12.19 07:22 Сейчас в теме

(6)моя обработка решает задачу многократно быстрее, чем типовой механизм и ваш - в этом вся ее прелесть.

В файловой базе она сгененирует скрипт, но нужен "эмулятор" СУБД, который сможет выполнить скрипт и применить это к файлу БД.

Я предусмотрел вариант очистки договоров по-умолчанию, но потестить особо не где, поэтому не знаю на сколько корректно работает.

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

8. Техподдержка 11.12.19 07:55

(7) Значит дело, всё-таки в деньгах.

Хорошо, отвечу на Ваш вопрос так: моя обработка - очередной велосипед, только другой модели. Обработка функционирует в рамках лицензионных ограничений 1С и не требует "эмуляторов" СУБД.

Обработка корректно справляется с договорами по умолчанию и с более изощрёнными зависимостями (проверял на специально созданной для этого конфигурации).

Возможно, обработка не стоит таких денег, но за решение задач разделения баз по организациям заказчики платят гораздо больше. В любом случае, спасибо Вам за комментарии.

9. suhoi 29.05.20 07:29 Сейчас в теме

Заинтересовала обработка. Есть вопрос - а как получать новые версии - Только покупкой техподдержки?

10. Техподдержка 29.05.20 07:56

(9) Здравствуйте! Новые версии пока не планируются. Покупка техподдержки обязывает отвечать на вопросы покупателя. Ошибки обработки устраняются бесплатно.

12. user1502168 09.12.20 12:52 Сейчас в теме

Добрый день, при проверки вылезают счета фактуры с "значением подчиненного"- договора, и ни одно поле ни в документе СЧ\ф ни в договоре не имеет отношение к искомой организации.
Единственный момент который имеет место быть незаполненное поле в сч\ф "ДокументОснование".

13. Техподдержка 10.12.20 04:19

Здравствуйте! Назовите, пожалуйста, конфигурацию и номер её релиза.

14. user1502168 10.12.20 09:39 Сейчас в теме

(13)1С:Предприятие 8.3 (8.3.16.1224)
Бухгалтерия предприятия КОРП, редакция 3.0 (3.0.84.31)

15. Техподдержка 10.12.20 10:44

(14) Обработка проверяет не только "ближайшие" ссылки (в с/ф указана одна организация, а в договоре - другая), но и цепочки ссылок. Возможно, недопустимая связь между с/ф и договором, которая может привести к ошибочному удалению либо с/ф, либо договора, лежит где-то в глубине цепочки. К сожалению, не видя самой базы, я не могу сказать - стоит обращать внимание на данную связь или нет.

До Вашего случая, алгоритм проверки связей не давал сбоев, хотя допускаю, что он может содержать ошибки. Попробуйте проследить цепочки ссылок на с/ф и договор, используя, например, операцию "Поиск ссылок на объекты" (Функции для технического специалиста / Стандартные / Поиск ссылок на объекты).

16. user1502168 10.12.20 10:59 Сейчас в теме

(15)

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

На сколько длинная может быть цепочка?
В описании сказано: "обработка проверяет правильность использования связанной информации по выбранным организациям." точно ли по выбранным? В данном случае такое ощущение, что по всем возможным некорректным связям организаций.

17. Техподдержка 10.12.20 11:04

(16) Что-то я засомневался. Скажите, какая версия обработки у Вас?

18. user1502168 10.12.20 12:20 Сейчас в теме

(17) недавно скаченная 3,2

19. Техподдержка 10.12.20 12:29

Номер заказа сообщите, пожалуйста.

20. user1502168 10.12.20 12:37 Сейчас в теме

(19)Заказ 240892

21. Техподдержка 10.12.20 12:43

(20) Написал в личку.

22. user945368 21.12.20 20:44 Сейчас в теме

Добрый день!
С КОРП работает? Бухгалтерия предприятия КОРП, редакция 3.0 (3.0.78.54)

23. Техподдержка 22.12.20 04:12

(22) Работает с любой базой, где есть справочник "Организации".

24. irreal 11.04.22 11:20 Сейчас в теме

Решал подобную задачу на сверхгигантской УПП путем генерации скриптов SQL, поскольку даже удаление из 1С неприемлемо по времени. Сейчас есть такая задача для Документооборот, хочу попробовать Вашу обработку, поскольку ублюдочная архитектура с определяемыми типами и дескрипторами доступа вгоняет в уныние на повторение подвига.

25. irreal 13.04.22 11:44 Сейчас в теме

Увы, на Документооборот 8 КОРП, редакция 2.1 50ГБ незачет. Двое суток висяка неприемлемо. Без SQL не обойтись. И срать на лицензионное соглашение. В военное время дрянь - должна умереть.

Ответить

26. user947332 18.09.22 00:38 Сейчас в теме

Подтверждаю, на 1С:Комплексная автоматизация 2 (2.4.14.164) около 40ГБ удаление небольшой организации за 3 года также висяк на двое суток. Результата просто не дождался, так как обработка не подает признаки жизни в процессе, как выше и описал автор. При этом обработка блокирует на эти двое суток базу в монопольном режиме, то есть работа будет остановлена, если нужно почистить рабочую базу (обратите на это отдельное внимание при покупке).

27. user1898431 23.01.23 10:54 Сейчас в теме

А как узнать, работает ли программа или зависла, или сколько времени нужно для удаления? Такое ощущение, что бесконечно крутится загрузка и все, когда удаление идет. Причем поставил на удаление организацию, у которой вручную предварительно удалял все документы, кассу, банки, сотрудников, отчеты и т.д, т.е. практически все

Прикрепленные файлы:

28. Техподдержка 23.01.23 11:31

(27) Как вручную удаляли? Пометили на удаление и потом выполнили удаление помеченных объектов или только пометили на удаление?

К сожалению, узнать сколько времени понадобиться на удаление нельзя. Процесс удаления может занять от нескольких минут до нескольких часов и даже дней. Если бы обработка информировала пользователя о ходе процесса удаления, то сама процедура удаления заняла бы ещё большее время. Наберитесь терпения, программа не зависла, а работает.

29. user1898431 23.01.23 11:34 Сейчас в теме

(28) Сначала выводил документы по данной организации, отменял через групповую обработку проведение, ставил отметку на удаление, потом через операции удалял. Таким образом удалил все, что относится к данной организации, что-то возможно осталось неудаленное. Ну вот он уже полтора часа удаляет эту организацию, пока непонятно. А тогда сколько с нуля будет удалять еще одну организацию

30. user932790 13.10.23 12:00 Сейчас в теме

ДОбрый день. Корректно ли удаляется данная обработка? Не поедет ли ОСВ после удаления?

31. Техподдержка 13.10.23 12:18

(30) Здравствуйте! Обработка корректно удаляет корректные данные. Если в информационной базе есть некорректные данные, то ОСВ может поехать. Приведу пример. Пользователи очень любят копировать документы. Бывает, они копируют документ одной организации, меняют в нём только организацию, ну, может быть сумму, а контрагент и договор остаются без изменения. Налицо - перекос в данных. В документе одна организация, а договор - от другой. Если будет удаляться другая организация, то договор с ней тоже удалится, а вместе с ним и этот документ со всеми вытекающими из этого последствиями.

Для проверки корректности удаляемых данных в обработке имеются средства для проверки и устранения подобных перекосов.

32. user932790 13.10.23 13:03 Сейчас в теме

(31)
Какие обработки есть для проверки?

33. Техподдержка 13.10.23 17:58

(32) Обработка по удалению организаций имеет встроенные средства контроля корректности удаляемых данных.

34. user932790 16.10.23 09:17 Сейчас в теме

а что включается в себя техподержка на 1 месяц? Пользовались ли этой обработкой на новой версии платформы?

35. Техподдержка 16.10.23 10:48

(34) Здравствуйте! В течение 1 месяца после приобретения обработки будем отвечать на вопросы, возникающие в процессе её использования. Автор не пользовался этой обработкой на новой версии платформы.