--Тип данных для курсора
TYPE LIST_CLIENT_SUB IS RECORD (
--Поля типа данных
  CLIENT_ID CLIENT.CLIENT_ID%TYPE,
  NEW_STATUS INTEGER,
  OLD_STATUS INTEGER,
  START_STATUS_DATE DATE,
  FINISH_STATUS_DATE DATE);

--Курсор с параметрами
CURSOR curLIST_CLIENT_SUB(d1 DATE, d2 DATE) RETURN LIST_CLIENT_SUB IS
   SELECT
     cl.CLIENT_ID,
     NEW_STATUS,
     OLD_STATUS,
     START_STATUS_DATE,
     FINISH_STATUS_DATE
   FROM CLIENT cl
   WHERE cl.REC_DATE BETWEEN d1 AND d2