Бывает при отладке необходимо посмотреть результаты запроса в обработке, причем сохранить в файл для детального изучения.
Если запрос простой, то нет проблем, затаскиваешь в консоль запросов и все, а если сложный с временными таблицами, то консоль не поможет.
Нашел в инете кусок кода, добавил в него еще запись наименований колонок, может кому пригодится:


ТЗ=Запрос.Выполнить().Выгрузить();

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

Для Каждого Кол из ТЗ.Колонки Цикл
Колонка = Колонка + 1;
Секция = Макет.ПолучитьОбласть("R"+Строка+"C"+Колонка);
Секция.Область().Текст = Кол.Имя;
Макет.Присоединить(Секция);
КонецЦикла;

Строка = 0;
Колонка = 0;

Для Каждого Стр из ТЗ Цикл
Строка = Строка + 1;
Колонка = 0;
Секция = Макет.ПолучитьОбласть("R"+Строка+"C1");
Макет.Вывести(Секция);
Для Каждого Кол из ТЗ.Колонки Цикл
Колонка = Колонка + 1;
Секция = Макет.ПолучитьОбласть("R"+Строка+"C"+Колонка);
Секция.Область().Текст = Стр[Кол.Имя];
Макет.Присоединить(Секция);
КонецЦикла;
КонецЦикла;

ДиалогФайла = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Сохранение);
ДиалогФайла.Фильтр = "Файл Excel (*.xls)|*.xls";

Если ДиалогФайла.Выбрать() Тогда
Макет.Записать(ДиалогФайла.ПолноеИмяФайла, ТипФайлаТабличногоДокумента.XLS);
Сообщить("Файл записан: " + ДиалогФайла.ПолноеИмяФайла);
КонецЕсли;





Исправлено 1 раз(а). Последнее : Сергей_Л, 29.05.12 10:08

А к чему такие сложности? Можно в отладчике сохранить таблицу значений как текстовый, либо табличный документ. Вот с деревом значений так сделать нельзя и это иногда напрягает.

А через построитель отчета не проще было бы ?


Уж если начал писать такие конструкции


Тогда пользовал бы их проще

Мда

Совсем минималистичный вариант. Можно кинуть на форму табличное поле с типом "Таблица значений" ("дерево значений") И написать 2 строчки
ЭлементыФормы.ТП.Значение = Запрос.Выполнить().Выгрузить();
ЭлементыФормы.ТП.СоздатьКолонки();
После вывода таблички на форму, щелкаем правой кнопкой по табличному полю и выбираем "Вывести список".
Работает также и с деревом значений.

piva
Уж если начал писать такие конструкции

Секция = Макет.ПолучитьОбласть("R"+Строка+"C"+Колонка); 
Секция.Область().Текст = Стр[Кол.Имя];

Тогда пользовал бы их проще

Макет.Область(Строка,Колонка).Текст=Стр[Кол.Имя]

Я же говорю, скопипастил из инета, раз работает, над оптимизацией не задумывался. А кстати раз ты предложил, можно весь модернизированный рабочий код?

medstrax
Совсем минималистичный вариант

Всех победил!

Shift-F9 В отладчике - еще короче