1517: ,p_include_erl in varchar2
1518: )
1519: is
1520: --
1521: l_dup_ptip_id_list ben_cache.IdType;
1522: l_dup_pl_typ_id_list ben_cache.IdType;
1523: l_dup_pl_id_list ben_cache.IdType;
1524: --
1525: l_plnrow ben_cobj_cache.g_pl_inst_row;
1518: )
1519: is
1520: --
1521: l_dup_ptip_id_list ben_cache.IdType;
1522: l_dup_pl_typ_id_list ben_cache.IdType;
1523: l_dup_pl_id_list ben_cache.IdType;
1524: --
1525: l_plnrow ben_cobj_cache.g_pl_inst_row;
1526: l_oiplrow ben_cobj_cache.g_oipl_inst_row;
1519: is
1520: --
1521: l_dup_ptip_id_list ben_cache.IdType;
1522: l_dup_pl_typ_id_list ben_cache.IdType;
1523: l_dup_pl_id_list ben_cache.IdType;
1524: --
1525: l_plnrow ben_cobj_cache.g_pl_inst_row;
1526: l_oiplrow ben_cobj_cache.g_oipl_inst_row;
1527: --
1867: --
1868: l_interim_calc := FALSE;
1869: --
1870: if g_enrt_tbl(i).ptip_id is not null
1871: and not ben_cache.check_list_duplicate
1872: (p_list => l_dup_ptip_id_list
1873: ,p_id => g_enrt_tbl(i).ptip_id
1874: )
1875: then
1947: -- Get all unique plan types not in program.
1948: --
1949: l_step := 50;
1950: --
1951: if (not ben_cache.check_list_duplicate
1952: (p_list => l_dup_pl_typ_id_list
1953: ,p_id => g_enrt_tbl(i).pl_typ_id
1954: )
1955: and g_enrt_tbl(i).pl_typ_id is not NULL
1976: --
1977: -- Get the unique plan information and cache it.
1978: -- If rules exist execute them and cache the results.
1979: --
1980: if not ben_cache.check_list_duplicate
1981: (p_list => l_dup_pl_id_list
1982: ,p_id => g_enrt_tbl(i).pl_id
1983: )
1984: then