DBA Data[Home] [Help]

APPS.BEN_ENROLMENT_REQUIREMENTS1 dependencies on HR_UTILITY

Line 163: g_debug := hr_utility.debug_enabled;

159: ptip_stl_elig_cant_chg_flag ben_ler_chg_ptip_enrt_f.stl_elig_cant_chg_flag%TYPE;
160: ptip_tco_chg_enrt_cd ben_ler_chg_ptip_enrt_f.tco_chg_enrt_cd%TYPE;
161: BEGIN
162: --
163: g_debug := hr_utility.debug_enabled;
164: --
165: -- ============================================
166: -- open,fetch and close each cursor if required
167: -- ============================================

Line 261: hr_utility.set_location( 'oipl' || oipl_enrt_cd , 10) ;

257: -- set: p_enrt_cd and p_enrt_rl
258: -- ----------------------------
259: --
260: if g_debug then
261: hr_utility.set_location( 'oipl' || oipl_enrt_cd , 10) ;
262: hr_utility.set_location( 'pl' || pnip_enrt_cd , 10) ;
263: hr_utility.set_location( 'plip' || plip_enrt_cd , 10);
264: hr_utility.set_location( 'ptip' || ptip_enrt_cd , 10) ;
265: hr_utility.set_location( 'oipl id ' || p_oipl_id , 10) ;

Line 262: hr_utility.set_location( 'pl' || pnip_enrt_cd , 10) ;

258: -- ----------------------------
259: --
260: if g_debug then
261: hr_utility.set_location( 'oipl' || oipl_enrt_cd , 10) ;
262: hr_utility.set_location( 'pl' || pnip_enrt_cd , 10) ;
263: hr_utility.set_location( 'plip' || plip_enrt_cd , 10);
264: hr_utility.set_location( 'ptip' || ptip_enrt_cd , 10) ;
265: hr_utility.set_location( 'oipl id ' || p_oipl_id , 10) ;
266: hr_utility.set_location( 'ptip id ' || p_ptip_id , 10) ;

Line 263: hr_utility.set_location( 'plip' || plip_enrt_cd , 10);

259: --
260: if g_debug then
261: hr_utility.set_location( 'oipl' || oipl_enrt_cd , 10) ;
262: hr_utility.set_location( 'pl' || pnip_enrt_cd , 10) ;
263: hr_utility.set_location( 'plip' || plip_enrt_cd , 10);
264: hr_utility.set_location( 'ptip' || ptip_enrt_cd , 10) ;
265: hr_utility.set_location( 'oipl id ' || p_oipl_id , 10) ;
266: hr_utility.set_location( 'ptip id ' || p_ptip_id , 10) ;
267: hr_utility.set_location( 'plip id ' || p_plip_id , 10) ;

Line 264: hr_utility.set_location( 'ptip' || ptip_enrt_cd , 10) ;

260: if g_debug then
261: hr_utility.set_location( 'oipl' || oipl_enrt_cd , 10) ;
262: hr_utility.set_location( 'pl' || pnip_enrt_cd , 10) ;
263: hr_utility.set_location( 'plip' || plip_enrt_cd , 10);
264: hr_utility.set_location( 'ptip' || ptip_enrt_cd , 10) ;
265: hr_utility.set_location( 'oipl id ' || p_oipl_id , 10) ;
266: hr_utility.set_location( 'ptip id ' || p_ptip_id , 10) ;
267: hr_utility.set_location( 'plip id ' || p_plip_id , 10) ;
268: end if;

Line 265: hr_utility.set_location( 'oipl id ' || p_oipl_id , 10) ;

261: hr_utility.set_location( 'oipl' || oipl_enrt_cd , 10) ;
262: hr_utility.set_location( 'pl' || pnip_enrt_cd , 10) ;
263: hr_utility.set_location( 'plip' || plip_enrt_cd , 10);
264: hr_utility.set_location( 'ptip' || ptip_enrt_cd , 10) ;
265: hr_utility.set_location( 'oipl id ' || p_oipl_id , 10) ;
266: hr_utility.set_location( 'ptip id ' || p_ptip_id , 10) ;
267: hr_utility.set_location( 'plip id ' || p_plip_id , 10) ;
268: end if;
269: --

