Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: запрос всего справочника
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 7.7
4andriy
хочу вывести всех сотрубников в одну таблицу. для этого написал запрос, но при обработке пустой лист (на самом листе Запрос.фио присутствует)

//*******************************************
// Процедура генерации запроса Сформировать.
//
Процедура Сформировать()
    Перем Запрос, ТекстЗапроса, Таб;
    //Создание объекта типа Запрос
    Запрос = СоздатьОбъект("Запрос");
    ТекстЗапроса =
    "//{{ЗАПРОС(Сформировать)
    |ОбрабатыватьДокументы все;
    |ФИО = Справочник.Сотрудники.фио;
    |Группировка ФИО;
    |"//}}ЗАПРОС
;
sava1
нет у сотрудника фио - есть физлицо, фамилии которых в регистре сведений
4andriy
sava1 @ Сегодня, 16:48 необходимо зарегистрироваться для просмотра ссылки ,
справочник сотрудники - реквизит ФИО
4andriy
получился такой код, но почему-то с 30 сотрудников видно только 28
Процедура Сформировать()
    Перем Запрос, ТекстЗапроса, Таб;
    //Создание объекта типа Запрос
    Запрос = СоздатьОбъект("Запрос");
    ТекстЗапроса =
    "//{{ЗАПРОС(Сформировать)
    |ОбрабатыватьДокументы все;
    |ТекущийЭлемент = Справочник.Сотрудники.ФИО;
    |Группировка ФИО;

    |"//}}ЗАПРОС
;
    // Если ошибка в запросе, то выход из процедуры
    Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
        Возврат;
    КонецЕсли;
    
    // Подготовка к заполнению выходных форм данными запроса
    Таб = СоздатьОбъект("Таблица");
    Таб.ИсходнаяТаблица("Сформировать");
    // Заполнение полей "Заголовок"
    Таб.ВывестиСекцию("Заголовок");
    Состояние("Заполнение выходной таблицы...");
    Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
    
    Пока Запрос.Группировка(1) = 1 Цикл    
            // Заполнение полей МодДогЛицСерт
            Таб.ВывестиСекцию("Сформировать");
    КонецЦикла;
    
    // Вывод заполненной формы
    Таб.ТолькоПросмотр(0);
    Таб.Показать("Сформировать", "");
КонецПроцедуры
alex1c
    Запрос = СоздатьОбъект("Запрос");
    ТекстЗапроса =
    "//{{ЗАПРОС(Сформировать)
    |ТекущийЭлемент = Справочник.Сотрудники.ТекущийЭлемент;
    |Группировка ТекущийЭлемент упорядочить по ТекущийЭлемент.Наименование;
    |"//}}ЗАПРОС
;
    // Если ошибка в запросе, то выход из процедуры
    Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
        Возврат;
    КонецЕсли;

Так надо.
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.