Как в справочнике оставить только задействованые в документах элементы

a123456

19.05.2009 - 20:41

Есть справочник.
Есть ТабЗнач злементов спр. которые надо оставить в спр..

Как сделать копактно, красиво ?

а то код цикл в цикле получается слишком длинный.

К списку тем

К списку форумов

Интересные темы

odines.ru

01.05.2024 - 08:44

Смотри также:
09 счет и убытки прошлого периода
Как устанавливать параметр Замещение при редактировании записи в регистре сведений через его форму записи
Подскжите по регистру сведений!!!

Re: Как в справочнике оставить только задействованые в документах элементы

1 - 20.05.2009 - 03:29

Все пометить на удаление. Все удалить с контролем ссылок. Все очистить от пометок удаления.

Re: Как в справочнике оставить только задействованые в документах элементы

Reaper

2 - 20.05.2009 - 03:34

0-a123456 > код у него получается... С ИТС обработку возьми, умник

Re: Как в справочнике оставить только задействованые в документах элементы

который не честный

3 - 20.05.2009 - 08:02

1 +1
А на счёт кода... "Тебе индегриенты нужны или результат?" Ночной дозор.

Re: Как в справочнике оставить только задействованые в документах элементы

a123456

4 - 20.05.2009 - 09:27

1 так и получается,
2 как обработка называется называется поищу.
3.резльтат. Справочник отчистить от ненужного.

Re: Как в справочнике оставить только задействованые в документах элементы

a123456

5 - 20.05.2009 - 10:01

что то такое с добавлением условия только для 8мерки
------------------------
Процедура Сформировать()
ТипСпр= ВидСпр.ПолучитьЗначение(ВидСпр.ТекущаяСтрока());
      Спр = СоздатьОбъект("Справочник."+СокрЛП(ТипСпр));
  СЗ=СоздатьОбъект("СписокЗначений");
Спр.ВыбратьЭлементы();
Пока Спр.ПолучитьЭлемент()=1 Цикл
Если Спр.ЭтоГруппа()=1 Тогда
Продолжить;
КонецЕсли;
СЗ.ДобавитьЗначение(Спр.ТекущийЭлемент());
КонецЦикла;
Сообщить("Будут проверяться "+СЗ.РазмерСписка()+" элементов");
УдалитьОбъекты(СЗ,1,ССЫЛ);
КонецПроцедуры
//*******************************************
Процедура ПриОткрытии()
ВидСпр.УдалитьВсе();
Для i=1 по Метаданные.Справочник() Цикл
  ВидСпр.ДобавитьЗначение(Метаданные.Справочник(i).Идентификатор,Метаданные.Справочник(i).Синоним);
КонецЦикла;
ВидСпр.Сортировать();
КонецПроцедуры

Интересные темы

odines.ru

01.05.2024 - 08:44

Смотри также:
Конфликт блокировок при выполнении транзакции, помогите, плз
Работа в 1С через терминальный доступ в Краснодаре !!!
История выпуска релизов 1С

Re: Как в справочнике оставить только задействованые в документах элементы

Reaper

6 - 20.05.2009 - 11:02

Пометка на удаление неиспользуемых объектов - как то так.

Re: Как в справочнике оставить только задействованые в документах элементы

a123456

7 - 20.05.2009 - 11:42

6.Элементы справочника которые не используются в документах
пометить на удаление.(Есть такая функция в 8.0 ПометитьНаУдаление)

Re: Как в справочнике оставить только задействованые в документах элементы

a123456

8 - 20.05.2009 - 11:53

Можно вопрос упростить.
Есть ТЗ заполненая значениями "1,2,3,4,5,6"
Есть ТЗ1 заполненая "1,3,4"
нужна таблица
ТЗ_результат "2,5,6"

Re: Как в справочнике оставить только задействованые в документах элементы

roma n

9 - 20.05.2009 - 12:04

Давно уже все сделал бы... Зачем тебе этот велосипед собственного изобретения?
1) Универсальный подбор и обработка объектов - установка пометки на удаление на все непредопределенные элементы справочника
2) Или универсальной Удаление помеченных объектов, или Операции-Удаление помеченных объектов
3) той же Универсальный подбор и обработка объектов - снятие пометки на удаление со всех непредопределенных элементов справочника
====
ЗЫ но если так уж хочется квадратные колеса - метод НайтиПоСсылкам()