1 Package BEN_DETERMINE_RATES as
2 /* $Header: benrates.pkh 120.0.12010000.1 2008/07/29 12:29:27 appldev ship $ */
3 --------------------------------------------------------------------------------
4 /*
5 +==============================================================================+
6 | Copyright (c) 1997 Oracle Corporation |
7 | Redwood Shores, California, USA |
8 | All rights reserved. |
9 +==============================================================================+
10 Name:
11 Determine Rates.
12
13 Purpose:
14 This process determines rates for either elctable choices or coverages, and
15 writes them to the ben_enrt_rt table. This process can only run in benmngle.
16
17 History:
18 Date Who Version What?
19 ---- --- ------- -----
20 7 May 97 Ty Hayden 110.0 Created.
21 10 aug 98 tguy 110.1 added procedure ben_rates for
22 performance reasons.
23 23 Oct 98 tguy 115.2 added person_id to main
24 02 Nov 98 tguy 115.3 added p_asn_on_enrt_flag as parameter
25 to ben_rates
26 11 Jan 99 tguy 115.4 added elig_per_elctbl_chc_id as parm
27 18 Jan 99 G Perry 115.5 LED V ED
28 04 Mar 99 t guy 115.6 added dflt_flag and ctfn_rqd_flag
29 09 Mar 99 G Perry 115.7 IS to AS.
30 21 Mar 99 mhoyes 115.8 - Added p_person_id, p_pgm_id, p_pl_id
31 and p_oipl_id to ben_rates.
32 03 May 99 mhoyes 115.9 - Removed p_elig_per_elctbl_chc_id
33 from main.
34 29 May 99 mhoyes 115.10 - Added epe type and default globals.
35 - Added defaulted record structures to
36 ben_rates.
37 30 May 99 mhoyes 115.11 - Added epe type enrt_perd_strt_dt to
38 g_curr_epe_rec.
39 28 Jun 99 mhoyes 115.12 - Added more attributes to
40 g_curr_epe_rec.
41 07 Sep 00 kmahendr 115.13 - Added more attributes to
42 g_curr_epe_rec.
43 07 Nov 00 mhoyes 115.14 - Removed ben_rates routine.
44 05 Jan 01 kmahendr 115.15 - Added per_in_ler_id parameter
45 10 Jul 01 mhoyes 115.16 - Added new values to g_curr_epe_rec
46 type.
47 14 Aug 01 mhoyes 115.17 - Added bnft_prvdr_pool_id to g_curr_epe_rec
48 type.
49 15 May 02 ikasire 115.18 - Bug 2200139 Override Enrollment changes added
50 new parameter p_elig_per_elctbl_chc_id for the
51 main procedure for calling from Override
52 process.
53 14-Jan-03 pbodla 115.19,20 GLOBALCWB : Added code to populate
54 CWB rates.
55 */
56 --------------------------------------------------------------------------------
57 --
58 type g_curr_epe_rec is record
59 (elig_per_elctbl_chc_id number
60 ,business_group_id number
61 ,person_id number
62 ,ler_id number
63 ,per_in_ler_id number
64 ,lf_evt_ocrd_dt date
65 ,pgm_id number
66 ,enrt_bnft_id number
67 ,pl_typ_id number
68 ,ptip_id number
69 ,plip_id number
70 ,pl_id number
71 ,oipl_id number
72 ,oiplip_id number
73 ,opt_id number
74 ,enrt_perd_id number
75 ,lee_rsn_id number
76 ,enrt_perd_strt_dt date
77 ,prtt_enrt_rslt_id number
78 ,prtn_strt_dt date
79 ,enrt_cvg_strt_dt date
80 ,enrt_cvg_strt_dt_cd varchar2(30)
81 ,enrt_cvg_strt_dt_rl number
82 ,yr_perd_id number
83 ,prtn_ovridn_flag varchar2(30)
84 ,prtn_ovridn_thru_dt date
85 ,rt_age_val number
86 ,rt_los_val number
87 ,rt_hrs_wkd_val number
88 ,rt_cmbn_age_n_los_val number
89 ,bnft_prvdr_pool_id number
90 );
91 --
92 PROCEDURE main
93 (p_effective_date IN date
94 ,p_lf_evt_ocrd_dt IN date
95 ,p_person_id IN number
96 ,p_per_in_ler_id in number
97 ,p_elig_per_elctbl_chc_id in number default null -- For Override Call only
98 ,p_mode in varchar2 default null
99 );
100 --
101 g_def_curr_epe_rec g_curr_epe_rec;
102 g_def_curr_per_rec per_all_people_F%rowtype;
103 g_def_curr_asg_rec per_all_assignments_f%rowtype;
104 g_def_curr_ast_rec per_assignment_status_types%rowtype;
105 g_def_curr_adr_rec per_addresses%rowtype;
106 --
107 end ben_determine_rates ;