Выборка специалистов из данной базы данных

DECLARE @from TIME = '14:00', @to TIME = '16:00'
IF OBJECT_ID('tempdb..#СвободноеВремя') IS NOT NULL DROP TABLE #СвободноеВремя
 
SELECT
    DENSE_RANK() OVER (ORDER BY v.Спец) npp
  , v.Спец, s.Название Специалист, g.врач, v.ФИО
  , g.ДеньНедели, t_free время
INTO #СвободноеВремя
FROM Врачи v
JOIN Специальности s ON s.id = v.Спец
JOIN График g ON g.врач = v.id AND g.ДеньНедели = 2 
CROSS APPLY ( SELECT
    t_from = iif(g.НачалоПриема > @from, g.НачалоПриема, @from)
  , t_to   = iif(g.КонецПриема  < @to,   g.КонецПриема,  @to)
  ) t
JOIN master..spt_values n ON n.type = 'P' 
  AND n.number < DATEDIFF(MINUTE, t_from, t_to) / v.Длительность
CROSS APPLY ( SELECT
  t_free = DATEADD(MINUTE, n.number * v.Длительность, t_from)
  ) t2
WHERE NOT EXISTS (
    SELECT *
    FROM Запись z
    WHERE z.врач = v.id AND DATEPART(WEEKDAY, z.время) = g.ДеньНедели 
      AND convert(TIME, z.время) = t_free
    );
 
SELECT * FROM #СвободноеВремя;

;WITH ПоискВариантов AS (
  SELECT TOP (1) WITH TIES 
    1 iter, f.Спец id, 
    convert(NVARCHAR(max), CONCAT (',', f.Спец, ',')) Спец, 
    convert(NVARCHAR(max), CONCAT (',', f.врач, ',')) Врач, 
    convert(NVARCHAR(max), CONCAT (',', left(f.время, 5), ',')) Время
  FROM #СвободноеВремя f
  ORDER BY f.Спец
  
  UNION ALL
  
  SELECT
    r.iter + 1, f.Спец, 
    CONCAT (r.Спец, f.Спец, ',') Спец, 
    CONCAT (r.Врач, f.врач, ',') Врач, 
    CONCAT (r.Время, left(f.время, 5) + ',') Время
  FROM ПоискВариантов r
  JOIN #СвободноеВремя f ON f.Спец > r.id
  WHERE r.Время NOT LIKE CONCAT ('%,', left(f.время, 5), ',%') 
    AND r.Спец NOT LIKE CONCAT ('%,', f.Спец, ',%')
  )
, Rezult AS (
  SELECT TOP (1) WITH TIES 
      row_number() OVER (ORDER BY r.iter DESC) Npp, 
      STUFF(r.Врач, 1, 1, '') Врач, 
      STUFF(r.Время, 1, 1, '') Время
    FROM ПоискВариантов r
    ORDER BY r.iter DESC
  )
, ПланПосещений AS (
  SELECT
      r.Npp, 1 step, s.Название, v.ФИО, CONVERT(TIME, LEFT(r.Время, pt - 1)) Время, 
      STUFF(r.Врач, 1, pv, '') rv, STUFF(r.Время, 1, pt, '') rt
    FROM Rezult r
    CROSS APPLY (SELECT
      CHARINDEX(',', r.Врач) pv, 
      CHARINDEX(',', r.Время) pt
      ) p
    JOIN Врачи v ON v.id = left(r.Врач, pv - 1)
    JOIN Специальности s ON s.id = v.Спец
 
  UNION ALL
 
  SELECT
      r.Npp, 1 + step, s.Название, v.ФИО, CONVERT(TIME, LEFT(r.rt, pt - 1)) Время, 
      STUFF(r.rv, 1, pv, '') rv, STUFF(r.rt, 1, pt, '') rt
    FROM ПланПосещений r
    CROSS APPLY ( SELECT
      CHARINDEX(',', r.rv) pv, 
      CHARINDEX(',', r.rt) pt
      ) p
    JOIN Врачи v ON v.id = left(r.rv, pv - 1)
    JOIN Специальности s ON s.id = v.Спец
    WHERE pv > 0
  )
SELECT r.Npp Вариант, r.Время, r.Название, r.ФИО
FROM ПланПосещений r
ORDER BY r.Npp, r.Время;

;with Поиск as (
  select top(1) with ties 
      ПосетитьВрачей=1, 
      t.время, 
      Спец=convert(varchar(max),concat(',',t.Спец,',')), 
      ГрафикОбследований=convert(varchar(max),
        concat(left(t.время,5),':',t.ФИО,' (',t.Специалист,')'))
    from #СвободноеВремя t
    order by t.время
  union all
  select
      ПосетитьВрачей+1, 
      t.время, 
      convert(varchar(max),concat(p.Спец,t.Спец,',')), 
      convert(varchar(max),
        concat(p.ГрафикОбследований, '; ', left(t.время,5),':',t.ФИО,' (',t.Специалист,')'))
    from Поиск p
    join #СвободноеВремя t on t.время>p.время 
      and p.Спец not like concat('%,',t.Спец,',%') -- не дублировать специалистов при выборе
  )
select top(3) with ties
  row_number()over(order by ПосетитьВрачей desc)Вариант, 
  ПосетитьВрачей, 
  ГрафикОбследований
from Поиск
order by ПосетитьВрачей desc