ЗУП 3.* Ученые степени Физических лиц

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

Интерактивно в научную степень Физического лица в форме элемента "подтягивается" последняя присвоенная степень. Ниже вариант с дополнительным разбиением по Отрасли науки (на практике реквизит записи справочника Ученые Степени может быть и не заполнен, решение о необходимости разбиения по отросли следует принять самостоятельно - параметр запроса &РазбиратьУчетныеСтепениПоОтраслямНаук )

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

 Возврат Результат;

КонецФункции //ПолучитьРезультатЗапроса_УченыеСтепениФизЛиц