62: --
63: -- Declare cursors and local variables
64: --
65: l_prtn_elig_id number;
66: l_prtn_eligy_rl_id ben_prtn_eligy_rl_f.prtn_eligy_rl_id%TYPE;
67: l_effective_start_date ben_prtn_eligy_rl_f.effective_start_date%TYPE;
68: l_effective_end_date ben_prtn_eligy_rl_f.effective_end_date%TYPE;
69: l_proc varchar2(72) := g_package||'create_ELIGIBILITY_RULE';
70: l_object_version_number ben_prtn_eligy_rl_f.object_version_number%TYPE;
63: -- Declare cursors and local variables
64: --
65: l_prtn_elig_id number;
66: l_prtn_eligy_rl_id ben_prtn_eligy_rl_f.prtn_eligy_rl_id%TYPE;
67: l_effective_start_date ben_prtn_eligy_rl_f.effective_start_date%TYPE;
68: l_effective_end_date ben_prtn_eligy_rl_f.effective_end_date%TYPE;
69: l_proc varchar2(72) := g_package||'create_ELIGIBILITY_RULE';
70: l_object_version_number ben_prtn_eligy_rl_f.object_version_number%TYPE;
71: --
64: --
65: l_prtn_elig_id number;
66: l_prtn_eligy_rl_id ben_prtn_eligy_rl_f.prtn_eligy_rl_id%TYPE;
67: l_effective_start_date ben_prtn_eligy_rl_f.effective_start_date%TYPE;
68: l_effective_end_date ben_prtn_eligy_rl_f.effective_end_date%TYPE;
69: l_proc varchar2(72) := g_package||'create_ELIGIBILITY_RULE';
70: l_object_version_number ben_prtn_eligy_rl_f.object_version_number%TYPE;
71: --
72: begin
66: l_prtn_eligy_rl_id ben_prtn_eligy_rl_f.prtn_eligy_rl_id%TYPE;
67: l_effective_start_date ben_prtn_eligy_rl_f.effective_start_date%TYPE;
68: l_effective_end_date ben_prtn_eligy_rl_f.effective_end_date%TYPE;
69: l_proc varchar2(72) := g_package||'create_ELIGIBILITY_RULE';
70: l_object_version_number ben_prtn_eligy_rl_f.object_version_number%TYPE;
71: --
72: begin
73: --
74: hr_utility.set_location('Entering:'|| l_proc, 10);
266: set c.elig_apls_flag = 'Y'
267: where exists
268: (select a.pgm_id
269: from ben_prtn_elig_f a,
270: ben_prtn_eligy_rl_f b
271: where b.prtn_eligy_rl_id = l_prtn_eligy_rl_id
272: and a.prtn_elig_id = b.prtn_elig_id
273: and a.pgm_id = c.pgm_id);
274: --
277: set c.elig_apls_flag = 'Y'
278: where exists
279: (select a.plip_id
280: from ben_prtn_elig_f a,
281: ben_prtn_eligy_rl_f b
282: where b.prtn_eligy_rl_id = l_prtn_eligy_rl_id
283: and a.prtn_elig_id = b.prtn_elig_id
284: and a.plip_id = c.plip_id);
285: --
288: set c.elig_apls_flag = 'Y'
289: where exists
290: (select a.ptip_id
291: from ben_prtn_elig_f a,
292: ben_prtn_eligy_rl_f b
293: where b.prtn_eligy_rl_id = l_prtn_eligy_rl_id
294: and a.prtn_elig_id = b.prtn_elig_id
295: and a.ptip_id = c.ptip_id);
296: --
299: set c.elig_apls_flag = 'Y'
300: where exists
301: (select a.pl_id
302: from ben_prtn_elig_f a,
303: ben_prtn_eligy_rl_f b
304: where b.prtn_eligy_rl_id = l_prtn_eligy_rl_id
305: and a.prtn_elig_id = b.prtn_elig_id
306: and a.pl_id = c.pl_id);
307: --
310: set c.elig_apls_flag = 'Y'
311: where exists
312: (select a.oipl_id
313: from ben_prtn_elig_f a,
314: ben_prtn_eligy_rl_f b
315: where b.prtn_eligy_rl_id = l_prtn_eligy_rl_id
316: and a.prtn_elig_id = b.prtn_elig_id
317: and a.oipl_id = c.oipl_id);
318: --
413: --
414: -- Declare cursors and local variables
415: --
416: l_proc varchar2(72) := g_package||'update_ELIGIBILITY_RULE';
417: l_object_version_number ben_prtn_eligy_rl_f.object_version_number%TYPE;
418: l_effective_start_date ben_prtn_eligy_rl_f.effective_start_date%TYPE;
419: l_effective_end_date ben_prtn_eligy_rl_f.effective_end_date%TYPE;
420: --
421: begin
414: -- Declare cursors and local variables
415: --
416: l_proc varchar2(72) := g_package||'update_ELIGIBILITY_RULE';
417: l_object_version_number ben_prtn_eligy_rl_f.object_version_number%TYPE;
418: l_effective_start_date ben_prtn_eligy_rl_f.effective_start_date%TYPE;
419: l_effective_end_date ben_prtn_eligy_rl_f.effective_end_date%TYPE;
420: --
421: begin
422: --
415: --
416: l_proc varchar2(72) := g_package||'update_ELIGIBILITY_RULE';
417: l_object_version_number ben_prtn_eligy_rl_f.object_version_number%TYPE;
418: l_effective_start_date ben_prtn_eligy_rl_f.effective_start_date%TYPE;
419: l_effective_end_date ben_prtn_eligy_rl_f.effective_end_date%TYPE;
420: --
421: begin
422: --
423: hr_utility.set_location('Entering:'|| l_proc, 10);
657: --
658: -- Declare cursors and local variables
659: --
660: l_proc varchar2(72) := g_package||'update_ELIGIBILITY_RULE';
661: l_object_version_number ben_prtn_eligy_rl_f.object_version_number%TYPE;
662: l_effective_start_date ben_prtn_eligy_rl_f.effective_start_date%TYPE;
663: l_effective_end_date ben_prtn_eligy_rl_f.effective_end_date%TYPE;
664: --
665: cursor c1 is
658: -- Declare cursors and local variables
659: --
660: l_proc varchar2(72) := g_package||'update_ELIGIBILITY_RULE';
661: l_object_version_number ben_prtn_eligy_rl_f.object_version_number%TYPE;
662: l_effective_start_date ben_prtn_eligy_rl_f.effective_start_date%TYPE;
663: l_effective_end_date ben_prtn_eligy_rl_f.effective_end_date%TYPE;
664: --
665: cursor c1 is
666: select pgm_id,
659: --
660: l_proc varchar2(72) := g_package||'update_ELIGIBILITY_RULE';
661: l_object_version_number ben_prtn_eligy_rl_f.object_version_number%TYPE;
662: l_effective_start_date ben_prtn_eligy_rl_f.effective_start_date%TYPE;
663: l_effective_end_date ben_prtn_eligy_rl_f.effective_end_date%TYPE;
664: --
665: cursor c1 is
666: select pgm_id,
667: ptip_id,
668: plip_id,
669: pl_id,
670: oipl_id
671: from ben_prtn_elig_f a,
672: ben_prtn_eligy_rl_f b
673: where a.prtn_elig_id = b.prtn_elig_id
674: and b.prtn_eligy_rl_id = p_prtn_eligy_rl_id;
675: --
676: l_c1 c1%rowtype;
765: and c.pgm_id = a.pgm_id)
766: and not exists
767: (select a.pgm_id
768: from ben_prtn_elig_f a,
769: ben_prtn_eligy_rl_f b
770: where a.prtn_elig_id = b.prtn_elig_id
771: and c.pgm_id = a.pgm_id)
772: and c.pgm_id = l_c1.pgm_id;
773: --
785: and c.plip_id = a.plip_id)
786: and not exists
787: (select a.plip_id
788: from ben_prtn_elig_f a,
789: ben_prtn_eligy_rl_f b
790: where a.prtn_elig_id = b.prtn_elig_id
791: and c.plip_id = a.plip_id)
792: and c.plip_id = l_c1.plip_id;
793: --
805: and c.ptip_id = a.ptip_id)
806: and not exists
807: (select a.ptip_id
808: from ben_prtn_elig_f a,
809: ben_prtn_eligy_rl_f b
810: where a.prtn_elig_id = b.prtn_elig_id
811: and c.ptip_id = a.ptip_id)
812: and c.ptip_id = l_c1.ptip_id;
813: --
825: and c.pl_id = a.pl_id)
826: and not exists
827: (select a.pl_id
828: from ben_prtn_elig_f a,
829: ben_prtn_eligy_rl_f b
830: where a.prtn_elig_id = b.prtn_elig_id
831: and c.pl_id = a.pl_id)
832: and c.pl_id = l_c1.pl_id;
833: --
845: and c.oipl_id = a.oipl_id)
846: and not exists
847: (select a.oipl_id
848: from ben_prtn_elig_f a,
849: ben_prtn_eligy_rl_f b
850: where a.prtn_elig_id = b.prtn_elig_id
851: and c.oipl_id = a.oipl_id)
852: and c.oipl_id = l_c1.oipl_id;
853: --