Line 266: hr_utility.set_location( 'ptip id ' || p_ptip_id , 10) ;

262: hr_utility.set_location( 'pl' || pnip_enrt_cd , 10) ;
263: hr_utility.set_location( 'plip' || plip_enrt_cd , 10);
264: hr_utility.set_location( 'ptip' || ptip_enrt_cd , 10) ;
265: hr_utility.set_location( 'oipl id ' || p_oipl_id , 10) ;
266: hr_utility.set_location( 'ptip id ' || p_ptip_id , 10) ;
267: hr_utility.set_location( 'plip id ' || p_plip_id , 10) ;
268: end if;
269: --
270: IF oipl_enrt_cd IS NULL THEN

Line 267: hr_utility.set_location( 'plip id ' || p_plip_id , 10) ;

263: hr_utility.set_location( 'plip' || plip_enrt_cd , 10);
264: hr_utility.set_location( 'ptip' || ptip_enrt_cd , 10) ;
265: hr_utility.set_location( 'oipl id ' || p_oipl_id , 10) ;
266: hr_utility.set_location( 'ptip id ' || p_ptip_id , 10) ;
267: hr_utility.set_location( 'plip id ' || p_plip_id , 10) ;
268: end if;
269: --
270: IF oipl_enrt_cd IS NULL THEN
271: IF pnip_enrt_cd IS NULL THEN

Line 299: hr_utility.set_location( 'p_enrt_cd_level ' || p_enrt_cd_level , 10) ;

295: p_enrt_cd_level := 'OIPL' ;
296: END IF;
297: --
298: if g_debug then
299: hr_utility.set_location( 'p_enrt_cd_level ' || p_enrt_cd_level , 10) ;
300: end if;
301: --
302: IF p_just_prclds_chg_flag THEN
303: RETURN;

Line 408: hr_utility.set_location( 'p_enrt_cd_level ' || p_enrt_cd_level , 10) ;

404: END IF;
405: END IF;
406: --
407: if g_debug then
408: hr_utility.set_location( 'p_enrt_cd_level ' || p_enrt_cd_level , 10) ;
409: end if;
410: --
411: exception
412: --

Line 593: hr_utility.set_location(' Entering '||l_proc, 10);

589: -------------------------------------------------------------------------
590: -- if cd is L_EPSD_PEPD, use the old logic
591: --
592: if g_debug then
593: hr_utility.set_location(' Entering '||l_proc, 10);
594: --
595: -- remove all these debug messages
596: hr_utility.set_location(' p_enrt_perd_det_ovrlp_bckdt_cd is '||p_enrt_perd_det_ovrlp_bckdt_cd, 987);
597: hr_utility.set_location(' p_person_id '||p_person_id, 10);

Line 596: hr_utility.set_location(' p_enrt_perd_det_ovrlp_bckdt_cd is '||p_enrt_perd_det_ovrlp_bckdt_cd, 987);

592: if g_debug then
593: hr_utility.set_location(' Entering '||l_proc, 10);
594: --
595: -- remove all these debug messages
596: hr_utility.set_location(' p_enrt_perd_det_ovrlp_bckdt_cd is '||p_enrt_perd_det_ovrlp_bckdt_cd, 987);
597: hr_utility.set_location(' p_person_id '||p_person_id, 10);
598: hr_utility.set_location(' p_lf_evt_ocrd_dt '||p_lf_evt_ocrd_dt, 10);
599: hr_utility.set_location(' p_ler_id '||p_ler_id, 10);
600: hr_utility.set_location(' p_effective_date '||p_effective_date, 10);

Line 597: hr_utility.set_location(' p_person_id '||p_person_id, 10);

