Версия для печати темы (https://pro1c.org.ua/index.php?s=111b27c0fcbc32c03a96f6ccfdaa5f88&showtopic=8194)

Нажмите сюда для просмотра этой темы в обычном формате

Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 _ Программирование в 1С Предприятие 7.7 _ Перебор всех справочников

Автор: l2d808 18.07.12, 7:45

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

справочник="ТАКОЙТО";
Спр=создатьобъект("Справочник."+справочник);
спр.ВыбратьЭлементы();    
Пока спр.получитьэлемент()=1  Цикл
    если спр.ЭтоГруппа()=0 тогда
         //какие-то действия с справочником
        конецесли;
КонецЦикла;

Справочник Такой-то доллжен быть в цикле и перебрать все справочники конфигурации...
Помогите пожалуйста... Столкнулся с задачей, решение которой, как мне кажется простое. Ноя его к сожелению не вижу.
Заранее благодарю.

Почему тема в пользовательском разделе была?!

Автор: MATEVI 18.07.12, 8:05

Для Инд=1 По Метаданные.Справочник() Цикл
        
    Значение = Метаданные.Справочник(Инд).Идентификатор;
    Представление = Метаданные.Справочник(Инд).Представление();   
    Спр = СоздатьОбъект("Справочник."+Значение);
        
КонецЦикла;

Автор: l2d808 18.07.12, 8:50

Цитата(MATEVI @ 18.07.12, 9:05)

Для Инд=1 По Метаданные.Справочник() Цикл
        
    Значение = Метаданные.Справочник(Инд).Идентификатор;
    Представление = Метаданные.Справочник(Инд).Представление();   
    Спр = СоздатьОбъект("Справочник."+Значение);
        
КонецЦикла;

Спасибо большое

Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7
https://pro1c.org.ua