DBA Data[Home] [Help]

APPS.BEN_MANAGE_LIFE_EVENTS dependencies on BEN_MANAGE_LIFE_EVENTS

Line 1: package body ben_manage_life_events as

1: package body ben_manage_life_events as
2: /* $Header: benmngle.pkb 120.41.12020000.3 2012/12/11 05:20:51 pvelvano ship $ */
3: --
4: /*
5: +========================================================================+

Line 1142: g_package varchar2(80) := 'ben_manage_life_events';

1138: 11-Dec-12 velvanop 120.28.12010000.16 Bug 14484281
1139: */
1140: --------------------------------------------------------------------------------
1141: --
1142: g_package varchar2(80) := 'ben_manage_life_events';
1143: g_max_errors_allowed number;
1144: --
1145: -- Process information
1146: --

Line 2401: (p_comp_obj_tree_row in ben_manage_life_events.g_cache_proc_objects_rec

2397: --
2398: end check_business_rules;
2399: --
2400: procedure update_elig_per_rows
2401: (p_comp_obj_tree_row in ben_manage_life_events.g_cache_proc_objects_rec
2402: ,p_comp_rec in ben_derive_part_and_rate_facts.g_cache_structure
2403: ,p_person_id in number
2404: ,p_par_elig_state in out nocopy ben_comp_obj_filter.g_par_elig_state_rec
2405: ,p_treeele_num in number

Line 2871: if ben_manage_life_events.g_enrt_rt_tbl.count = 0 then

2867: --
2868: if g_debug then
2869: hr_utility.set_location('Entering ',10);
2870: end if;
2871: if ben_manage_life_events.g_enrt_rt_tbl.count = 0 then
2872: return;
2873: end if;
2874: --
2875: for j in ben_manage_life_events.g_enrt_rt_tbl.first .. ben_manage_life_events.g_enrt_rt_tbl.last loop

Line 2875: for j in ben_manage_life_events.g_enrt_rt_tbl.first .. ben_manage_life_events.g_enrt_rt_tbl.last loop

2871: if ben_manage_life_events.g_enrt_rt_tbl.count = 0 then
2872: return;
2873: end if;
2874: --
2875: for j in ben_manage_life_events.g_enrt_rt_tbl.first .. ben_manage_life_events.g_enrt_rt_tbl.last loop
2876: --
2877: if g_debug then
2878: hr_utility.set_location('Entering ',10);
2879: end if;

Line 2880: if i.acty_base_rt_id = ben_manage_life_events.g_enrt_rt_tbl(j).acty_base_rt_id then

2876: --
2877: if g_debug then
2878: hr_utility.set_location('Entering ',10);
2879: end if;
2880: if i.acty_base_rt_id = ben_manage_life_events.g_enrt_rt_tbl(j).acty_base_rt_id then
2881: --
2882: if ben_manage_life_events.g_enrt_rt_tbl(j).prtt_rt_val_id is not null then
2883: update ben_enrt_rt
2884: set prtt_rt_val_id = ben_manage_life_events.g_enrt_rt_tbl(j).prtt_rt_val_id

Line 2882: if ben_manage_life_events.g_enrt_rt_tbl(j).prtt_rt_val_id is not null then

2878: hr_utility.set_location('Entering ',10);
2879: end if;
2880: if i.acty_base_rt_id = ben_manage_life_events.g_enrt_rt_tbl(j).acty_base_rt_id then
2881: --
2882: if ben_manage_life_events.g_enrt_rt_tbl(j).prtt_rt_val_id is not null then
2883: update ben_enrt_rt
2884: set prtt_rt_val_id = ben_manage_life_events.g_enrt_rt_tbl(j).prtt_rt_val_id
2885: where enrt_rt_id = i.enrt_rt_id;
2886: end if;

Line 2884: set prtt_rt_val_id = ben_manage_life_events.g_enrt_rt_tbl(j).prtt_rt_val_id

2880: if i.acty_base_rt_id = ben_manage_life_events.g_enrt_rt_tbl(j).acty_base_rt_id then
2881: --
2882: if ben_manage_life_events.g_enrt_rt_tbl(j).prtt_rt_val_id is not null then
2883: update ben_enrt_rt
2884: set prtt_rt_val_id = ben_manage_life_events.g_enrt_rt_tbl(j).prtt_rt_val_id
2885: where enrt_rt_id = i.enrt_rt_id;
2886: end if;
2887: --
2888: exit;

Line 2907: if ben_manage_life_events.g_pil_popl_tbl.count = 0 then

2903:
2904: if g_debug then
2905: hr_utility.set_location('Entering popl update',10);
2906: end if;
2907: if ben_manage_life_events.g_pil_popl_tbl.count = 0 then
2908: return;
2909: end if;
2910: --
2911: for j in ben_manage_life_events.g_pil_popl_tbl.first .. ben_manage_life_events.g_pil_popl_tbl.last loop

Line 2911: for j in ben_manage_life_events.g_pil_popl_tbl.first .. ben_manage_life_events.g_pil_popl_tbl.last loop

2907: if ben_manage_life_events.g_pil_popl_tbl.count = 0 then
2908: return;
2909: end if;
2910: --
2911: for j in ben_manage_life_events.g_pil_popl_tbl.first .. ben_manage_life_events.g_pil_popl_tbl.last loop
2912: --
2913: if i.pgm_id = ben_manage_life_events.g_pil_popl_tbl(j).pgm_id or
2914: i.pl_id = ben_manage_life_events.g_pil_popl_tbl(j).pl_id then
2915: --

Line 2913: if i.pgm_id = ben_manage_life_events.g_pil_popl_tbl(j).pgm_id or

2909: end if;
2910: --
2911: for j in ben_manage_life_events.g_pil_popl_tbl.first .. ben_manage_life_events.g_pil_popl_tbl.last loop
2912: --
2913: if i.pgm_id = ben_manage_life_events.g_pil_popl_tbl(j).pgm_id or
2914: i.pl_id = ben_manage_life_events.g_pil_popl_tbl(j).pl_id then
2915: --
2916: update ben_pil_elctbl_chc_popl
2917: set elcns_made_dt = ben_manage_life_events.g_pil_popl_tbl(j).elcns_made_dt

Line 2914: i.pl_id = ben_manage_life_events.g_pil_popl_tbl(j).pl_id then

2910: --
2911: for j in ben_manage_life_events.g_pil_popl_tbl.first .. ben_manage_life_events.g_pil_popl_tbl.last loop
2912: --
2913: if i.pgm_id = ben_manage_life_events.g_pil_popl_tbl(j).pgm_id or
2914: i.pl_id = ben_manage_life_events.g_pil_popl_tbl(j).pl_id then
2915: --
2916: update ben_pil_elctbl_chc_popl
2917: set elcns_made_dt = ben_manage_life_events.g_pil_popl_tbl(j).elcns_made_dt
2918: where pil_elctbl_chc_popl_id = i.pil_elctbl_chc_popl_id;

Line 2917: set elcns_made_dt = ben_manage_life_events.g_pil_popl_tbl(j).elcns_made_dt

2913: if i.pgm_id = ben_manage_life_events.g_pil_popl_tbl(j).pgm_id or
2914: i.pl_id = ben_manage_life_events.g_pil_popl_tbl(j).pl_id then
2915: --
2916: update ben_pil_elctbl_chc_popl
2917: set elcns_made_dt = ben_manage_life_events.g_pil_popl_tbl(j).elcns_made_dt
2918: where pil_elctbl_chc_popl_id = i.pil_elctbl_chc_popl_id;
2919: --
2920: --
2921: --

Line 5679: (p_comp_obj_tree_row in out NOCOPY ben_manage_life_events.g_cache_proc_objects_rec

5675: end process_rows;
5676: --
5677:
5678: procedure set_up_cobj_part_elig
5679: (p_comp_obj_tree_row in out NOCOPY ben_manage_life_events.g_cache_proc_objects_rec
5680: ,p_ler_id in number
5681: ,p_business_group_id in number
5682: ,p_effective_date in date
5683: )

Line 6193: ben_manage_life_events.clear_init_benmngle_caches

6189: end if;
6190: --
6191: -- Clear benmngle level caches
6192: --
6193: ben_manage_life_events.clear_init_benmngle_caches
6194: (p_business_group_id => p_business_group_id
6195: ,p_effective_date => l_effective_date
6196: ,p_threads => l_threads
6197: ,p_chunk_size => l_chunk_size

Line 7214: fetch c_irec_ass_rec into ben_manage_life_events.g_irec_old_ass_rec; -- irec2

7210: -- irec2 : 1. copy c_irec_ass_rec to g_irec_old_ass_rec
7211: -- 2. update per_all_assignments_F with p_offer_assignment_rec
7212: open c_irec_ass_rec;
7213: --
7214: fetch c_irec_ass_rec into ben_manage_life_events.g_irec_old_ass_rec; -- irec2
7215: if c_irec_ass_rec%notfound then
7216: --
7217: close c_irec_ass_rec;
7218: fnd_message.set_name('BEN','BEN_94027_NO_ACT_APL_ASS_FOUND');

Line 7539: ben_manage_life_events.popu_pel_heir ;

7535: hr_utility.set_location ('Before Calling popu_pel_heir',20);
7536: end if;
7537: begin
7538: --
7539: ben_manage_life_events.popu_pel_heir ;
7540: --
7541: exception when others then
7542: --
7543: raise ;

Line 7965: ben_manage_life_events.init_bft_statistics

7961: p_commit => l_commit);
7962: --
7963: -- Log start time of process
7964: --
7965: ben_manage_life_events.init_bft_statistics
7966: (p_business_group_id => p_business_group_id
7967: );
7968: -- GSP Rate Sync
7969: if p_mode = 'G' and p_gsp_eval_elig_flag is null

Line 9714: ben_manage_life_events.g_modified_mode := 'C';

9710: --
9711: if (p_mode = 'L' and l_rec.typ_cd in ('SCHEDDO', 'SCHEDDA'))
9712: then
9713: --
9714: ben_manage_life_events.g_modified_mode := 'C';
9715: --
9716: -- 6806014
9717:
9718: -- Now if benmngle is run in Open mode (C) and the winner

Line 9725: ben_manage_life_events.g_modified_mode := 'L';

9721: -- person and proceed. Means the mode to be changed on the fly.
9722:
9723: elsif (p_mode = 'C' and l_rec.typ_cd not like 'SCHEDD%') then
9724:
9725: ben_manage_life_events.g_modified_mode := 'L';
9726: -- 6806014
9727: end if;
9728: --
9729: -- PB : If the supplied mode and mode of winning life event

Line 9818: if nvl(ben_manage_life_events.g_modified_mode, p_mode) in ('C','W') then

9814: end if;
9815: --
9816: -- CWB Changes
9817: --
9818: if nvl(ben_manage_life_events.g_modified_mode, p_mode) in ('C','W') then
9819: l_asnd_lf_evt_dt := l_rec.lf_evt_ocrd_dt;
9820: end if;
9821: --
9822: if p_mode = 'G' and p_lf_evt_oper_cd = 'SYNC'

Line 9853: ,p_mode => nvl(ben_manage_life_events.g_modified_mode,l_param_rec.mode_cd)

9849: ,p_eligy_prfl_id => l_param_rec.eligy_prfl_id
9850: ,p_vrbl_rt_prfl_id => l_param_rec.vrbl_rt_prfl_id
9851: ,p_thread_id => benutils.g_thread_id
9852: -- PB : 5422 :
9853: ,p_mode => nvl(ben_manage_life_events.g_modified_mode,l_param_rec.mode_cd)
9854: -- ,p_mode => l_param_rec.mode_cd
9855: ,p_lmt_prpnip_by_org_flag => l_param_rec.lmt_prpnip_by_org_flag
9856: ,p_person_id => p_person_id
9857: );

Line 10328: l_comp_obj_tree ben_manage_life_events.g_cache_proc_object_table;

10324: --
10325: l_enb_valrow ben_determine_coverage.ENBValType;
10326: --
10327: l_env ben_env_object.g_global_env_rec_type;
10328: l_comp_obj_tree ben_manage_life_events.g_cache_proc_object_table;
10329: l_par_elig_state ben_comp_obj_filter.g_par_elig_state_rec;
10330: l_comp_obj_tree_row ben_manage_life_events.g_cache_proc_objects_rec;
10331: l_parpepgm_row ben_prtn_elig_f%rowtype;
10332: l_parpeptip_row ben_prtn_elig_f%rowtype;

Line 10330: l_comp_obj_tree_row ben_manage_life_events.g_cache_proc_objects_rec;

10326: --
10327: l_env ben_env_object.g_global_env_rec_type;
10328: l_comp_obj_tree ben_manage_life_events.g_cache_proc_object_table;
10329: l_par_elig_state ben_comp_obj_filter.g_par_elig_state_rec;
10330: l_comp_obj_tree_row ben_manage_life_events.g_cache_proc_objects_rec;
10331: l_parpepgm_row ben_prtn_elig_f%rowtype;
10332: l_parpeptip_row ben_prtn_elig_f%rowtype;
10333: l_parpeplip_row ben_prtn_elig_f%rowtype;
10334: l_parpepl_row ben_prtn_elig_f%rowtype;

Line 10637: l_mode := nvl(ben_manage_life_events.g_modified_mode,p_mode);

10633: end if;
10634: --
10635: -- Start - Added by Gopal Venkataraman 3/27/01 bug 1636071
10636: -- also changed all following p_mode to l_mode.
10637: l_mode := nvl(ben_manage_life_events.g_modified_mode,p_mode);
10638: l_defer_deenrl_tbl.delete;
10639: -- End
10640: --Bug 12732878 ud changes start
10641: --Clearing the cache for every benmngle run

Line 11129: hr_utility.set_location ('Old fonm ' ||ben_manage_life_events.fonm ,30);

11125: hr_utility.set_location (' pgm ' ||l_comp_obj_tree(l_treeele_num).par_pgm_id ,30);
11126: hr_utility.set_location (' ptip ' ||l_comp_obj_tree(l_treeele_num).par_ptip_id ,30);
11127: hr_utility.set_location (' pl ' ||l_comp_obj_tree(l_treeele_num).par_pl_id ,30);
11128: hr_utility.set_location (' plip ' ||l_comp_obj_tree(l_treeele_num).par_plip_id ,30);
11129: hr_utility.set_location ('Old fonm ' ||ben_manage_life_events.fonm ,30);
11130: hr_utility.set_location ('Old pgm fonm ' || l_pgm_fonm ,30);
11131: hr_utility.set_location ('Old ptip fonm ' || l_ptip_fonm ,30);
11132: end if;
11133: -- FONM II

Line 11149: or ben_manage_life_events.fonm is null then

11145: or ( l_pgm_fonm = 'Y' and
11146: ( l_ptip_fonm = 'Y' or nvl(l_last_ptip_id,-1) <> l_comp_obj_tree(l_treeele_num).par_ptip_id
11147: )
11148: )
11149: or ben_manage_life_events.fonm is null then
11150:
11151: hr_utility.set_location (' calling fonm status ' ,30);
11152: ben_use_cvg_rt_date.get_csd_rsd_Status
11153: (p_pgm_id => l_comp_obj_tree(l_treeele_num).par_pgm_id

Line 11158: ,p_status => ben_manage_life_events.fonm

11154: ,p_ptip_id => l_comp_obj_tree(l_treeele_num).par_ptip_id
11155: ,p_plip_id => l_comp_obj_tree(l_treeele_num).par_plip_id
11156: ,p_pl_id => l_comp_obj_tree(l_treeele_num).par_pl_id
11157: ,p_effective_date => p_effective_date
11158: ,p_status => ben_manage_life_events.fonm
11159: ) ;
11160: hr_utility.set_location (' fonm ' ||ben_manage_life_events.fonm ,30);
11161: end if ;
11162: -- eof FONM

Line 11160: hr_utility.set_location (' fonm ' ||ben_manage_life_events.fonm ,30);

11156: ,p_pl_id => l_comp_obj_tree(l_treeele_num).par_pl_id
11157: ,p_effective_date => p_effective_date
11158: ,p_status => ben_manage_life_events.fonm
11159: ) ;
11160: hr_utility.set_location (' fonm ' ||ben_manage_life_events.fonm ,30);
11161: end if ;
11162: -- eof FONM
11163:
11164: -- Set up environment for retrieval of comp object information

Line 11182: l_ptip_fonm := ben_manage_life_events.fonm ;

11178: hr_utility.set_location (' fonm plip ' ||l_comp_obj_tree(l_treeele_num).par_plip_id ,30);
11179: -- if the plip is null then the fonm for ptio
11180: if l_comp_obj_tree(l_treeele_num).par_plip_id is null then
11181:
11182: l_ptip_fonm := ben_manage_life_events.fonm ;
11183: end if ;
11184: else
11185: l_pgm_fonm := ben_manage_life_events.fonm ;
11186: l_ptip_fonm := null ;

Line 11185: l_pgm_fonm := ben_manage_life_events.fonm ;

11181:
11182: l_ptip_fonm := ben_manage_life_events.fonm ;
11183: end if ;
11184: else
11185: l_pgm_fonm := ben_manage_life_events.fonm ;
11186: l_ptip_fonm := null ;
11187: end if ;
11188: --
11189: end if;

Line 11344: hr_utility.set_location (' FONM : ' || ben_manage_life_events.fonm ,80);

11340: --
11341: if g_debug then
11342: hr_utility.set_location(' g_defer_deenrol_flag' || g_defer_deenrol_flag, 9653);
11343: end if;
11344: hr_utility.set_location (' FONM : ' || ben_manage_life_events.fonm ,80);
11345: -- BOF FONM
11346: if l_mode in ('L','C') and -- Bug 6390880
11347: ben_manage_life_events.fonm = 'Y' then
11348:

Line 11347: ben_manage_life_events.fonm = 'Y' then

11343: end if;
11344: hr_utility.set_location (' FONM : ' || ben_manage_life_events.fonm ,80);
11345: -- BOF FONM
11346: if l_mode in ('L','C') and -- Bug 6390880
11347: ben_manage_life_events.fonm = 'Y' then
11348:
11349: hr_utility.set_location (' FONM : Begin ',80);
11350: hr_utility.set_location(' l_pgm_id = ' || l_pgm_id, 4444);
11351: hr_utility.set_location(' l_pl_id = ' || l_pl_id, 4444);

Line 11444: ben_manage_life_events.g_fonm_cvg_strt_dt := l_rec_enrt_cvg_strt_dt ;

11440: ben_use_cvg_rt_date.fonm_clear_down_cache;
11441: --
11442: end if;
11443: --
11444: ben_manage_life_events.g_fonm_cvg_strt_dt := l_rec_enrt_cvg_strt_dt ;
11445: l_fonm_cvg_strt_dt := l_rec_enrt_cvg_strt_dt ;
11446: --
11447: hr_utility.set_location(' g_fonm_cvg_strt_dt '||g_fonm_cvg_strt_dt,110);
11448: --

Line 13171: ben_manage_life_events.g_modified_mode := p_mode;

13167: -- person and proceed. Means the mode to be changed on the fly.
13168: -- To make above logic work store the mode in global. Which
13169: -- may change later.
13170: --
13171: ben_manage_life_events.g_modified_mode := p_mode;
13172: --
13173: /* GSP Rate Sync */
13174: p_prtt_cache := 'N' ;
13175: -- begin 4496944

Line 13274: if nvl(ben_manage_life_events.g_modified_mode, p_mode) in ('G', 'M') then

13270: end if;
13271: --
13272: -- ABSE : 2652690 : For every absence life event recache the person data.
13273: --
13274: if nvl(ben_manage_life_events.g_modified_mode, p_mode) in ('G', 'M') then
13275: --
13276: ben_person_object.clear_down_cache;
13277: --
13278: end if;

Line 13312: p_mode => nvl(ben_manage_life_events.g_modified_mode, p_mode),

13308: (p_person_id => p_person_id,
13309: p_person_action_id => p_person_action_id,
13310: p_object_version_number => p_object_version_number,
13311: p_business_group_id => p_business_group_id,
13312: p_mode => nvl(ben_manage_life_events.g_modified_mode, p_mode),
13313: p_ler_id => l_ler_id,
13314: p_derivable_factors => g_derivable_factors,
13315: p_cbr_tmprl_evt_flag => p_cbr_tmprl_evt_flag,
13316: p_person_count => p_person_count,

Line 13678: end ben_manage_life_events;

13674: benutils.write(p_rec => g_proc_rec);
13675: --
13676: end write_bft_statistics;
13677: --
13678: end ben_manage_life_events;