посмотреть отборы, сделать такой же запрос.
нельзя перебрать элементы в списке, потому что там в один момент времени не все элементы, а только те, что показаны на экране +- то ли 10, то ли 20%
ОтборСтрок = ФормаВыбора.ДокументСписок.Отбор;
ПостроительОтчета = Новый ПостроительОтчета;
ПостроительОтчета.Текст = "ВЫБРАТЬ РАЗРЕШЕННЫЕ * ИЗ Документ." + ВыбранныйЭлемент.Значение + " КАК Таблица";
ПостроительОтчета.ЗаполнитьНастройки();
Для Каждого ЭлементОтбора Из ОтборСтрок Цикл
Если ЭлементОтбора.Использование Тогда
НовыйОтбор = ПостроительОтчета.Отбор.Добавить(ЭлементОтбора.Имя);
НовыйОтбор.Использование = Истина;
НовыйОтбор.ВидСравнения = ЭлементОтбора.ВидСравнения;
НовыйОтбор.ЗначениеС = ЭлементОтбора.ЗначениеС;
НовыйОтбор.ЗначениеПо = ЭлементОтбора.ЗначениеПо;
НовыйОтбор.Значение = ЭлементОтбора.Значение;
КонецЕсли;
КонецЦикла;
ПостроительОтчета.Выполнить();
Результат = ПостроительОтчета.Результат.Выгрузить();