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.28.12010000.3 2008/08/12 13:06:59 pvelugul ship $ */
3: --
4: /*
5: +========================================================================+

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

1116: to 'L' from 'C', instead of raising an exception
1117: */
1118: --------------------------------------------------------------------------------
1119: --
1120: g_package varchar2(80) := 'ben_manage_life_events';
1121: g_max_errors_allowed number;
1122: --
1123: -- Process information
1124: --

Line 2009: (p_comp_obj_tree_row in ben_manage_life_events.g_cache_proc_objects_rec

2005: --
2006: end check_business_rules;
2007: --
2008: procedure update_elig_per_rows
2009: (p_comp_obj_tree_row in ben_manage_life_events.g_cache_proc_objects_rec
2010: ,p_comp_rec in ben_derive_part_and_rate_facts.g_cache_structure
2011: ,p_person_id in number
2012: ,p_par_elig_state in out nocopy ben_comp_obj_filter.g_par_elig_state_rec
2013: ,p_treeele_num in number

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

2475: --
2476: if g_debug then
2477: hr_utility.set_location('Entering ',10);
2478: end if;
2479: if ben_manage_life_events.g_enrt_rt_tbl.count = 0 then
2480: return;
2481: end if;
2482: --
2483: for j in ben_manage_life_events.g_enrt_rt_tbl.first .. ben_manage_life_events.g_enrt_rt_tbl.last loop

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

2479: if ben_manage_life_events.g_enrt_rt_tbl.count = 0 then
2480: return;
2481: end if;
2482: --
2483: for j in ben_manage_life_events.g_enrt_rt_tbl.first .. ben_manage_life_events.g_enrt_rt_tbl.last loop
2484: --
2485: if g_debug then
2486: hr_utility.set_location('Entering ',10);
2487: end if;

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

2484: --
2485: if g_debug then
2486: hr_utility.set_location('Entering ',10);
2487: end if;
2488: if i.acty_base_rt_id = ben_manage_life_events.g_enrt_rt_tbl(j).acty_base_rt_id then
2489: --
2490: if ben_manage_life_events.g_enrt_rt_tbl(j).prtt_rt_val_id is not null then
2491: update ben_enrt_rt
2492: set prtt_rt_val_id = ben_manage_life_events.g_enrt_rt_tbl(j).prtt_rt_val_id

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

2486: hr_utility.set_location('Entering ',10);
2487: end if;
2488: if i.acty_base_rt_id = ben_manage_life_events.g_enrt_rt_tbl(j).acty_base_rt_id then
2489: --
2490: if ben_manage_life_events.g_enrt_rt_tbl(j).prtt_rt_val_id is not null then
2491: update ben_enrt_rt
2492: set prtt_rt_val_id = ben_manage_life_events.g_enrt_rt_tbl(j).prtt_rt_val_id
2493: where enrt_rt_id = i.enrt_rt_id;
2494: end if;

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

2488: if i.acty_base_rt_id = ben_manage_life_events.g_enrt_rt_tbl(j).acty_base_rt_id then
2489: --
2490: if ben_manage_life_events.g_enrt_rt_tbl(j).prtt_rt_val_id is not null then
2491: update ben_enrt_rt
2492: set prtt_rt_val_id = ben_manage_life_events.g_enrt_rt_tbl(j).prtt_rt_val_id
2493: where enrt_rt_id = i.enrt_rt_id;
2494: end if;
2495: --
2496: exit;

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

2511:
2512: if g_debug then
2513: hr_utility.set_location('Entering popl update',10);
2514: end if;
2515: if ben_manage_life_events.g_pil_popl_tbl.count = 0 then
2516: return;
2517: end if;
2518: --
2519: for j in ben_manage_life_events.g_pil_popl_tbl.first .. ben_manage_life_events.g_pil_popl_tbl.last loop

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

2515: if ben_manage_life_events.g_pil_popl_tbl.count = 0 then
2516: return;
2517: end if;
2518: --
2519: for j in ben_manage_life_events.g_pil_popl_tbl.first .. ben_manage_life_events.g_pil_popl_tbl.last loop
2520: --
2521: if i.pgm_id = ben_manage_life_events.g_pil_popl_tbl(j).pgm_id or
2522: i.pl_id = ben_manage_life_events.g_pil_popl_tbl(j).pl_id then
2523: --

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

2517: end if;
2518: --
2519: for j in ben_manage_life_events.g_pil_popl_tbl.first .. ben_manage_life_events.g_pil_popl_tbl.last loop
2520: --
2521: if i.pgm_id = ben_manage_life_events.g_pil_popl_tbl(j).pgm_id or
2522: i.pl_id = ben_manage_life_events.g_pil_popl_tbl(j).pl_id then
2523: --
2524: update ben_pil_elctbl_chc_popl
2525: set elcns_made_dt = ben_manage_life_events.g_pil_popl_tbl(j).elcns_made_dt

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

2518: --
2519: for j in ben_manage_life_events.g_pil_popl_tbl.first .. ben_manage_life_events.g_pil_popl_tbl.last loop
2520: --
2521: if i.pgm_id = ben_manage_life_events.g_pil_popl_tbl(j).pgm_id or
2522: i.pl_id = ben_manage_life_events.g_pil_popl_tbl(j).pl_id then
2523: --
2524: update ben_pil_elctbl_chc_popl
2525: set elcns_made_dt = ben_manage_life_events.g_pil_popl_tbl(j).elcns_made_dt
2526: where pil_elctbl_chc_popl_id = i.pil_elctbl_chc_popl_id;

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

2521: if i.pgm_id = ben_manage_life_events.g_pil_popl_tbl(j).pgm_id or
2522: i.pl_id = ben_manage_life_events.g_pil_popl_tbl(j).pl_id then
2523: --
2524: update ben_pil_elctbl_chc_popl
2525: set elcns_made_dt = ben_manage_life_events.g_pil_popl_tbl(j).elcns_made_dt
2526: where pil_elctbl_chc_popl_id = i.pil_elctbl_chc_popl_id;
2527: --
2528: --
2529: --

Line 5287: (p_comp_obj_tree_row in out NOCOPY ben_manage_life_events.g_cache_proc_objects_rec

5283: end process_rows;
5284: --
5285:
5286: procedure set_up_cobj_part_elig
5287: (p_comp_obj_tree_row in out NOCOPY ben_manage_life_events.g_cache_proc_objects_rec
5288: ,p_ler_id in number
5289: ,p_business_group_id in number
5290: ,p_effective_date in date
5291: )

Line 5790: ben_manage_life_events.clear_init_benmngle_caches

5786: end if;
5787: --
5788: -- Clear benmngle level caches
5789: --
5790: ben_manage_life_events.clear_init_benmngle_caches
5791: (p_business_group_id => p_business_group_id
5792: ,p_effective_date => l_effective_date
5793: ,p_threads => l_threads
5794: ,p_chunk_size => l_chunk_size

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

6807: -- irec2 : 1. copy c_irec_ass_rec to g_irec_old_ass_rec
6808: -- 2. update per_all_assignments_F with p_offer_assignment_rec
6809: open c_irec_ass_rec;
6810: --
6811: fetch c_irec_ass_rec into ben_manage_life_events.g_irec_old_ass_rec; -- irec2
6812: if c_irec_ass_rec%notfound then
6813: --
6814: close c_irec_ass_rec;
6815: fnd_message.set_name('BEN','BEN_94027_NO_ACT_APL_ASS_FOUND');

Line 7133: ben_manage_life_events.popu_pel_heir ;

7129: hr_utility.set_location ('Before Calling popu_pel_heir',20);
7130: end if;
7131: begin
7132: --
7133: ben_manage_life_events.popu_pel_heir ;
7134: --
7135: exception when others then
7136: --
7137: raise ;

Line 7559: ben_manage_life_events.init_bft_statistics

7555: p_commit => l_commit);
7556: --
7557: -- Log start time of process
7558: --
7559: ben_manage_life_events.init_bft_statistics
7560: (p_business_group_id => p_business_group_id
7561: );
7562: -- GSP Rate Sync
7563: if p_mode = 'G' and p_gsp_eval_elig_flag is null

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

9302: --
9303: if (p_mode = 'L' and l_rec.typ_cd in ('SCHEDDO', 'SCHEDDA'))
9304: then
9305: --
9306: ben_manage_life_events.g_modified_mode := 'C';
9307: --
9308: -- 6806014
9309:
9310: -- Now if benmngle is run in Open mode (C) and the winner

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

9313: -- person and proceed. Means the mode to be changed on the fly.
9314:
9315: elsif (p_mode = 'C' and l_rec.typ_cd not like 'SCHEDD%') then
9316:
9317: ben_manage_life_events.g_modified_mode := 'L';
9318: -- 6806014
9319: end if;
9320: --
9321: -- PB : If the supplied mode and mode of winning life event

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

9406: end if;
9407: --
9408: -- CWB Changes
9409: --
9410: if nvl(ben_manage_life_events.g_modified_mode, p_mode) in ('C','W') then
9411: l_asnd_lf_evt_dt := l_rec.lf_evt_ocrd_dt;
9412: end if;
9413: --
9414: if p_mode = 'G' and p_lf_evt_oper_cd = 'SYNC'

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

9441: ,p_eligy_prfl_id => l_param_rec.eligy_prfl_id
9442: ,p_vrbl_rt_prfl_id => l_param_rec.vrbl_rt_prfl_id
9443: ,p_thread_id => benutils.g_thread_id
9444: -- PB : 5422 :
9445: ,p_mode => nvl(ben_manage_life_events.g_modified_mode,l_param_rec.mode_cd)
9446: -- ,p_mode => l_param_rec.mode_cd
9447: ,p_lmt_prpnip_by_org_flag => l_param_rec.lmt_prpnip_by_org_flag
9448: ,p_person_id => p_person_id
9449: );

Line 9872: l_comp_obj_tree ben_manage_life_events.g_cache_proc_object_table;

9868: --
9869: l_enb_valrow ben_determine_coverage.ENBValType;
9870: --
9871: l_env ben_env_object.g_global_env_rec_type;
9872: l_comp_obj_tree ben_manage_life_events.g_cache_proc_object_table;
9873: l_par_elig_state ben_comp_obj_filter.g_par_elig_state_rec;
9874: l_comp_obj_tree_row ben_manage_life_events.g_cache_proc_objects_rec;
9875: l_parpepgm_row ben_prtn_elig_f%rowtype;
9876: l_parpeptip_row ben_prtn_elig_f%rowtype;

Line 9874: l_comp_obj_tree_row ben_manage_life_events.g_cache_proc_objects_rec;

9870: --
9871: l_env ben_env_object.g_global_env_rec_type;
9872: l_comp_obj_tree ben_manage_life_events.g_cache_proc_object_table;
9873: l_par_elig_state ben_comp_obj_filter.g_par_elig_state_rec;
9874: l_comp_obj_tree_row ben_manage_life_events.g_cache_proc_objects_rec;
9875: l_parpepgm_row ben_prtn_elig_f%rowtype;
9876: l_parpeptip_row ben_prtn_elig_f%rowtype;
9877: l_parpeplip_row ben_prtn_elig_f%rowtype;
9878: l_parpepl_row ben_prtn_elig_f%rowtype;

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

10158: end if;
10159: --
10160: -- Start - Added by Gopal Venkataraman 3/27/01 bug 1636071
10161: -- also changed all following p_mode to l_mode.
10162: l_mode := nvl(ben_manage_life_events.g_modified_mode,p_mode);
10163: l_defer_deenrl_tbl.delete;
10164: -- End
10165: dbms_session.free_unused_user_memory;
10166: --

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

10615: hr_utility.set_location (' pgm ' ||l_comp_obj_tree(l_treeele_num).par_pgm_id ,30);
10616: hr_utility.set_location (' ptip ' ||l_comp_obj_tree(l_treeele_num).par_ptip_id ,30);
10617: hr_utility.set_location (' pl ' ||l_comp_obj_tree(l_treeele_num).par_pl_id ,30);
10618: hr_utility.set_location (' plip ' ||l_comp_obj_tree(l_treeele_num).par_plip_id ,30);
10619: hr_utility.set_location ('Old fonm ' ||ben_manage_life_events.fonm ,30);
10620: hr_utility.set_location ('Old pgm fonm ' || l_pgm_fonm ,30);
10621: hr_utility.set_location ('Old ptip fonm ' || l_ptip_fonm ,30);
10622: end if;
10623: -- FONM II

Line 10639: or ben_manage_life_events.fonm is null then

10635: or ( l_pgm_fonm = 'Y' and
10636: ( l_ptip_fonm = 'Y' or nvl(l_last_ptip_id,-1) <> l_comp_obj_tree(l_treeele_num).par_ptip_id
10637: )
10638: )
10639: or ben_manage_life_events.fonm is null then
10640:
10641: hr_utility.set_location (' calling fonm status ' ,30);
10642: ben_use_cvg_rt_date.get_csd_rsd_Status
10643: (p_pgm_id => l_comp_obj_tree(l_treeele_num).par_pgm_id

Line 10648: ,p_status => ben_manage_life_events.fonm

10644: ,p_ptip_id => l_comp_obj_tree(l_treeele_num).par_ptip_id
10645: ,p_plip_id => l_comp_obj_tree(l_treeele_num).par_plip_id
10646: ,p_pl_id => l_comp_obj_tree(l_treeele_num).par_pl_id
10647: ,p_effective_date => p_effective_date
10648: ,p_status => ben_manage_life_events.fonm
10649: ) ;
10650: hr_utility.set_location (' fonm ' ||ben_manage_life_events.fonm ,30);
10651: end if ;
10652: -- eof FONM

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

10646: ,p_pl_id => l_comp_obj_tree(l_treeele_num).par_pl_id
10647: ,p_effective_date => p_effective_date
10648: ,p_status => ben_manage_life_events.fonm
10649: ) ;
10650: hr_utility.set_location (' fonm ' ||ben_manage_life_events.fonm ,30);
10651: end if ;
10652: -- eof FONM
10653:
10654: -- Set up environment for retrieval of comp object information

Line 10672: l_ptip_fonm := ben_manage_life_events.fonm ;

10668: hr_utility.set_location (' fonm plip ' ||l_comp_obj_tree(l_treeele_num).par_plip_id ,30);
10669: -- if the plip is null then the fonm for ptio
10670: if l_comp_obj_tree(l_treeele_num).par_plip_id is null then
10671:
10672: l_ptip_fonm := ben_manage_life_events.fonm ;
10673: end if ;
10674: else
10675: l_pgm_fonm := ben_manage_life_events.fonm ;
10676: l_ptip_fonm := null ;

Line 10675: l_pgm_fonm := ben_manage_life_events.fonm ;

10671:
10672: l_ptip_fonm := ben_manage_life_events.fonm ;
10673: end if ;
10674: else
10675: l_pgm_fonm := ben_manage_life_events.fonm ;
10676: l_ptip_fonm := null ;
10677: end if ;
10678: --
10679: end if;

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

10830: --
10831: if g_debug then
10832: hr_utility.set_location(' g_defer_deenrol_flag' || g_defer_deenrol_flag, 9653);
10833: end if;
10834: hr_utility.set_location (' FONM : ' || ben_manage_life_events.fonm ,80);
10835: -- BOF FONM
10836: if l_mode in ('L','C') and -- Bug 6390880
10837: ben_manage_life_events.fonm = 'Y' then
10838:

Line 10837: ben_manage_life_events.fonm = 'Y' then

10833: end if;
10834: hr_utility.set_location (' FONM : ' || ben_manage_life_events.fonm ,80);
10835: -- BOF FONM
10836: if l_mode in ('L','C') and -- Bug 6390880
10837: ben_manage_life_events.fonm = 'Y' then
10838:
10839: hr_utility.set_location (' FONM : Begin ',80);
10840: hr_utility.set_location(' l_pgm_id = ' || l_pgm_id, 4444);
10841: hr_utility.set_location(' l_pl_id = ' || l_pl_id, 4444);

Line 10934: ben_manage_life_events.g_fonm_cvg_strt_dt := l_rec_enrt_cvg_strt_dt ;

10930: ben_use_cvg_rt_date.fonm_clear_down_cache;
10931: --
10932: end if;
10933: --
10934: ben_manage_life_events.g_fonm_cvg_strt_dt := l_rec_enrt_cvg_strt_dt ;
10935: l_fonm_cvg_strt_dt := l_rec_enrt_cvg_strt_dt ;
10936: --
10937: hr_utility.set_location(' g_fonm_cvg_strt_dt '||g_fonm_cvg_strt_dt,110);
10938: --

Line 12547: ben_manage_life_events.g_modified_mode := p_mode;

12543: -- person and proceed. Means the mode to be changed on the fly.
12544: -- To make above logic work store the mode in global. Which
12545: -- may change later.
12546: --
12547: ben_manage_life_events.g_modified_mode := p_mode;
12548: --
12549: /* GSP Rate Sync */
12550: p_prtt_cache := 'N' ;
12551: -- begin 4496944

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

12646: end if;
12647: --
12648: -- ABSE : 2652690 : For every absence life event recache the person data.
12649: --
12650: if nvl(ben_manage_life_events.g_modified_mode, p_mode) in ('G', 'M') then
12651: --
12652: ben_person_object.clear_down_cache;
12653: --
12654: end if;

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

12684: (p_person_id => p_person_id,
12685: p_person_action_id => p_person_action_id,
12686: p_object_version_number => p_object_version_number,
12687: p_business_group_id => p_business_group_id,
12688: p_mode => nvl(ben_manage_life_events.g_modified_mode, p_mode),
12689: p_ler_id => l_ler_id,
12690: p_derivable_factors => g_derivable_factors,
12691: p_cbr_tmprl_evt_flag => p_cbr_tmprl_evt_flag,
12692: p_person_count => p_person_count,

Line 13029: end ben_manage_life_events;

13025: benutils.write(p_rec => g_proc_rec);
13026: --
13027: end write_bft_statistics;
13028: --
13029: end ben_manage_life_events;