Пример кода:

Для каждого Справочник из Метаданные.Справочники Цикл
    ИмяСправочника = Справочник.Имя;
    МенеджерСправочника = Справочники[ИмяСправочника];
    ВыборкаСправочника = МенеджерСправочника.Выбрать();
    Если ВыборкаСправочника.Следующий() Тогда
        Текст = "ru = ""В информационной базе есть заполненные справочники!"""
           + "; en = ""There are filled catalogs in the infobas!""";
        Предупреждение(НСтр(Текст));
        Возврат;
    КонецЕсли;
КонецЦикла;