Имя: Пароль:
1C
1С v8
Как за выбранный период отобразить список реквизитов созданного раннее документа
0 RobertPlant
 
17.05.13
12:12
Платформа 8.2 Конфигурация Камин 3.0
Создал новый документ где указал поля - Сотрудник, Приказ о приёме, Должность, Паспортные данные, Место жительства, Удостоверение.
Теперь необходимо построить отчёт за выбранный период по этим документам.
Построил Макет, и пока прописал настройку отчёта

ТабДок = Новый ТабличныйДокумент;
   Макет = ПолучитьМакет("Макет");
   Шапка = Макет.ПолучитьОбласть("Шапка");
   ШапкаТаблицы = Макет.ПолучитьОбласть("ШапкаТаблицы");
   СтрокаТаблицы = Макет.ПолучитьОбласть("ШапкаТаблицы");

   Шапка.Параметры.Организация = Справочники.Фирмы.ПолучитьФормуВыбора();

   ТабДок.Вывести(Шапка);
   ТабДок.Вывести(ШапкаТаблицы);
   ТабДок.Вывести(СтрокаТаблицы);
   
   //Зададим параметры вывода
   ТабДок.АвтоМасштаб=истина; // уместить на одну страницу
   ТабДок.ТолькоПросмотр=истина;
   ТабДок.ОриентацияСтраницы=ОриентацияСтраницы.Ландшафт;
   ТабДок.ОтображатьСетку=Ложь;
   ТабДок.ОтображатьЗаголовки=Ложь;
   //Выведем полученный документ
   ТабДок.Показать("Список лицензированных сотрудников");        
   
Теперь не пойму, как в параметры макета должны добавляться данные из моего того созданного документа, что и как необходимо прописать ?
1 Godofsin
 
17.05.13
12:15
Запросом получить документы за период, в цикле выводить параметры
2 Godofsin
 
17.05.13
12:16
а ваще СКД рулит
3 RobertPlant
 
17.05.13
12:16
Пример есть составления подобных запросов ? (1)
4 RobertPlant
 
17.05.13
14:19
Процедура КнопкаСформироватьНажатие(Кнопка)
   
     
   
   ТабДок = Новый ТабличныйДокумент;
   Макет = ПолучитьМакет("Макет");
   Шапка = Макет.ПолучитьОбласть("Шапка");
   ШапкаТаблицы = Макет.ПолучитьОбласть("ШапкаТаблицы");
   СтрокаТаблицы = Макет.ПолучитьОбласть("СтрокаТаблицы");

   
   
   Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
|    СписокЛицензированныхСотрудников.Ссылка
|ИЗ
|    Документ.СписокЛицензированныхСотрудников КАК СписокЛицензированныхСотрудников
|ГДЕ
|    СписокЛицензированныхСотрудников.Дата МЕЖДУ &ДатаН И &ДатаК
|   И СписокЛицензированныхСотрудников.Должность =&Должность
|   И СписокЛицензированныхСотрудников.ФИО =&ФИО
|   И СписокЛицензированныхСотрудников.Номер =&Номер
|   И СписокЛицензированныхСотрудников.ФИО =&Приказ
|   И СписокЛицензированныхСотрудников.ФИО =&Паспорт
|   И СписокЛицензированныхСотрудников.ФИО =&Удостоверения";
Запрос.УстановитьПараметр("ДатаН", ЭлементыФормы.НачПериода.Значение);
Запрос.УстановитьПараметр("ДатаК", ЭлементыФормы.КонПериода.Значение);
Запрос.УстановитьПараметр("Должность", СтрокаТаблицы.Параметры.Должность);
Запрос.УстановитьПараметр("ФИО", СтрокаТаблицы.Параметры.ФИО);    
Запрос.УстановитьПараметр("Номер", СтрокаТаблицы.Параметры.Номер);    
Запрос.УстановитьПараметр("Приказ", СтрокаТаблицы.Параметры.Приказ);    
Запрос.УстановитьПараметр("Паспорт", СтрокаТаблицы.Параметры.Паспорт);    
Запрос.УстановитьПараметр("Удостоверения", СтрокаТаблицы.Параметры.Удостоверения);    
Результат = Запрос.Выполнить();
Выборка = Результат.Выбрать();
      Пока Выборка.Следующий() Цикл
// получим документ для обработки
Док = Выборка.Ссылка.ПолучитьОбъект();
            КонецЦикла;



   ТабДок.Вывести(Шапка);
   ТабДок.Вывести(ШапкаТаблицы);
   ТабДок.Вывести(СтрокаТаблицы);
   
   //Зададим параметры вывода
   ТабДок.АвтоМасштаб=истина; // уместить на одну страницу
   ТабДок.ТолькоПросмотр=истина;
   ТабДок.ОриентацияСтраницы=ОриентацияСтраницы.Ландшафт;
   ТабДок.ОтображатьСетку=Ложь;
   ТабДок.ОтображатьЗаголовки=Ложь;
   //Выведем полученный документ
   ТабДок.Показать("Список лицензированных сотрудников");        
   
   
КонецПроцедуры


Ошибки не выдаёт, но и результата никакого, в чём причина ?
5 RobertPlant
 
17.05.13
15:41
up