1 package ben_sspndd_enrollment as
2 /* $Header: bensuenr.pkh 120.7.12010000.1 2008/07/29 12:31:22 appldev ship $ */
3 -------------------------------------------------------------------------------
4 /*
5 +=============================================================================+
6 | Copyright (c) 1997 Oracle Corporation +
7 | Redwood Shores, California, USA +
8 | All rights reserved. +
9 +=============================================================================+
10 Name
11 Suspend Enrollment
12 Purpose
13 This package is used to update the enrollment result to indicate
14 it to be suspended and assign a interiem coverage if it's required
15 and available.
16 History
17 Date Who Version What?
18 ----------- ---------- ------- ---------------------------------------------
19 12 May 1998 maagrawa 110.0 Created.
20 22 Jul 1998 maagrawa 110.1 p_rslt_object_version_number argument added.
21 22 Sep 1998 bbulusu 110.2 removed p_enrt_mthd_cd from
22 p_suspend_enrollment
23 30 Oct 1998 Hdang 115.5 Add unsuspend procedure declaration.
24 05 Nov 1998 Hdang 115.6 Add per_in_ler_id in unsuspend_enrollment.
25 07 Aug 2002 ikasire 115.8 Bug 2502633 Interim Ehnacements
26 added a global variable g_use_new_result
27 24 dec 2002 hmani 115.9 for nocopy changes
28 23 Aug 2004 mmudigon 115.10 CFW. Added p_act_item_flag to proc
29 suspend_enrollment
30 2534391 :NEED TO LEAVE ACTION ITEMS
31 05 Sep 2004 ikasire 115.11 FIDOML Override Enhancements
32 09 sep 2004 mmudigon 115.12 CFW. p_act_item_flag no longer needed
33 29 Jun 2005 ikasire 115.13 Bug 4422667 getting into loop issue
34 26 Aug 2005 ikasire 115.14 Bug 4558512 Reinstatement unsuspend code
35 return incorrect coverage dates
36 15 Sep 2005 ikasire 115.15 Bug 4450214 Added cfw condition bases on
37 g_cfw_flag and modified the cfw cursor to
38 to function as per the changed process in
39 election_information.
40 22 Sep 2005 ikasire 115.16 Bug 4622534 for carrforward dependents from default
41 rule
42 21 Jul 2006 rtagarra 115.17 Bug 5402072 :Leapfrog of 115.16 and same as 115.16.
43 28 sep 2006 ssarkar 115.18 Bug 5529258 : get_dflt_to_asn_pndg_ctfn_cd is made public
44 24-Aug-2007 gsehgal 115.19 bug 6337803 added new global vaiable g_sspnded_rslt_id
45 ===============================================================================
46 */
47 --
48 -- Global variable declaration
49 --
50 g_debug Boolean := TRUE;
51 g_use_new_result Boolean := false ;
52 g_interim_flag varchar2(30) := 'N';
53 g_cfw_flag varchar2(30) := 'N';
54 g_cfw_dpnt_flag varchar2(30) := 'N';
55 -- 6337803
56 g_sspnded_rslt_id ben_prtt_enrt_rslt_f.prtt_enrt_rslt_id%TYPE;
57 --
58 -- Gloabal procedure declaration.
59 --
60 --
61 -- ===========================================================================
62 -- Procedure: Suspend_enrollment
63 -- Process will handle suspend the enrollment and its apply the interim
64 -- enrollment if interim available.
65 --
66 -- ===========================================================================
67 --
68 procedure suspend_enrollment
69 (p_prtt_enrt_rslt_id in number
70 ,p_effective_date in date
71 ,p_post_rslt_flag in varchar2 default 'N'
72 ,p_business_group_id in number
73 ,p_object_version_number in out nocopy number
74 ,p_datetrack_mode in varchar2
75 );
76 --
77 -- ===========================================================================
78 -- Procedure: unsuspend_enrollment
79 -- Process will handle unsuspend the enrollment and its interim enrollment
80 -- if there is one.
81 -- ===========================================================================
82 --
83 procedure unsuspend_enrollment
84 (p_prtt_enrt_rslt_id in number
85 ,p_effective_date in date
86 ,p_per_in_ler_id in number default NULL
87 ,p_post_rslt_flag in varchar2 default 'N'
88 ,p_business_group_id in number
89 ,p_object_version_number in out nocopy number
90 ,p_datetrack_mode in varchar2
91 ,p_called_from in varchar2 default 'BENSUENR'
92 ,p_cmpltd_dt in date default null
93 );
94
95 -- ===========================================================================
96 Function get_dflt_to_asn_pndg_ctfn_cd
97 (p_dflt_to_asn_pndg_ctfn_rl in number
98 ,p_person_id in number
99 ,p_per_in_ler_id in number
100 ,p_assignment_id in number
101 ,p_organization_id in number
102 ,p_business_group_id in number
103 ,p_pgm_id in number
104 ,p_pl_id in number
105 ,p_pl_typ_id in number
106 ,p_opt_id in number
107 ,p_ler_id in number
108 ,p_elig_per_elctbl_chc_id in number
109 ,p_jurisdiction_code in varchar2
110 ,p_effective_date in date
111 ,p_prtt_enrt_rslt_id in number
112 ,p_interim_epe_id out nocopy number
113 ,p_interim_bnft_amt out nocopy number
114 ) return varchar2 ;
115
116 -------------------------------------------------------------------------------
117 end ben_sspndd_enrollment;