1 package ben_prem_prtt_monthly AUTHID CURRENT_USER as
2 /* $Header: benprprm.pkh 115.6 2003/01/01 00:00:56 mmudigon ship $ */
3
4 type g_apr_cak_rec is record
5 (sgmt varchar2(60));
6
7 type g_apr_cak_table is table of g_apr_cak_rec
8 index by binary_integer;
9
10 g_rec ben_type.g_report_rec ;
11
12 --
13 -- ----------------------------------------------------------------------------
14 -- |------------------------< premium_warning >----------------------------|
15 -- ----------------------------------------------------------------------------
16 -- Procedure used to create warning messages for premiums.
17 procedure premium_warning
18 (p_person_id in number default null
19 ,p_prtt_enrt_rslt_id in number
20 ,p_effective_start_date in date
21 ,p_effective_date in date
22 ,p_warning in varchar2);
23
24 -- ----------------------------------------------------------------------------
25 -- |------------------------< compute_partial_mo >----------------------------|
26 -- ----------------------------------------------------------------------------
27 -- Procedure used to compute partial month premiums. it's called internally
28 -- and from benprprc.pkb
29 procedure compute_partial_mo
30 (p_business_group_id in number
31 ,p_effective_date in date
32 ,p_actl_prem_id in number
33 ,p_person_id in number
34 ,p_enrt_cvg_strt_dt in date
35 ,p_enrt_cvg_thru_dt in date
36 ,p_prtl_mo_det_mthd_cd in varchar2 default null
37 ,p_prtl_mo_det_mthd_rl in number default null
38 ,p_wsh_rl_dy_mo_num in number default null
39 ,p_rndg_cd in varchar2 default null
40 ,p_rndg_rl in number default null
41 ,p_lwr_lmt_calc_rl in number default null
42 ,p_lwr_lmt_val in number default null
43 ,p_upr_lmt_calc_rl in number default null
44 ,p_upr_lmt_val in number default null
45 ,p_pgm_id in number default null
46 ,p_pl_typ_id in number default null
47 ,p_pl_id in number default null
48 ,p_opt_id in number default null
49 ,p_val in out nocopy number) ;
50 -- ----------------------------------------------------------------------------
51 -- |------------------------------< main >------------------------------------|
52 -- ----------------------------------------------------------------------------
53 -- This is the procedure to call to determine all the 'ENRT' type premiums for
54 -- the month.
55 procedure main
56 (p_validate in varchar2 default 'N'
57 ,p_person_id in number default null
58 ,p_person_action_id in number default null
59 ,p_comp_selection_rl in number default null
60 ,p_pgm_id in number default null
61 ,p_pl_typ_id in number default null
62 ,p_pl_id in number default null
63 ,p_object_version_number in out nocopy number
64 ,p_business_group_id in number
65 ,p_mo_num in number
66 ,p_yr_num in number
67 ,p_first_day_of_month in date
68 ,p_effective_date in date) ;
69 end ben_prem_prtt_monthly;