Помогите с отчетом по сотрудникам

1. svet-pvl 06.06.08 21:21 Сейчас в теме
Нужно получить отчет, к примеру, из двух столбцов - ФИО сотрудника и его телефон. Телефон хранится в подиненном справочнике ДляКадров.
Не могу получить номера телефонов... Выдает 0.

Процедура Запрос()
Перем Запрос, ТекстЗапроса, Таб;
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Запрос)

|Наим = Справочник.Сотрудники.ТекущийЭлемент;
|Группировка Наим;
|"//}}ЗАПРОС

;
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Возврат;
КонецЕсли;
Пока (Запрос.Группировка("Наим") = 1) Цикл
ВыбДата = ТекущаяДата();
ДК = СоздатьОбъект("Справочник.ДляКадров");
ДК.ИспользоватьВладельца(Запрос.Наим);
ДК.ВыбратьЭлементы();
Пока (ДК.ПолучитьЭлемент() = 1) Цикл
Сообщить(ДК.Телефон.Получить());
Сообщить(ДК.Участок.Получить());
Тел=ДК.Телефон.Получить();
Сообщить(Тел);
КонецЦикла;
КонецЦикла;
По теме из базы знаний
Ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. Dolly_EV 269 07.06.08 08:56 Сейчас в теме
Не хватает позиционирования периодики на дате...
или
ДК.Телефон.Получить(ВыбДата)
или
ДК.ИспользоватьДату(ВыбДата) , тогда просто ДК.Телефон (без Получить())
3. Dolly_EV 269 07.06.08 08:59 Сейчас в теме
А вообще для подобных вещей достаточно стандартного ИТСного REFPRINT.ert - "Универсальный отчет: Печать содержимого справочников"
Печать справочника "ДляКадров" - и владелец (Сотрудник) тоже на печать выведется
4. svet-pvl 07.06.08 11:55 Сейчас в теме
Спасибо за помощь! Действительно, сегодня все получилось.
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот