1 package ben_back_out_life_event as
2 /* $Header: benbolfe.pkh 120.0.12010000.1 2008/07/29 12:03:31 appldev 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 */
37 --------------------------------------------------------------------------------
38 --
39 -- Global variable declaration.
40 -- This variable is to check the condition that enrollment was made or not.
41
42 g_enrt_made_flag varchar2(10);
43 g_backout_flag varchar2(10);
44 --
45 -- Some of the future_change deletes cascade delete
46 -- so need to pass the original p_effective_date
47 --
48 g_bolfe_effective_date date:=null;
49
50 --
51 procedure back_out_life_events
52 (p_per_in_ler_id in number,
53 p_bckt_per_in_ler_id in number default null,
54 p_bckt_stat_cd in varchar2 default 'UNPROCD',
55 p_business_group_id in number,
56 p_bckdt_prtt_enrt_rslt_id in number default null,
57 p_copy_only in varchar2 default null,
58 p_effective_date in date);
59 -----------------------------------------------------------------------
60 procedure delete_routine(p_routine in varchar2,
61 p_per_in_ler_id in number,
62 p_business_group_id in number,
63 p_bckdt_prtt_enrt_rslt_id in number default null,
64 p_copy_only in varchar2 default null,
65 p_effective_date in date);
66 -----------------------------------------------------------------------
67 procedure back_out_life_events_ss
68 (p_per_in_ler_id in number,
69 p_bckt_per_in_ler_id in number default null,
70 p_bckt_stat_cd in varchar2 default 'UNPROCD',
71 p_business_group_id in number,
72 p_effective_date in date);
73
74 -----------------------------------------------------------------------
75 end ben_back_out_life_event;