select cl.Clientname
from Client cl
where 1=1 -- тупо удобно при работе с текстом предикат
-- Обеспечиваем partition range iterator, отсеивая заведомо ненужные "старые" секции.
-- К большому сожалению, "будущие" от p_date секции придется сканировать, 
-- т.е. производительность отбора будет зависеть от того, насколько глубоко в прошлом значение p_date.
  and cl.DateEnd >= :p_date 
  and cl.DateBegin<= :p_date -- Фильтруем записи "из будущего"

select ac.AccountNumber, cl.Clientname
from Client cl
   , Account ac
where 1=1 -- тупо удобно при работе с текстом предикат
  and cl.DateEnd >= :p_date -- Обеспечиваем partition range iterator, key-key
  and cl.DateBegin<= :p_date -- Фильтруем записи "из будущего"
  and ac.DateEnd >= :p_date -- Обеспечиваем partition range iterator, отсеивая заведомо ненужные "старые" секции.
  and ac.DateBegin<= :p_date -- Фильтруем записи "из будущего"
  and ac.ClientID = cl.ID -- вяжем
 -- корректно отрабатываем связку версионированных данных (актуально если попросят передалать с "на дату" в "за период")
 -- WARN: тут можно слететь с HJ в NL - контролируем план
--  and ac.DateBegin < cl.DateEnd and cl.DateBegin < ac.DateEnd

SELECT ac.AccountNumber, cl.Clientname, ar.OutRestVal
from Client cl
   , Account ac
   , AccountRest ar
where 1=1 -- тупо удобно при работе с текстом предикат
  and cl.DateEnd >= :p_date -- Обеспечиваем partition range iterator, key-key
  and cl.DateBegin<= :p_date -- Фильтруем записи "из будущего"
  and ac.DateEnd >= :p_date -- Обеспечиваем partition range iterator, отсеивая заведомо ненужные "старые" секции.
  and ac.DateBegin<= :p_date -- Фильтруем записи "из будущего"
  and ac.ClientID = cl.ID -- вяжем
  and ar.DateRest = trunc(:p_date,'DD') -- попадаем в ключ list-секционированной таблички, ждем в плане partition SINGLE
  and ac.ID = ar.AccountID -- вяжем
;