593: hr_utility.set_location(' Entering '||l_proc, 10);
594: --
595: -- remove all these debug messages
596: hr_utility.set_location(' p_enrt_perd_det_ovrlp_bckdt_cd is '||p_enrt_perd_det_ovrlp_bckdt_cd, 987);
597: hr_utility.set_location(' p_person_id '||p_person_id, 10);
598: hr_utility.set_location(' p_lf_evt_ocrd_dt '||p_lf_evt_ocrd_dt, 10);
599: hr_utility.set_location(' p_ler_id '||p_ler_id, 10);
600: hr_utility.set_location(' p_effective_date '||p_effective_date, 10);
601: hr_utility.set_location(' p_rec_enrt_perd_strt_dt '||p_rec_enrt_perd_strt_dt, 10);

Line 598: hr_utility.set_location(' p_lf_evt_ocrd_dt '||p_lf_evt_ocrd_dt, 10);

594: --
595: -- remove all these debug messages
596: hr_utility.set_location(' p_enrt_perd_det_ovrlp_bckdt_cd is '||p_enrt_perd_det_ovrlp_bckdt_cd, 987);
597: hr_utility.set_location(' p_person_id '||p_person_id, 10);
598: hr_utility.set_location(' p_lf_evt_ocrd_dt '||p_lf_evt_ocrd_dt, 10);
599: hr_utility.set_location(' p_ler_id '||p_ler_id, 10);
600: hr_utility.set_location(' p_effective_date '||p_effective_date, 10);
601: hr_utility.set_location(' p_rec_enrt_perd_strt_dt '||p_rec_enrt_perd_strt_dt, 10);
602: end if;

Line 599: hr_utility.set_location(' p_ler_id '||p_ler_id, 10);

595: -- remove all these debug messages
596: hr_utility.set_location(' p_enrt_perd_det_ovrlp_bckdt_cd is '||p_enrt_perd_det_ovrlp_bckdt_cd, 987);
597: hr_utility.set_location(' p_person_id '||p_person_id, 10);
598: hr_utility.set_location(' p_lf_evt_ocrd_dt '||p_lf_evt_ocrd_dt, 10);
599: hr_utility.set_location(' p_ler_id '||p_ler_id, 10);
600: hr_utility.set_location(' p_effective_date '||p_effective_date, 10);
601: hr_utility.set_location(' p_rec_enrt_perd_strt_dt '||p_rec_enrt_perd_strt_dt, 10);
602: end if;
603: --

Line 600: hr_utility.set_location(' p_effective_date '||p_effective_date, 10);

596: hr_utility.set_location(' p_enrt_perd_det_ovrlp_bckdt_cd is '||p_enrt_perd_det_ovrlp_bckdt_cd, 987);
597: hr_utility.set_location(' p_person_id '||p_person_id, 10);
598: hr_utility.set_location(' p_lf_evt_ocrd_dt '||p_lf_evt_ocrd_dt, 10);
599: hr_utility.set_location(' p_ler_id '||p_ler_id, 10);
600: hr_utility.set_location(' p_effective_date '||p_effective_date, 10);
601: hr_utility.set_location(' p_rec_enrt_perd_strt_dt '||p_rec_enrt_perd_strt_dt, 10);
602: end if;
603: --
604:

Line 601: hr_utility.set_location(' p_rec_enrt_perd_strt_dt '||p_rec_enrt_perd_strt_dt, 10);

597: hr_utility.set_location(' p_person_id '||p_person_id, 10);
598: hr_utility.set_location(' p_lf_evt_ocrd_dt '||p_lf_evt_ocrd_dt, 10);
599: hr_utility.set_location(' p_ler_id '||p_ler_id, 10);
600: hr_utility.set_location(' p_effective_date '||p_effective_date, 10);
601: hr_utility.set_location(' p_rec_enrt_perd_strt_dt '||p_rec_enrt_perd_strt_dt, 10);
602: end if;
603: --
604:
605: IF nvl(p_enrt_perd_det_ovrlp_bckdt_cd, 'L_EPSD_PEPD') = 'L_EPSD_PEPD' THEN

