Поделитесь утилитой обработки базы

Дайнеко

Well-Known Member
19.11.2009
951
0
#1
Может кто делал утилитку, которая делает перебор объектов и полей всех справочников и документов?
Мне конкретно нужно пообрезать пробелы на концах символьных строк. Но может есть нечто подобное, например, поиск и замена объекта.
 

Zab

Well-Known Member
07.08.2006
583
0
#2
В составе конфы Конвертация данных есть обработка, которая выгружает структуру конфигурации в XML. Есть универсальный редактор реквизитов - позволяет выбрать объект и автоматом формирует форму на которой можно редактировать все реквизиты объекта. Также на ИТС есть загрузка данных из табличного документа. Любая из этих обработок подойдет в качестве примера обхода метаданных в восьмерке. Надо что-то слать, или сами найдете?
 

Дайнеко

Well-Known Member
19.11.2009
951
0
#3
Спасибо - пересмотрел. Сама процедура обхода метаданных проблемы не вызывает. Признаюсь - чуть поленился. Надеялся найти что-то простенькое в пять строк.

ИТС я не знаю. Из указанных тобой понравилась "ЗагрузкаДанныхИзТабличногоДокумента"
 

Дайнеко

Well-Known Member
19.11.2009
951
0
#4
Написал процедуру с обходом реквизитов объектов. Вот в одном месте получается некрасиво:
Код:
		Обработать("Справочники");
Обработать("Документы");
КонецПроцедуры

//----------------------------------------------------------
Процедура Обработать(П_ТипыОбъектов)
//	Перебор по виду (Справочников, документов)
Для Каждого ВидОбъекта Из Метаданные[П_ТипыОбъектов] Цикл
//	Перебор объектов
Если		П_ТипыОбъектов = "Справочники" Тогда
Выборка = Справочники[ВидОбъекта.Имя].Выбрать();
ИначеЕсли	П_ТипыОбъектов = "Документы" Тогда
Выборка = Документы[ВидОбъекта.Имя].Выбрать();
Иначе
Возврат;
КонецЕсли;

Пока Выборка.Следующий() Цикл
Как убрать Если? Не могу написать замену обращению к "СправочникиМенеджер" и "ДокументыМенеджер".
 

unknown181538

НеГуру
28.12.2008
1 417
0
#5
Ну, думаю, про вычислить() вы вспомнили. это, ИМХО, красивее, чем вычислить().