[Home] [Help]
1: PACKAGE BODY ben_enrolment_requirements1 AS
2: /* $Header: bendenr1.pkb 120.2.12010000.2 2008/08/05 14:38:34 ubhat ship $ */
3: -------------------------------------------------------------------------------
4: /*
5: +=============================================================================+
12: Date Who Version What?
13: ---- --- ------- -----
14: 24 Jan 06 mhoyes 115.0 Created.
15: 13-Feb-05 mhoyes 115.4 - bug5031107. Moved locally defined procedures
16: to ben_enrolment_requirements1.
17: 28-Apr-05 mhoyes 115.5 - bug5152911. Added GetPenPerIDMxESD.
18: Re-wrote cursor c_getpenesd in plsql.
19: */
20: -------------------------------------------------------------------------------
443: (c_bgp_id number
444: ,c_per_id number
445: )
446: is
447: select /*+ c_getpenesd ben_enrolment_requirements1 */
448: rslt.effective_start_date,
449: rslt.enrt_cvg_thru_dt
450: from ben_prtt_enrt_rslt_f rslt,ben_ler_f ler
451: where rslt.person_id = c_per_id
509: ,p_rec_enrt_perd_strt_dt in out nocopy date
510: )
511: IS
512: -- local variables
513: l_proc varchar2 (72) := 'ben_enrolment_requirements1.enrt_perd_strt_dt';
514: l_latest_procd_dt date;
515: l_backed_out_date date;
516: l_latest_enrt_dt date;
517: l_lf_evt_ocrd_dt date := NVL(p_lf_evt_ocrd_dt, p_effective_date);
632: --enrt dt
633: --
634: -- 5152911
635: --
636: ben_enrolment_requirements1.GetPenPerIDMxESD
637: (p_person_id => p_person_id
638: ,p_business_group_id => p_business_group_id
639: --
640: ,p_penmxesd => l_latest_enrt_dt
718: END IF;
719: -- end 2746865
720: END IF;
721: end enrt_perd_strt_dt;
722: END ben_enrolment_requirements1;