как упорядочить результат запроса в одну строку для каждой УК?

Сделал вот так, может кому поможет:

Запрос3 = Новый Запрос;
Запрос3.Текст = "ВЫБРАТЬ
| ЗакрытиеМесяца.УК КАК УК,
| ВЫБОР
| КОГДА МЕСЯЦ(ЗакрытиеМесяца.Период) = 1
| И ЗакрытиеМесяца.Экономист <> """"
| ТОГДА ""Закрыт""
| КОНЕЦ КАК Янв,
| ВЫБОР
| КОГДА МЕСЯЦ(ЗакрытиеМесяца.Период) = 2
| И ЗакрытиеМесяца.Экономист <> """"
| ТОГДА ""Закрыт""
| КОНЕЦ КАК Фев,
| ВЫБОР
| КОГДА МЕСЯЦ(ЗакрытиеМесяца.Период) = 3
| И ЗакрытиеМесяца.Экономист <> """"
| ТОГДА ""Закрыт""
| КОНЕЦ КАК Мар,
| ВЫБОР
| КОГДА МЕСЯЦ(ЗакрытиеМесяца.Период) = 4
| И ЗакрытиеМесяца.Экономист <> """"
| ТОГДА ""Закрыт""
| КОНЕЦ КАК Апр,
| ВЫБОР
| КОГДА МЕСЯЦ(ЗакрытиеМесяца.Период) = 5
| И ЗакрытиеМесяца.Экономист <> """"
| ТОГДА ""Закрыт""
| КОНЕЦ КАК Май,
| ВЫБОР
| КОГДА МЕСЯЦ(ЗакрытиеМесяца.Период) = 6
| И ЗакрытиеМесяца.Экономист <> """"
| ТОГДА ""Закрыт""
| КОНЕЦ КАК Июн,
| ВЫБОР
| КОГДА МЕСЯЦ(ЗакрытиеМесяца.Период) = 7
| И ЗакрытиеМесяца.Экономист <> """"
| ТОГДА ""Закрыт""
| КОНЕЦ КАК Июл,
| ВЫБОР
| КОГДА МЕСЯЦ(ЗакрытиеМесяца.Период) = 8
| И ЗакрытиеМесяца.Экономист <> """"
| ТОГДА ""Закрыт""
| КОНЕЦ КАК Авг,
| ВЫБОР
| КОГДА МЕСЯЦ(ЗакрытиеМесяца.Период) = 9
| И ЗакрытиеМесяца.Экономист <> """"
| ТОГДА ""Закрыт""
| КОНЕЦ КАК Сен,
| ВЫБОР
| КОГДА МЕСЯЦ(ЗакрытиеМесяца.Период) = 10
| И ЗакрытиеМесяца.Экономист <> """"
| ТОГДА ""Закрыт""
| КОНЕЦ КАК Окт,
| ВЫБОР
| КОГДА МЕСЯЦ(ЗакрытиеМесяца.Период) = 11
| И ЗакрытиеМесяца.Экономист <> """"
| ТОГДА ""Закрыт""
| КОНЕЦ КАК Ноя,
| ВЫБОР
| КОГДА МЕСЯЦ(ЗакрытиеМесяца.Период) = 12
| И ЗакрытиеМесяца.Экономист <> """"
| ТОГДА ""Закрыт""
| КОНЕЦ КАК Дек
|ИЗ
| РегистрСведений.ЗакрытиеМесяца КАК ЗакрытиеМесяца
|ГДЕ
| ГОД(ЗакрытиеМесяца.Период) = &Год
| И ЗакрытиеМесяца.УК.Наименование = &Наименование";

табзн=новый таблицазначений;
табзн.Колонки.Добавить("УправляющаяКомпания");
табзн.Колонки.Добавить("Янв");
табзн.Колонки.Добавить("Фев");
табзн.Колонки.Добавить("Мар");
табзн.Колонки.Добавить("Апр");
табзн.Колонки.Добавить("Май");
табзн.Колонки.Добавить("Июн");
табзн.Колонки.Добавить("Июл");
табзн.Колонки.Добавить("Авг");
табзн.Колонки.Добавить("Сен");
табзн.Колонки.Добавить("Окт");
табзн.Колонки.Добавить("Ноя");
табзн.Колонки.Добавить("Дек");
Запрос2 = Новый Запрос;
Запрос2.Текст = "ВЫБРАТЬ
| УправляющиеКомпании.Наименование КАК Наименование
|ИЗ
| Справочник.УправляющиеКомпании КАК УправляющиеКомпании
|
|УПОРЯДОЧИТЬ ПО
| УправляющиеКомпании.Наименование ИЕРАРХИЯ";
Выборка = Запрос2.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
стртабзн= табзн.Добавить();
стртабзн.УправляющаяКомпания= Выборка.Наименование;
Запрос3.УстановитьПараметр("Наименование",Выборка.Наименование);
Запрос3.УстановитьПараметр("Год",Год);

Выборка3 = Запрос3.Выполнить().Выбрать();
Пока Выборка3.Следующий() Цикл
Если Выборка3.Янв="Закрыт" тогда стртабзн.Янв="Закрыт"; КонецЕсли;
Если Выборка3.Фев="Закрыт" тогда стртабзн.Фев="Закрыт"; КонецЕсли;
Если Выборка3.Мар="Закрыт" тогда стртабзн.Мар="Закрыт"; КонецЕсли;
Если Выборка3.Апр="Закрыт" тогда стртабзн.Апр="Закрыт"; КонецЕсли;
Если Выборка3.Май="Закрыт" тогда стртабзн.Май="Закрыт"; КонецЕсли;
Если Выборка3.Июн="Закрыт" тогда стртабзн.Июн="Закрыт"; КонецЕсли;
Если Выборка3.Июл="Закрыт" тогда стртабзн.Июл="Закрыт"; КонецЕсли;
Если Выборка3.Авг="Закрыт" тогда стртабзн.Авг="Закрыт"; КонецЕсли;
Если Выборка3.Сен="Закрыт" тогда стртабзн.Сен="Закрыт"; КонецЕсли;
Если Выборка3.Окт="Закрыт" тогда стртабзн.Окт="Закрыт"; КонецЕсли;
Если Выборка3.Ноя="Закрыт" тогда стртабзн.Ноя="Закрыт"; КонецЕсли;
Если Выборка3.Дек="Закрыт" тогда стртабзн.Дек="Закрыт"; КонецЕсли;
КонецЦикла;
КонецЦикла;
// ТабличноеПоле2.загрузить( табзн.Выгрузить());
ЭлементыФормы.ТабличноеПоле2.Значение=табзн;
ЭлементыФормы.ТабличноеПоле2.СоздатьКолонки();
Для каждого Кол Из ЭлементыФормы.ТабличноеПоле2.Колонки Цикл
Если кол.Имя<>"УправляющаяКомпания" Тогда
Кол.Ширина=7;
КонецЕсли;
КонецЦикла;