38: old_pl_typ_id ben_prtt_enrt_rslt_f.pl_typ_id%type,
39: new_pl_typ_id ben_prtt_enrt_rslt_f.pl_typ_id%type,
40: pgm_id ben_prtt_enrt_rslt_f.pgm_id%type,
41: ler_id ben_ler_f.ler_id%type,
42: elig_per_elctbl_chc_id ben_elig_per_elctbl_chc.elig_per_elctbl_chc_id%type,
43: dpnt_cvg_strt_dt_cd ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_cd%type,
44: dpnt_cvg_strt_dt_rl ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_rl%type,
45: effective_start_date ben_prtt_enrt_rslt_f.effective_start_date%type
46: );
39: new_pl_typ_id ben_prtt_enrt_rslt_f.pl_typ_id%type,
40: pgm_id ben_prtt_enrt_rslt_f.pgm_id%type,
41: ler_id ben_ler_f.ler_id%type,
42: elig_per_elctbl_chc_id ben_elig_per_elctbl_chc.elig_per_elctbl_chc_id%type,
43: dpnt_cvg_strt_dt_cd ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_cd%type,
44: dpnt_cvg_strt_dt_rl ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_rl%type,
45: effective_start_date ben_prtt_enrt_rslt_f.effective_start_date%type
46: );
47: --
40: pgm_id ben_prtt_enrt_rslt_f.pgm_id%type,
41: ler_id ben_ler_f.ler_id%type,
42: elig_per_elctbl_chc_id ben_elig_per_elctbl_chc.elig_per_elctbl_chc_id%type,
43: dpnt_cvg_strt_dt_cd ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_cd%type,
44: dpnt_cvg_strt_dt_rl ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_rl%type,
45: effective_start_date ben_prtt_enrt_rslt_f.effective_start_date%type
46: );
47: --
48: type g_pgm_table is table of g_pgm_rec index by binary_integer;
339: ,c_oipl_id number
340: )
341: is
342: SELECT epe.elig_per_elctbl_chc_id
343: FROM ben_elig_per_elctbl_chc epe
344: WHERE epe.oipl_id = c_oipl_id
345: AND epe.pgm_id = c_pgm_id
346: AND epe.per_in_ler_id = c_per_in_ler_id;
347: --
350: ,c_oipl_id number
351: )
352: is
353: SELECT epe.elig_per_elctbl_chc_id
354: FROM ben_elig_per_elctbl_chc epe
355: WHERE epe.oipl_id = c_oipl_id
356: AND epe.pgm_id IS NULL
357: AND epe.per_in_ler_id = c_per_in_ler_id;
358: --
362: ,c_pl_id number
363: )
364: is
365: SELECT epe.elig_per_elctbl_chc_id
366: FROM ben_elig_per_elctbl_chc epe
367: WHERE epe.pl_id = c_pl_id
368: AND epe.oipl_id IS NULL
369: AND epe.pgm_id = c_pgm_id
370: AND epe.per_in_ler_id = c_per_in_ler_id;
374: ,c_pl_id number
375: )
376: is
377: SELECT epe.elig_per_elctbl_chc_id
378: FROM ben_elig_per_elctbl_chc epe
379: WHERE epe.pl_id = c_pl_id
380: AND epe.oipl_id IS NULL
381: AND epe.pgm_id IS NULL
382: AND epe.per_in_ler_id = c_per_in_ler_id;
1868: -- find any differences exists between the two runs of same ler.
1869: --
1870: -- ben_elig_cvrd_dpnt_f
1871: -- ben_prtt_enrt_actn_f
1872: -- ben_elig_per_elctbl_chc -- 9999 done
1873: -- ben_enrt_bnft
1874: -- ben_enrt_rt
1875: -- ben_elctbl_chc_ctfn
1876: --
1875: -- ben_elctbl_chc_ctfn
1876: --
1877: cursor c_bckdt_epe_cnt is
1878: select count(*)
1879: from ben_elig_per_elctbl_chc epe,
1880: ben_per_in_ler pil
1881: where pil.per_in_ler_id = p_bckdt_per_in_ler_id
1882: and pil.person_id = p_person_id
1883: and pil.business_group_id = p_business_group_id
1885: -- and pil.per_in_ler_stat_cd not in ('VOIDD','BCKDT');
1886: --
1887: cursor c_curr_epe_cnt is
1888: select count(*)
1889: from ben_elig_per_elctbl_chc epe,
1890: ben_per_in_ler pil
1891: where pil.per_in_ler_id = p_per_in_ler_id
1892: and pil.person_id = p_person_id
1893: and pil.business_group_id = p_business_group_id
1905: l_diff_auto_flag boolean := true ;
1906: --
1907: cursor c_bckdt_epe_dat is
1908: select epe.*
1909: from ben_elig_per_elctbl_chc epe,
1910: ben_per_in_ler pil
1911: where pil.per_in_ler_id = p_bckdt_per_in_ler_id
1912: and pil.person_id = p_person_id
1913: and pil.business_group_id = p_business_group_id
1915: -- and pil.per_in_ler_stat_cd not in ('VOIDD','BCKDT');
1916: --
1917: cursor c_curr_epe_dat is
1918: select epe.*
1919: from ben_elig_per_elctbl_chc epe,
1920: ben_per_in_ler pil
1921: where pil.per_in_ler_id = p_per_in_ler_id
1922: and pil.person_id = p_person_id
1923: and pil.business_group_id = p_business_group_id
2254: -- find any differences exists between the two runs of same ler.
2255: --
2256: -- ben_elig_cvrd_dpnt_f
2257: -- ben_prtt_enrt_actn_f
2258: -- ben_elig_per_elctbl_chc
2259: -- ben_enrt_bnft
2260: -- ben_enrt_rt
2261: -- ben_elctbl_chc_ctfn
2262: --
2261: -- ben_elctbl_chc_ctfn
2262: --
2263: cursor c_bckdt_epe_cnt is
2264: select count(*)
2265: from ben_elig_per_elctbl_chc epe,
2266: ben_pil_elctbl_chc_popl pel,
2267: ben_per_in_ler pil
2268: where pil.per_in_ler_id = p_bckdt_per_in_ler_id
2269: and pil.person_id = p_person_id
2275: and pel.pil_elctbl_chc_popl_id = epe.pil_elctbl_chc_popl_id;
2276: --
2277: cursor c_curr_epe_cnt is
2278: select count(*)
2279: from ben_elig_per_elctbl_chc epe,
2280: ben_pil_elctbl_chc_popl pel,
2281: ben_per_in_ler pil
2282: where pil.per_in_ler_id = p_per_in_ler_id
2283: and pil.person_id = p_person_id
2298: l_diff_auto_flag boolean := true ;
2299: --
2300: cursor c_bckdt_epe_dat is
2301: select epe.*
2302: from ben_elig_per_elctbl_chc epe,
2303: ben_pil_elctbl_chc_popl pel,
2304: ben_per_in_ler pil
2305: where pil.per_in_ler_id = p_bckdt_per_in_ler_id
2306: and pil.person_id = p_person_id
2312: and pel.pil_elctbl_chc_popl_id = epe.pil_elctbl_chc_popl_id ;
2313: --
2314: cursor c_curr_epe_dat is
2315: select epe.*
2316: from ben_elig_per_elctbl_chc epe,
2317: ben_pil_elctbl_chc_popl pel,
2318: ben_per_in_ler pil
2319: where pil.per_in_ler_id = p_per_in_ler_id
2320: and pil.person_id = p_person_id
5876: pel.enrt_perd_end_dt,
5877: pel.enrt_perd_strt_dt,
5878: to_date('31-12-4712','DD-MM-YYYY') enrt_cvg_end_dt,
5879: pel.dflt_enrt_dt
5880: from ben_elig_per_elctbl_chc epe,
5881: ben_per_in_ler pil,
5882: ben_pil_elctbl_chc_popl pel
5883: where epe.per_in_ler_id = p_per_in_ler_id
5884: and epe.business_group_id = p_business_group_id
5980: old_pl_typ_id ben_prtt_enrt_rslt_f.pl_typ_id%type,
5981: new_pl_typ_id ben_prtt_enrt_rslt_f.pl_typ_id%type,
5982: pgm_id ben_prtt_enrt_rslt_f.pgm_id%type,
5983: ler_id ben_ler_f.ler_id%type,
5984: elig_per_elctbl_chc_id ben_elig_per_elctbl_chc.elig_per_elctbl_chc_id%type,
5985: dpnt_cvg_strt_dt_cd ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_cd%type,
5986: dpnt_cvg_strt_dt_rl ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_rl%type,
5987: effective_start_date ben_prtt_enrt_rslt_f.effective_start_date%type
5988: );
5981: new_pl_typ_id ben_prtt_enrt_rslt_f.pl_typ_id%type,
5982: pgm_id ben_prtt_enrt_rslt_f.pgm_id%type,
5983: ler_id ben_ler_f.ler_id%type,
5984: elig_per_elctbl_chc_id ben_elig_per_elctbl_chc.elig_per_elctbl_chc_id%type,
5985: dpnt_cvg_strt_dt_cd ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_cd%type,
5986: dpnt_cvg_strt_dt_rl ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_rl%type,
5987: effective_start_date ben_prtt_enrt_rslt_f.effective_start_date%type
5988: );
5989: --
5982: pgm_id ben_prtt_enrt_rslt_f.pgm_id%type,
5983: ler_id ben_ler_f.ler_id%type,
5984: elig_per_elctbl_chc_id ben_elig_per_elctbl_chc.elig_per_elctbl_chc_id%type,
5985: dpnt_cvg_strt_dt_cd ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_cd%type,
5986: dpnt_cvg_strt_dt_rl ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_rl%type,
5987: effective_start_date ben_prtt_enrt_rslt_f.effective_start_date%type
5988: );
5989: --
5990: type t_pgm_table is table of pgm_rec index by binary_integer;
8727: and bpp.effective_end_date ;
8728: --
8729: cursor c_flex_epe(c_per_in_ler_id number,c_pgm_id number, c_pl_id number) is
8730: select elig_per_elctbl_chc_id
8731: from ben_elig_per_elctbl_chc epe
8732: where epe.per_in_ler_id = c_per_in_ler_id
8733: and epe.pl_id = c_pl_id
8734: and epe.pgm_id = c_pgm_id ;
8735: --
10098: pel.enrt_perd_end_dt,
10099: pel.enrt_perd_strt_dt,
10100: to_date('31-12-4712','DD-MM-YYYY') enrt_cvg_end_dt,
10101: pel.dflt_enrt_dt
10102: from ben_elig_per_elctbl_chc epe,
10103: ben_per_in_ler pil,
10104: ben_pil_elctbl_chc_popl pel
10105: where epe.per_in_ler_id = cp_per_in_ler_id
10106: and epe.business_group_id = p_business_group_id
10206: old_pl_typ_id ben_prtt_enrt_rslt_f.pl_typ_id%type,
10207: new_pl_typ_id ben_prtt_enrt_rslt_f.pl_typ_id%type,
10208: pgm_id ben_prtt_enrt_rslt_f.pgm_id%type,
10209: ler_id ben_ler_f.ler_id%type,
10210: elig_per_elctbl_chc_id ben_elig_per_elctbl_chc.elig_per_elctbl_chc_id%type,
10211: dpnt_cvg_strt_dt_cd ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_cd%type,
10212: dpnt_cvg_strt_dt_rl ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_rl%type,
10213: effective_start_date ben_prtt_enrt_rslt_f.effective_start_date%type
10214: );
10207: new_pl_typ_id ben_prtt_enrt_rslt_f.pl_typ_id%type,
10208: pgm_id ben_prtt_enrt_rslt_f.pgm_id%type,
10209: ler_id ben_ler_f.ler_id%type,
10210: elig_per_elctbl_chc_id ben_elig_per_elctbl_chc.elig_per_elctbl_chc_id%type,
10211: dpnt_cvg_strt_dt_cd ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_cd%type,
10212: dpnt_cvg_strt_dt_rl ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_rl%type,
10213: effective_start_date ben_prtt_enrt_rslt_f.effective_start_date%type
10214: );
10215: --
10208: pgm_id ben_prtt_enrt_rslt_f.pgm_id%type,
10209: ler_id ben_ler_f.ler_id%type,
10210: elig_per_elctbl_chc_id ben_elig_per_elctbl_chc.elig_per_elctbl_chc_id%type,
10211: dpnt_cvg_strt_dt_cd ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_cd%type,
10212: dpnt_cvg_strt_dt_rl ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_rl%type,
10213: effective_start_date ben_prtt_enrt_rslt_f.effective_start_date%type
10214: );
10215: --
10216: --