1: package body ben_enrollment_process as
2: /* $Header: benenrol.pkb 120.20 2012/01/19 06:27:27 rpahune ship $ */
3: --------------------------------------------------------------------------------
4: /*
5: +==============================================================================+
162: p_ler_id in number,
163: p_life_event_date in date,
164: p_pil out nocopy c_pil%ROWTYPE ) is
165: --
166: l_proc varchar2(60) := 'ben_enrollment_process.get_pil';
167: --
168: l_pil c_pil%ROWTYPE;
169: --
170: begin
200: p_pl_id in number,
201: p_pgm_id in number,
202: p_epe out nocopy c_epe_pl%ROWTYPE ) is
203: --
204: l_proc varchar2(60) := 'ben_enrollment_process.get_epe';
205: l_epe c_epe_pl%ROWTYPE;
206: --
207: begin
208: --Get EPE
270: p_dpnt_person_id in number,
271: p_elig_per_elctbl_chc_id in number,
272: p_egd out nocopy c_egd%ROWTYPE ) is
273: --
274: l_proc varchar2(60) := 'ben_enrollment_process.get_egd';
275: --
276: l_pil c_pil%ROWTYPE;
277: l_epe c_epe_oipl%ROWTYPE;
278: l_egd c_egd%ROWTYPE;
305: procedure check_pen
306: (p_per_in_ler_id in number,
307: p_prtt_enrt_rslt_id in number ) is
308: --
309: l_proc varchar2(60) := 'ben_enrollment_process.check_pen';
310: --
311: cursor c_pen is
312: select 'x'
313: from ben_prtt_enrt_rslt_f pen
354: p_organization_id in number,
355: p_prtt_enrt_rslt_id in number,
356: p_bnf out nocopy c_bnf%ROWTYPE ) is
357: --
358: l_proc varchar2(60) := 'ben_enrollment_process.get_pbn';
359: --
360: l_bnf c_bnf%ROWTYPE;
361: --
362: begin
658: ,p_enrt_cvg_thru_dt in date default null
659: ,p_orgnl_enrt_dt in date default null ) is
660: --
661: --
662: l_proc varchar2(60) := 'ben_enrollment_process.enrollment_information_detail';
663: l_suspend_flag varchar2(30);
664: l_dpnt_actn_warning boolean;
665: l_bnf_actn_warning boolean;
666: l_ctfn_actn_warning boolean;
792: hr_utility.set_location('Entering:'||l_proc, 20);
793: --
794: fnd_file.put_line
795: (which => fnd_file.log,
796: buff => 'Entering - BEN_ENROLLMENT_PROCESS.ENROLLMENT_INFORMATION_DETAIL' );
797: fnd_file.put_line
798: (which => fnd_file.log,
799: buff => 'l_person_id '||p_person_id||' l_pgm_id '||p_pgm_id||' l_pl_id '||p_pl_id);
800: --
1977: ,p_orgnl_enrt_dt in date default null
1978: ,p_proc_cd in varchar2 default null
1979: ,p_record_typ_cd in varchar2 ) IS
1980: --
1981: l_proc varchar2(60) := 'ben_enrollment_process.create_enrollment' ;
1982: --
1983: begin
1984: --
1985: hr_utility.set_location('Entering:'||l_proc||':'||p_record_typ_cd, 20);
2122: ,p_cvg_thru_dt in date default null
2123: ,p_multi_row_actn in boolean default false
2124: ,p_record_typ_cd in varchar2 ) is
2125: --
2126: l_proc varchar2(60) := 'ben_enrollment_process.process_dependent';
2127: --
2128: l_pil c_pil%ROWTYPE;
2129: --
2130: l_epe c_epe_oipl%ROWTYPE;
2209: END IF;
2210: --
2211: fnd_file.put_line
2212: (which => fnd_file.log,
2213: buff => 'Entering - BEN_ENROLLMENT_PROCESS.PROCESS_DEPENDENT' );
2214: fnd_file.put_line
2215: (which => fnd_file.log,
2216: buff => 'l_person_id '||l_person_id||' l_pgm_id '||l_pgm_id||' l_pl_id '||l_pl_id);
2217: --
2608: END IF;
2609: --
2610: fnd_file.put_line
2611: (which => fnd_file.log,
2612: buff => 'Entering - ben_enrollment_process.process_beneficiary' );
2613: --
2614: fnd_file.put_line
2615: (which => fnd_file.log,
2616: buff => 'l_person_id '||l_person_id||' l_pgm_id '||l_pgm_id||' l_pl_id '||l_pl_id);
2842: END IF;
2843: --
2844: end process_beneficiary ;
2845: --
2846: end ben_enrollment_process;