1 package ben_close_enrollment AUTHID CURRENT_USER as
2 /* $Header: benclenr.pkh 120.1.12010000.1 2008/07/29 12:04:12 appldev ship $ */
3 /* ========================================================================
4 * Name
5 * Close Enrollment
6 * Purpose
7 * This package is used to update the enrollment record to indicate
8 * the participant has been enrolled.
9 * History
10 * Date Who Ver What?
11 * --------- ---------- ------ ----------------------------
12 * 07 May 98 maagrawa 110.0 Created.
13 * 18 Jun 98 maagrawa 110.1 Two new parameters added p_pgm_id and
14 * p_pl_id
15 * 01-Sep-1998 Hugh Dang 115.4 Remove pgm_id, pl_id from parameter list.
16 * Add one more procedure to close any
17 * un-resolved enrollment.
18 * <<Major modification in this ver.>>
19 * 10-Dec-1998 Hugh Dang 115.5 Remove couple procedure declaration.
20 * 11-Dec-1998 Hugh Dang 115.6 Add parmeter into close single enrollment.
21 * 20-Dec-1998 Hugh Dang 115.7 Add restart procedure and add audit log.
22 * 22-Feb-1998 Hugh Dang 115.8 Change p_effective_date data type for
23 * process and multithreads.
24 * 16-APR-1999 pbodla 115.9 p_close_cd added to close_single_enrollment.
25 * 16-APR-1999 pbodla 115.10
26 * 02-Jun-1999 jcarpent 115.11 Added close_uneai_flag and uneai_eff_date
27 * 05-Sep-2000 pbodla 115.12 - Bug 5422 : Allow different enrollment periods
28 * for programs for a scheduled enrollment.
29 * p_popl_enrt_typ_cycl_id is removed.
30 *
31 * 13-Mar-2001 pbodla 115.13 - Bug 1674123 : close_cd paramter is
32 * can be passed from concurrent program.
33 * 06-Jul-2001 stee 115.14 - Added reopen_single_life_event
34 * procedure. Bug # 1700853.
35 * 04-Mar-2002 shdas 115.15 - Added procedures close_single_enrollment_ss
36 * and close_enrt_n_run_benmngle_ss for selfservice.
37 *
38 rem 24-Dec-02 bmanyam 115.17 NOCOPY Changes
39 rem 14-Mar-2007 rgajula 115.18 Bug 5929635 - New parameter p_source added to reopen_single_life_event.
40 ===========================================================================
41 */
42 --
43 -- Global type declaration
44 --
45 type g_cache_person_process_object is record
46 (person_id ben_person_actions.person_id%type
47 ,person_action_id ben_person_actions.person_action_id%type
48 ,object_version_number ben_person_actions.object_version_number%type
49 ,ler_id ben_person_actions.ler_id%type
50 );
51 type g_cache_person_process_rec is table of g_cache_person_process_object
52 index by binary_integer;
53 --
54 -- Global varaibles.
55 --
56 g_debug boolean := FALSE;
57 --
58 -- Procedure declaration.
59 --
60 Procedure close_single_enrollment
61 (p_per_in_ler_id in number
62 ,p_effective_date in date
63 ,p_business_group_id in number
64 ,p_validate in boolean default FALSE
65 ,p_batch_flag in boolean default FALSE
66 ,p_person_action_id in Number default NULL
67 ,p_object_version_number in number default NULL
68 ,p_audit_log in varchar2 default 'N'
69 ,p_close_cd in varchar2 default NULL
70 ,p_close_uneai_flag in varchar2
71 ,p_uneai_effective_date in date
72 );
73 Procedure process
74 (errbuf out nocopy varchar2
75 ,retcode out nocopy number
76 ,p_benefit_action_id in number
77 ,p_effective_date in varchar2
78 ,p_business_group_id in number
79 ,p_pgm_id in number default NULL
80 ,p_pl_nip_id in number default NULL
81 ,p_location_id in number default NULL
82 ,p_ler_id in number default NULL
83 --
84 -- PB : 5422 :
85 -- ,p_popl_enrt_typ_cycl_id in number default NULL
86 ,p_lf_evt_ocrd_dt in varchar2 default NULL
87 ,p_Person_id in number default NULL
88 ,p_Person_selection_rl in number default NULL
89 ,p_validate in varchar2 default 'N'
90 ,p_debug_messages in varchar2 default 'N'
91 ,p_audit_log in varchar2 default 'N'
92 ,p_uneai_effective_date in varchar2 default null
93 ,p_close_uneai_flag in varchar2 default 'Y'
94 ,p_close_cd in varchar2 default 'NORCLOSE' -- 1674123
95 ) ;
96 Procedure do_multithread
97 (errbuf out nocopy varchar2
98 ,retcode out nocopy number
99 ,p_validate in varchar2 default 'N'
100 ,p_benefit_action_id in number
101 ,p_thread_id in number
102 ,p_effective_date in varchar2
103 ,p_business_group_id in number
104 ,p_audit_log in varchar2 default 'N'
105 );
106 Procedure restart
107 (errbuf out nocopy varchar2
108 ,retcode out nocopy number
109 ,p_benefit_action_id in number
110 );
111 --
112 Procedure reopen_single_life_event
113 (p_per_in_ler_id in number
114 ,p_person_id in number
115 ,p_lf_evt_ocrd_dt in date
116 ,p_effective_date in date
117 ,p_business_group_id in number
118 ,p_object_version_number in number
119 ,p_validate in boolean default FALSE
120 ,p_source in varchar2 default 'reopen' --Bug 5929635
121 );
122 --
123 procedure close_single_enrollment_ss
124 (p_per_in_ler_id in number
125 ,p_effective_date in date
126 ,p_business_group_id in number
127 ,p_validate in boolean default FALSE
128 ,p_batch_flag in boolean default FALSE
129 ,p_person_action_id in Number default NULL
130 ,p_object_version_number in Number default NULL
131 ,p_audit_log in varchar2 default 'N'
132 ,p_close_cd in varchar2 default 'FORCE'
133 ,p_close_uneai_flag in varchar2 default NULL
134 ,p_uneai_effective_date in date default NULL
135 );
136 --
137 procedure close_enrt_n_run_benmngle_ss
138 (p_person_id in number
139 ,p_mode in varchar2 default 'L'
140 ,p_per_in_ler_id in number
141 ,p_effective_date in date
142 ,p_run_date in date
143 ,p_business_group_id in number
144 ,p_validate in boolean default FALSE
145 ,p_batch_flag in boolean default FALSE
146 ,p_person_action_id in Number default NULL
147 ,p_object_version_number in Number default NULL
148 ,p_audit_log in varchar2 default 'N'
149 ,p_close_cd in varchar2 default 'FORCE'
150 ,p_close_uneai_flag in varchar2 default NULL
151 ,p_uneai_effective_date in date default NULL
152 );
153 --
154 End ben_close_enrollment;