Предназначена для быстрого просмотра всех реквизитов документа, удобно для программистов и администраторов. А также некоторые бухгалтеры пользуются такой.
Отчет.Очистить();
Запрос = Новый Запрос();
МетаданныеОбъектаДок = Объект.Док.Метаданные();
Текст = "ВЫБРАТЬ
| Док.*
|ИЗ
| Документ.%ИмяДок КАК Док
|ГДЕ
| Док.Ссылка = &Док";
Запрос.Текст = СтрЗаменить(Текст, "%ИмяДок", МетаданныеОбъектаДок.Имя);
Запрос.УстановитьПараметр("Док",Объект.Док);
ТЗ = Запрос.Выполнить().Выгрузить();
Для Каждого Стр ИЗ ТЗ.Колонки Цикл
СтрОтчет=Отчет.Добавить();
СтрОтчет.НазваниеРеквизита = Стр.Имя;
КонецЦикла;
Для Каждого Стр ИЗ ТЗ Цикл
Индекс = 0;
Для Каждого СтрОтчет ИЗ Отчет Цикл
СтрОтчет.ЗначениеРеквизита = Стр[Индекс];
Индекс = Индекс + 1;
КонецЦикла;
КонецЦикла;
Тестировалось на платформе 1С:Предприятие 8.3 (8.3.10.2561).
Конфигурация: Бухгалтерия предприятия, редакция 3.0 (3.0.60.50), УТ 11.4.1,
Вступайте в нашу телеграмм-группу Инфостарт
