1 package ben_prem_pl_oipl_monthly AUTHID CURRENT_USER as
2 /* $Header: benprplo.pkh 115.6 2003/01/01 00:00:48 mmudigon ship $ */
3 --
4 type g_person_rec is record
5 (person_id number
6 ,pgm_id number
7 ,bnft_amt number);
8
9 type g_person_table is table of g_person_rec
10 index by binary_integer;
11
12 g_rec ben_type.g_report_rec ;
13 -- ----------------------------------------------------------------------------
14 -- |---------------------< get_comp_object_info >-----------------------------|
15 -- ----------------------------------------------------------------------------
16 -- This procedure is called from main and from ben_premium_plan_concurrent
17 -- to get premium comp object ids.
18 procedure get_comp_object_info
19 (p_oipl_id in number default null
20 ,p_pl_id in number default null
21 ,p_pgm_id in number default null
22 ,p_effective_date in date
23 ,p_out_pgm_id out nocopy number
24 ,p_out_pl_typ_id out nocopy number
25 ,p_out_pl_id out nocopy number
26 ,p_out_opt_id out nocopy number);
27
28 -- ----------------------------------------------------------------------------
29 -- |------------------------------< main >------------------------------------|
30 -- ----------------------------------------------------------------------------
31 -- This is the procedure to call to determine all the 'PROC' type premiums for
32 -- the month.
33 procedure main
34 (p_validate in varchar2 default 'N',
35 p_actl_prem_id in number,
36 p_business_group_id in number,
37 p_mo_num in number,
38 p_yr_num in number,
39 p_first_day_of_month in date,
40 p_effective_date in date) ;
41 -- p_pl_typ_id in number,
42 -- p_pl_id in number,
43 -- p_opt_id in number
44 end ben_prem_pl_oipl_monthly;