Line 607: hr_utility.set_location(' L_EPSD_PEPD', 987);

603: --
604:
605: IF nvl(p_enrt_perd_det_ovrlp_bckdt_cd, 'L_EPSD_PEPD') = 'L_EPSD_PEPD' THEN
606: --
607: hr_utility.set_location(' L_EPSD_PEPD', 987);
608: OPEN c_get_latest_procd_dt;
609: FETCH c_get_latest_procd_dt INTO l_latest_procd_dt;
610: -- new epsd is greater of epsd or latest_procd_dt
611: -- IF c_get_latest_procd_dt%FOUND THEN

Line 613: hr_utility.set_location(' c_get_latest_procd_dt%found', 987);

609: FETCH c_get_latest_procd_dt INTO l_latest_procd_dt;
610: -- new epsd is greater of epsd or latest_procd_dt
611: -- IF c_get_latest_procd_dt%FOUND THEN
612: IF l_latest_procd_dt IS NOT NULL THEN
613: hr_utility.set_location(' c_get_latest_procd_dt%found', 987);
614: hr_utility.set_location('l_latest_procd_dt is '||l_latest_procd_dt, 987);
615: -- jcarpent 1/4/2001 bug 1568555, removed +1 from line below
616: IF p_rec_enrt_perd_strt_dt < l_latest_procd_dt THEN
617: hr_utility.set_location('l_latest_procd_dt made enrt strt dt ', 987);

Line 614: hr_utility.set_location('l_latest_procd_dt is '||l_latest_procd_dt, 987);

610: -- new epsd is greater of epsd or latest_procd_dt
611: -- IF c_get_latest_procd_dt%FOUND THEN
612: IF l_latest_procd_dt IS NOT NULL THEN
613: hr_utility.set_location(' c_get_latest_procd_dt%found', 987);
614: hr_utility.set_location('l_latest_procd_dt is '||l_latest_procd_dt, 987);
615: -- jcarpent 1/4/2001 bug 1568555, removed +1 from line below
616: IF p_rec_enrt_perd_strt_dt < l_latest_procd_dt THEN
617: hr_utility.set_location('l_latest_procd_dt made enrt strt dt ', 987);
618: -- jcarpent 1/4/2001 bug 1568555, removed +1 from line below

Line 617: hr_utility.set_location('l_latest_procd_dt made enrt strt dt ', 987);

613: hr_utility.set_location(' c_get_latest_procd_dt%found', 987);
614: hr_utility.set_location('l_latest_procd_dt is '||l_latest_procd_dt, 987);
615: -- jcarpent 1/4/2001 bug 1568555, removed +1 from line below
616: IF p_rec_enrt_perd_strt_dt < l_latest_procd_dt THEN
617: hr_utility.set_location('l_latest_procd_dt made enrt strt dt ', 987);
618: -- jcarpent 1/4/2001 bug 1568555, removed +1 from line below
619: p_rec_enrt_perd_strt_dt := l_latest_procd_dt;
620: -- if the enrollment exist for the previous LE
621: -- start the window latest_procd_dt + 1

Line 661: hr_utility.set_location(' c_backed_out_ler%found', 987);

657: OPEN c_backed_out_ler;
658: FETCH c_backed_out_ler INTO l_backed_out_date;
659: --IF c_backed_out_ler%FOUND THEN
660: IF l_backed_out_date is NOT NULL THEN
661: hr_utility.set_location(' c_backed_out_ler%found', 987);
662: hr_utility.set_location('l_backed_out_date is '||l_backed_out_date, 987);
663: -- 5a ... and is the backed-out date > than the new epsd?
664: IF l_backed_out_date > p_rec_enrt_perd_strt_dt THEN
665: hr_utility.set_location('l_backed_out_date made enrt strt dt ', 987);

Line 662: hr_utility.set_location('l_backed_out_date is '||l_backed_out_date, 987);

