1 package ben_back_out_life_event AUTHID CURRENT_USER as
2 /* $Header: benbolfe.pkh 120.0.12010000.2 2009/08/17 11:26:20 pvelvano ship $ */
3 --------------------------------------------------------------------------------
4 /*
5 +==============================================================================+
6 | Copyright (c) 1997 Oracle Corporation |
7 | Redwood Shores, California, USA |
8 | All rights reserved. |
9 +==============================================================================+
10
11 Name
12 Back Out Life Event
13 Purpose
14 This package is used to back out all information that is related to
15 a particular life event.
16 History
17 Date Who Version What?
18 ---- --- ------- -----
19 07-JUN-1998 GPERRY 110.0 Created.
20 22-Sep-99 pbodla 115.1 per in ler which causes this
21 per in ler to back out is
22 (bckt_per_in_ler_id) added.
23 04-Oct-99 Gperry 115.2 Added p_bckt_stat_cd to
24 back_out_life_events procedure.
25 07-Oct-99 Gperry 115.3 Fixed defaulting parameter.
26 14-Sep-2000 jcarpent 115.4 Bug 1269016. added bolfe
27 effective_date global.
28 14-Dec-2001 kmahendr 115.5 Bug 2151619 - added g_backout_flag
29 12-Feb-2002 shdas 115.7 Created self-service wrapper for
30 running backout life events.
31 29-Oct-2003 tjesumic 115.9 # 2982606 Result level backup added, new parameter
32 p_bckdt_prtt_enrt_rslt_id added for the purpose.
33 if the per_in_ler careated the result level backout then
34 backing out the per inler reinstate the result
35 07-feb-2005 tjesumic 115.10 # 4118315 copy_only parameter added to copy the extract
36 17-Aug-2009 velvanop 115.11 Bug 8604243: When a lifeevent is being backed out and the previous LE
37 does not have electability and there are no enrollment results for the
38 previous LE, enrollments results of the LE for which enrollments are ended should
39 be reopened. In this case previous LE status will not be updated to 'STARTED' status and then
40 FORCE close the LE.
41 */
42 --------------------------------------------------------------------------------
43 --
44 -- Global variable declaration.
45 -- This variable is to check the condition that enrollment was made or not.
46
47 g_enrt_made_flag varchar2(10);
48 g_backout_flag varchar2(10);
49 --
50 -- Some of the future_change deletes cascade delete
51 -- so need to pass the original p_effective_date
52 --
53 g_bolfe_effective_date date:=null;
54
55 /*Bug 8604243: If flag is set to 'Y',while backing out
56 the LE, previous LE status will not be updated to 'STRTD' status and
57 force close of the previous LE will not happen*/
58 g_no_reopen_flag varchar2(1) default 'N';
59
60 --
61 procedure back_out_life_events
62 (p_per_in_ler_id in number,
63 p_bckt_per_in_ler_id in number default null,
64 p_bckt_stat_cd in varchar2 default 'UNPROCD',
65 p_business_group_id in number,
66 p_bckdt_prtt_enrt_rslt_id in number default null,
67 p_copy_only in varchar2 default null,
68 p_effective_date in date);
69 -----------------------------------------------------------------------
70 procedure delete_routine(p_routine in varchar2,
71 p_per_in_ler_id in number,
72 p_business_group_id in number,
73 p_bckdt_prtt_enrt_rslt_id in number default null,
74 p_copy_only in varchar2 default null,
75 p_effective_date in date);
76 -----------------------------------------------------------------------
77 procedure back_out_life_events_ss
78 (p_per_in_ler_id in number,
79 p_bckt_per_in_ler_id in number default null,
80 p_bckt_stat_cd in varchar2 default 'UNPROCD',
81 p_business_group_id in number,
82 p_effective_date in date);
83
84 -----------------------------------------------------------------------
85 end ben_back_out_life_event;