Процедура ИзучениеВыборкиРезультатаЗапроса() Экспорт
	// (Здесь пишется весь учебный код)


	ВыбранныйВидРасчета = ПланыВидовРасчета.ВидыРасчета.ПолучитьФормуВыбора().ОткрытьМодально();

	Если ВыбранныйВидРасчета = Неопределено Тогда

		Возврат;

	КонецЕсли;

	Запрос = Новый Запрос();

	Запрос.Текст =

	"ВЫБРАТЬ

	|   ВидыРасчета.Ссылка КАК ВидРасчета,

	|   ВидыРасчетаБазовыеВидыРасчета.ВидРасчета КАК БазовыйВидРасчета

	|ИЗ

	|   ПланВидовРасчета.ВидыРасчета КАК ВидыРасчета

	|        ЛЕВОЕ СОЕДИНЕНИЕ ПланВидовРасчета.ВидыРасчета.БазовыеВидыРасчета КАК ВидыРасчетаБазовыеВидыРасчета

	|        ПО ВидыРасчета.Ссылка = ВидыРасчетаБазовыеВидыРасчета.Ссылка

	|ИТОГИ

	|   КОЛИЧЕСТВО(РАЗЛИЧНЫЕ БазовыйВидРасчета)

	|ПО

	|   ВидРасчета";

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

	ИнициализироватьТаблицуИлиДерево(Результат, Дерево);

	ВыгрузкаВТаблицу = Результат.Выгрузить();

	ВыгрузкаВТаблицу.Индексы.Добавить("БазовыйВидРасчета");

	НоваяСтрока = Дерево.Строки.Добавить();
	НоваяСтрока.ВидРасчета = ВыбранныйВидРасчета;

	Выкрутка(ВыгрузкаВТаблицу, НоваяСтрока.ВидРасчета, НоваяСтрока);

КонецПроцедуры

Процедура Выкрутка(ВыгрузкаВТаблицу, ВидРасчета, РодительскийУровень)

	СтруктураОтбора = Новый Структура("БазовыйВидРасчета", ВидРасчета);
	МассивСтрок  = ВыгрузкаВТаблицу.НайтиСтроки(СтруктураОтбора);
	Если МассивСтрок.Количество() > 0 Тогда

		Для Каждого СтрокаМассива Из МассивСтрок Цикл

			НоваяСтрока1 = РодительскийУровень.Строки.Добавить();
			НоваяСтрока1.ВидРасчета = СтрокаМассива.ВидРасчета;
			Выкрутка(ВыгрузкаВТаблицу, НоваяСтрока1.ВидРасчета, НоваяСтрока1);


		КонецЦикла;
	КонецЕсли;

КонецПроцедуры