658: FETCH c_backed_out_ler INTO l_backed_out_date;
659: --IF c_backed_out_ler%FOUND THEN
660: IF l_backed_out_date is NOT NULL THEN
661: hr_utility.set_location(' c_backed_out_ler%found', 987);
662: hr_utility.set_location('l_backed_out_date is '||l_backed_out_date, 987);
663: -- 5a ... and is the backed-out date > than the new epsd?
664: IF l_backed_out_date > p_rec_enrt_perd_strt_dt THEN
665: hr_utility.set_location('l_backed_out_date made enrt strt dt ', 987);
666: -- 6 it is the new epsd.

Line 665: hr_utility.set_location('l_backed_out_date made enrt strt dt ', 987);

661: hr_utility.set_location(' c_backed_out_ler%found', 987);
662: hr_utility.set_location('l_backed_out_date is '||l_backed_out_date, 987);
663: -- 5a ... and is the backed-out date > than the new epsd?
664: IF l_backed_out_date > p_rec_enrt_perd_strt_dt THEN
665: hr_utility.set_location('l_backed_out_date made enrt strt dt ', 987);
666: -- 6 it is the new epsd.
667: p_rec_enrt_perd_strt_dt := l_backed_out_date;
668: END IF;
669: END IF;

Line 675: hr_utility.set_location(' L_EPSD_PEESD%', 987);

671: END IF;
672: -- 2746865
673: -- if cd is L_EPSD_PEESD%, use the new logic
674: ELSIF p_enrt_perd_det_ovrlp_bckdt_cd like 'L_EPSD_PEESD%' THEN
675: hr_utility.set_location(' L_EPSD_PEESD%', 987);
676: -- get the person's latest enrollment start date +1
677: OPEN c_get_latest_enrt_dt;
678: FETCH c_get_latest_enrt_dt into l_latest_enrt_dt;
679: -- IF c_get_latest_enrt_dt%FOUND THEN --changed as its always found

Line 681: hr_utility.set_location(' c_get_latest_enrt_dt%FOUND', 987);

677: OPEN c_get_latest_enrt_dt;
678: FETCH c_get_latest_enrt_dt into l_latest_enrt_dt;
679: -- IF c_get_latest_enrt_dt%FOUND THEN --changed as its always found
680: IF l_latest_enrt_dt is not null THEN
681: hr_utility.set_location(' c_get_latest_enrt_dt%FOUND', 987);
682: hr_utility.set_location('l_latest_enrt_dt is '||l_latest_enrt_dt, 987);
683: -- if latest enrt dt is greater than epsd, make it the epsd
684: IF l_latest_enrt_dt > p_rec_enrt_perd_strt_dt THEN
685: p_rec_enrt_perd_strt_dt := l_latest_enrt_dt;

Line 682: hr_utility.set_location('l_latest_enrt_dt is '||l_latest_enrt_dt, 987);

678: FETCH c_get_latest_enrt_dt into l_latest_enrt_dt;
679: -- IF c_get_latest_enrt_dt%FOUND THEN --changed as its always found
680: IF l_latest_enrt_dt is not null THEN
681: hr_utility.set_location(' c_get_latest_enrt_dt%FOUND', 987);
682: hr_utility.set_location('l_latest_enrt_dt is '||l_latest_enrt_dt, 987);
683: -- if latest enrt dt is greater than epsd, make it the epsd
684: IF l_latest_enrt_dt > p_rec_enrt_perd_strt_dt THEN
685: p_rec_enrt_perd_strt_dt := l_latest_enrt_dt;
686: hr_utility.set_location('l_latest_enrt_dt substituted', 987);

Line 686: hr_utility.set_location('l_latest_enrt_dt substituted', 987);

682: hr_utility.set_location('l_latest_enrt_dt is '||l_latest_enrt_dt, 987);
683: -- if latest enrt dt is greater than epsd, make it the epsd
684: IF l_latest_enrt_dt > p_rec_enrt_perd_strt_dt THEN
685: p_rec_enrt_perd_strt_dt := l_latest_enrt_dt;
686: hr_utility.set_location('l_latest_enrt_dt substituted', 987);
687: END IF;
688: END IF;
689: CLOSE c_get_latest_enrt_dt;
690: -- cd is 2 find the bckdt out dt

