FUNCTION GET_TABLE_DATA_ID( IP_DATA_ID IN TABLE_DATA.DATA_ID%TYPE, IP_DATE IN DATE, OP_INDEX IN OUT BINARY_INTEGER )
    RETURN TABLE_DATA.DATA_ID%TYPE
    IS
      GI BINARY_INTEGER;
      GI_LO BINARY_INTEGER := NULL;
      GI_HI BINARY_INTEGER := NULL;
    BEGIN
      IF GT_TABLE_DATA.COUNT =  0  THEN
         RETURN IP_DATA_ID;
      END IF;
      IF OP_INDEX IS NOT NULL AND GT_TABLE_DATA.EXISTS( OP_INDEX ) THEN
         GI := OP_INDEX;
       ELSE
         GI := GT_TABLE_DATA.FIRST;
      END IF;
      GI_LO := GT_TABLE_DATA.FIRST;
      GI_HI := GT_TABLE_DATA.LAST;
      WHILE GI IS NOT NULL
       LOOP
         IF GT_TABLE_DATA( GI ).DATA_ID = IP_DATA_ID THEN
            LOOP
               IF GT_TABLE_DATA( GI ).START_DATE < IP_DATE AND GT_TABLE_DATA( GI ).END_DATE >= IP_DATE THEN
                  OP_INDEX := GI;
                  RETURN GT_TABLE_DATA( GI ).DATA_ID_1;
                ELSIF GT_TABLE_DATA( GI ).START_DATE >= IP_DATE THEN
                  GI := GT_TABLE_DATA.PRIOR( GI );
                ELSE
                  GI := GT_TABLE_DATA.NEXT( GI );
               END IF;
               EXIT WHEN ( GI IS NULL ) OR ( GT_TABLE_DATA( GI ).DATA_ID != IP_DATA_ID );
            END LOOP;
            EXIT;
          ELSIF GT_TABLE_DATA( GI ).DATA_ID < IP_DATA_ID THEN
            EXIT WHEN GI = GI_HI;
            GI_LO := GI;
            GI := GI + ROUND( ( GI_HI - GI ) /  2 ,  0  );
          ELSE
            GI_HI := GI;
            GI := GI - ROUND( ( GI - GI_LO ) /  2 ,  0  );
            EXIT WHEN GI = GI_LO;
         END IF;
      END LOOP;
      RETURN IP_DATA_ID;
   END GET_TABLE_DATA_ID;

CREATE OR REPLACE FORCE VIEW FXB.V_REP_TVP_VITRAT
(NP, SUM_ILL, SUM_BABY, SUMMA, SUM_PENS)
AS 
SELECT A.NP, SUM_ILL, SUM_BABY, NVL(SUM_ILL, 0 )+NVL(SUM_BABY, 0 )+NVL(SUM_PENS, 0 ) SUMMA, SUM_PENS
FROM
(select - 1  np, sum(sum_vip) SUM_ILL from
(select  sum(sum_vip) sum_vip
from tfv_sum_keep A,
 ( select trunc(date_fix,'YYYY') date_y,
  add_months(trunc(date_fix,'YYYY'),(to_number(to_char(date_fix,'Q'))- 1 )* 3 ) date_kv
  from PARAM_FOR_QUERY where USERS = to_char(USERENV('SESSIONID')) ) P
WHERE document_code is null and kvo in ('32','33','50') and data_vv between date_y and date_kv- 1 
union all
select sum(sum_vip) sum_vip
from tfv_sum_keep
WHERE document_code in
(SELECT document_code
 FROM ADD_ILL_0 A,
 ( select trunc(date_fix,'YYYY') date_y,
  add_months(trunc(date_fix,'YYYY'),(to_number(to_char(date_fix,'Q'))- 1 )* 3 ) date_kv
  from PARAM_FOR_QUERY where USERS = to_char(USERENV('SESSIONID')) ) P
WHERE nvl(add_flag,'0')='1' and EXECUTION_DATE between date_y and date_kv- 1 )
and kvo IN ('32','50'))
union all
select  0  np, sum(sum_vip) SUM_ILL from
(select  sum(sum_vip) sum_vip
from tfv_sum_keep A,
... ... ...
... ... ...
<<<  и тут еще  3  страницы >>>

... ... ...
  from PARAM_FOR_QUERY where USERS = to_char(USERENV('SESSIONID'))) P
where NP= 1  AND DAY_DATE between date_y and add_months(date_kv, 3 )- 1 
and G.date_ins = (select max(date_ins) FROM TVF_NALOG_TABL_G where date_ins<=last_day(DAY_DATE))
and N.date_ins = (select max(date_ins) FROM TFV_NACH where date_ins<=last_day(DAY_DATE) AND NP= 1 )
GROUP BY MINL, PROC, trunc(DAY_DATE,'MM') ) A,
(SELECT TN, trunc(DAY_DATE,'MM') DAY_DATE, COUNT(DAY_DATE) CNT
FROM TFV_WORK_TABEL A,
(select trunc(date_fix,'YYYY') date_y,
  add_months(trunc(date_fix,'YYYY'),(to_number(to_char(date_fix,'Q'))- 1 )* 3 ) date_kv
  from PARAM_FOR_QUERY where USERS = to_char(USERENV('SESSIONID'))) P
where DAY_STAT='6' AND DAY_DATE between date_y and add_months(date_kv, 3 )- 1 
GROUP BY TN, trunc(DAY_DATE,'MM') ) B
where A.DAY_DATE=B.DAY_DATE) C
WHERE A.NP=B.NP AND A.NP=C.NP;