Запрос=Новый Запрос;

Текст="";

Для Каждого Документ Из Метаданные.Документы Цикл

	Текст=Текст+"ВЫБРАТЬ Ссылка ИЗ Документ."+Документ.Имя+" ОБЪЕДИНИТЬ ";

КонецЦикла;

Запрос.Текст=Лев(Текст,СтрДлина(Текст)-СтрДлина(" ОБЪЕДИНИТЬ "));

Выборка=Запрос.Выполнить().Выбрать();   

 ТекстЗапроса = "";

    Для каждого Вид Из Метаданные.Документы Цикл

        Если ТекстЗапроса<>"" Тогда

            ТекстЗапроса=ТекстЗапроса+"

            |ОБЪЕДИНИТЬ ВСЕ";

        КонецЕсли;         

         ТекстЗапроса = ТекстЗапроса+"

         |ВЫБРАТЬ Ссылка

         |ИЗ Документ."+Вид.Имя;

     КонецЦикла; 

     Запрос = Новый Запрос(ТекстЗапроса);

     Выборка = Запрос.Выполнить().Выбрать();

     Пока Выборка.Следующий() Цикл

         Сообщить(Выборка.Ссылка);

     КонецЦикла;