Line 692: hr_utility.set_location('L_EPSD_PEESD_BCKDT entered', 987);

688: END IF;
689: CLOSE c_get_latest_enrt_dt;
690: -- cd is 2 find the bckdt out dt
691: IF p_enrt_perd_det_ovrlp_bckdt_cd = 'L_EPSD_PEESD_BCKDT' THEN
692: hr_utility.set_location('L_EPSD_PEESD_BCKDT entered', 987);
693: -- get the backed out date
694: OPEN c_backed_out_ler;
695: FETCH c_backed_out_ler INTO l_backed_out_date;
696: hr_utility.set_location('l_backed_out_date is '||l_backed_out_date, 987);

Line 696: hr_utility.set_location('l_backed_out_date is '||l_backed_out_date, 987);

692: hr_utility.set_location('L_EPSD_PEESD_BCKDT entered', 987);
693: -- get the backed out date
694: OPEN c_backed_out_ler;
695: FETCH c_backed_out_ler INTO l_backed_out_date;
696: hr_utility.set_location('l_backed_out_date is '||l_backed_out_date, 987);
697: --IF c_backed_out_ler%FOUND THEN -- changed as its of no use
698: IF l_backed_out_date is not null THEN
699: hr_utility.set_location('bckdt%found', 987);
700: -- if bckdt out dt is greater than epsd, make it the epsd

Line 699: hr_utility.set_location('bckdt%found', 987);

695: FETCH c_backed_out_ler INTO l_backed_out_date;
696: hr_utility.set_location('l_backed_out_date is '||l_backed_out_date, 987);
697: --IF c_backed_out_ler%FOUND THEN -- changed as its of no use
698: IF l_backed_out_date is not null THEN
699: hr_utility.set_location('bckdt%found', 987);
700: -- if bckdt out dt is greater than epsd, make it the epsd
701: IF l_backed_out_date > p_rec_enrt_perd_strt_dt THEN
702: p_rec_enrt_perd_strt_dt := l_backed_out_date;
703: hr_utility.set_location('l_backed_out_date substituted', 987);

Line 703: hr_utility.set_location('l_backed_out_date substituted', 987);

699: hr_utility.set_location('bckdt%found', 987);
700: -- if bckdt out dt is greater than epsd, make it the epsd
701: IF l_backed_out_date > p_rec_enrt_perd_strt_dt THEN
702: p_rec_enrt_perd_strt_dt := l_backed_out_date;
703: hr_utility.set_location('l_backed_out_date substituted', 987);
704: END IF;
705: END IF;
706: CLOSE c_backed_out_ler;
707: -- if cd is 4, compare epsd with sysdate

Line 709: hr_utility.set_location('L_EPSD_PEESD_SYSDT entered', 987);

705: END IF;
706: CLOSE c_backed_out_ler;
707: -- if cd is 4, compare epsd with sysdate
708: ELSIF p_enrt_perd_det_ovrlp_bckdt_cd = 'L_EPSD_PEESD_SYSDT' THEN
709: hr_utility.set_location('L_EPSD_PEESD_SYSDT entered', 987);
710: -- if sysdate is lis greater than epsd, make it the epsd
711: IF l_sysdate > p_rec_enrt_perd_strt_dt THEN
712: p_rec_enrt_perd_strt_dt := l_sysdate;
713: --

Line 715: hr_utility.set_location('sysdate substituted', 987);

711: IF l_sysdate > p_rec_enrt_perd_strt_dt THEN
712: p_rec_enrt_perd_strt_dt := l_sysdate;
713: --
714: if g_debug then
715: hr_utility.set_location('sysdate substituted', 987);
716: end if;
717: END IF;
718: END IF;
719: -- end 2746865