Процедура КнопкаВыполнитьНажатие(Кнопка)
//// Вставить содержимое обработчика.
Для каждого Справочник из Метаданные.Справочники Цикл // Метаданные.Справочники
ИмяСправочника = Справочник.Объект;
МенеджерСправочника = Справочники[ИмяСправочника];
Табуляция = Символы.Таб;
Сч = 0;
ВыборкаСправочника = МенеджерСправочника.Выбрать();
Пока ВыборкаСправочника.Следующий() Цикл
Попытка
ОбъектСправочник = ВыборкаСправочника.ПолучитьОбъект();
ОбъектСправочник.Узел = Справочники.ИнформационныеБазы.ГоловнойУзел; // здесь можно любой реквизит замест "Узел" вписать и его заполнять нужными значениями
ОбъектСправочник.Записать();
Сообщить("Успешно проставлен 'Головной узел' для справочника" + Табуляция + ВыборкаСправочника);
Исключение
Сообщить("Узел справочника" + Табуляция + ВыборкаСправочника + "не удалось изменить");
КонецПопытки;
Сч = Сч + 1;
Состояние("Элементов обработано " + Сч + " Сейчас обрабатывается справочник " + ИмяСправочника + ": " + ВыборкаСправочника.Наименование);
ОбработкаПрерыванияПользователя();
КонецЦикла;
КонецЦикла;
КонецПроцедуры
Обработка для группового редактирования любых справочников с общими реквизитами
21.01.14
Задачи пользователя - Корректировка данных
Скромный пример кода для группового редактирования любых справочников, имеющих общие реквизиты при помощи работы с метаданными. Ее можно с легкостью адаптировать под свои нужды, в том числе и для создания аналогичной обработки для работы с документами.
Скачать файл
ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.
| Наименование | По подписке [?] | Купить один файл | |
|---|---|---|---|
|
Обработка "Поменять общий реквизит в любых справочниках"
.epf 6,35Kb
5
|
