Функция ВыбратьИзСпискаПериодФормированияОтчета(чТекущийГод, Элемент)
   
   Список = Новый СписокЗначений;
   Список.Добавить(чТекущийГод - 1, Формат(чТекущийГод - 1, "ЧГ=0"));
   Список.Добавить(Дата(чТекущийГод, 01, 01, 00, 00, 00), "I квартал " + Формат(чТекущийГод, "ЧГ=0"));
   Список.Добавить(Дата(чТекущийГод, 04, 01, 00, 00, 00), "II квартал " + Формат(чТекущийГод, "ЧГ=0"));
   Список.Добавить(Дата(чТекущийГод, 07, 01, 00, 00, 00), "III квартал " + Формат(чТекущийГод, "ЧГ=0"));
   Список.Добавить(Дата(чТекущийГод, 10, 01, 00, 00, 00), "IV квартал " + Формат(чТекущийГод, "ЧГ=0"));
   Список.Добавить(чТекущийГод + 1, Формат(чТекущийГод + 1, "ЧГ=0"));
   
   хзРезультат = ВыбратьИзСписка(Список, Элемент);
   Если хзРезультат <> Неопределено Тогда
       
       Если ТипЗнч(хзРезультат.Значение) = Тип("Число") Тогда
           хзРезультат = ВыбратьИзСпискаПериодФормированияОтчета(хзРезультат.Значение, Элемент);
       КонецЕсли;
       
       Возврат хзРезультат;
       
   КонецЕсли;
   
   Возврат Неопределено;
   
КонецФункции

Процедура КварталыНачалоВыбораИзСписка(Элемент, СтандартнаяОбработка)    
   СтандартнаяОбработка = Ложь;
   
   чТекущийГод = ?(ЗначениеЗаполнено(ПериодФормированияОтчета), Год(ПериодФормированияОтчета), Год(Дата));
   
   хзРезультат = ВыбратьИзСпискаПериодФормированияОтчета(чТекущийГод, Элемент);
   
   Если хзРезультат <> Неопределено Тогда
       ПериодФормированияОтчета = хзРезультат.Значение;
       ПредставлениеПериодаФормированияОтчета = хзРезультат.Представление;
   КонецЕсли;
   
   
КонецПроцедуры

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