DBA Data[Home] [Help]

APPS.BEN_DETERMINE_CHC_CTFN dependencies on HR_UTILITY

Line 148: hr_utility.set_location ('Entering '||l_package,5);

144: l_dummy varchar2(1);
145:
146: Begin
147:
148: hr_utility.set_location ('Entering '||l_package,5);
149: hr_utility.set_location ('p_elig_per_elctbl_chc_id '||
150: to_char(p_elig_per_elctbl_chc_id),5);
151: hr_utility.set_location ('p_enrt_bnft_id '||
152: to_char(p_enrt_bnft_id),5);

Line 149: hr_utility.set_location ('p_elig_per_elctbl_chc_id '||

145:
146: Begin
147:
148: hr_utility.set_location ('Entering '||l_package,5);
149: hr_utility.set_location ('p_elig_per_elctbl_chc_id '||
150: to_char(p_elig_per_elctbl_chc_id),5);
151: hr_utility.set_location ('p_enrt_bnft_id '||
152: to_char(p_enrt_bnft_id),5);
153: hr_utility.set_location ('p_enrt_ctfn_typ_cd '||

Line 151: hr_utility.set_location ('p_enrt_bnft_id '||

147:
148: hr_utility.set_location ('Entering '||l_package,5);
149: hr_utility.set_location ('p_elig_per_elctbl_chc_id '||
150: to_char(p_elig_per_elctbl_chc_id),5);
151: hr_utility.set_location ('p_enrt_bnft_id '||
152: to_char(p_enrt_bnft_id),5);
153: hr_utility.set_location ('p_enrt_ctfn_typ_cd '||
154: p_enrt_ctfn_typ_cd,5);
155:

Line 153: hr_utility.set_location ('p_enrt_ctfn_typ_cd '||

149: hr_utility.set_location ('p_elig_per_elctbl_chc_id '||
150: to_char(p_elig_per_elctbl_chc_id),5);
151: hr_utility.set_location ('p_enrt_bnft_id '||
152: to_char(p_enrt_bnft_id),5);
153: hr_utility.set_location ('p_enrt_ctfn_typ_cd '||
154: p_enrt_ctfn_typ_cd,5);
155:
156: -- if this certificaion type cd has already been attached to the choice,
157: -- don't attach another one. This prevents problems with bad plan

Line 162: hr_utility.set_location ('found ctfn ',5);

158: -- design setup.
159: open c1;
160: fetch c1 into l_dummy;
161: if c1%FOUND and p_mode not in ('U','R') then
162: hr_utility.set_location ('found ctfn ',5);
163: close c1;
164: else
165: close c1;
166: l_write_ctfn := false;

Line 250: hr_utility.set_location ('Leaving '||l_package,10);

246: --
247: end if;
248: end if;
249:
250: hr_utility.set_location ('Leaving '||l_package,10);
251:
252: end write_ctfn;
253: --
254: --

Line 296: hr_utility.set_location ('Entering '||l_package,10);

292: ctfn.effective_start_date and ctfn.effective_end_date;
293: --
294: begin
295: --
296: hr_utility.set_location ('Entering '||l_package,10);
297: --
298: l_create_ctfn := false;
299: --
300: if p_ctfn_rqd_when_rl is not null then

Line 354: hr_utility.set_location ('Leaving '||l_package,10);

350: end loop;
351: --
352: end if;
353: --
354: hr_utility.set_location ('Leaving '||l_package,10);
355: --
356: end get_ler_ctfns;
357: --
358: --

Line 424: hr_utility.set_location ('Entering '||l_package,10);

420: ctfn.effective_start_date and ctfn.effective_end_date;
421: --
422: begin
423: --
424: hr_utility.set_location ('Entering '||l_package,10);
425: --
426: open c_ler_rstrn;
427: fetch c_ler_rstrn into l_ler_bnft_rstrn_id;
428: --

Line 467: hr_utility.set_location ('l_ctfn.enrt_ctfn_typ_cd '||l_ctfn.enrt_ctfn_typ_cd,10);

463: -- Plan Level option jumping certifications.
464: --
465: for l_ctfn in c_pl_rstrn_ctfn loop
466: --
467: hr_utility.set_location ('l_ctfn.enrt_ctfn_typ_cd '||l_ctfn.enrt_ctfn_typ_cd,10);
468:
469: write_ctfn(p_elig_per_elctbl_chc_id => p_elig_per_elctbl_chc_id,
470: p_enrt_ctfn_typ_cd => l_ctfn.enrt_ctfn_typ_cd,
471: p_rqd_flag => l_ctfn.rqd_flag,

Line 491: hr_utility.set_location ('Leaving '||l_package,10);

487: end loop;
488: --
489: end if;
490: --
491: hr_utility.set_location ('Leaving '||l_package,10);
492: --
493: end write_bnft_rstrn_ctfn;
494: --
495: --

Line 508: hr_utility.set_location ('Entering '||l_package,10);

504: l_ctfn_rqd_flag varchar2(30) := 'N';
505: --
506: begin
507: --
508: hr_utility.set_location ('Entering '||l_package,10);
509: --
510: if g_ctfn_created then
511: --
512: l_ctfn_rqd_flag := 'Y';

Line 529: hr_utility.set_location ('Leaving '||l_package,10);

525: p_effective_date => p_effective_date);
526: --
527: end if;
528: --
529: hr_utility.set_location ('Leaving '||l_package,10);
530: --
531: end update_ctfn_rqd_flag;
532: --
533: -------------------------------------------------------------------------

Line 658: hr_utility.set_location ('Entering '||l_package,10);

654: l_jurisdiction_code varchar2(30) := null;
655: --
656: BEGIN
657: --
658: hr_utility.set_location ('Entering '||l_package,10);
659: --
660: -- Edit to ensure that the input p_effective_date has a value
661: --
662: If p_effective_date is null then

Line 723: hr_utility.set_location (l_package||' Start EPE loop ',10);

719: fetch c_epe into l_epe;
720: if c_epe%found then
721: close c_epe;
722: */
723: hr_utility.set_location (l_package||' Start EPE loop ',10);
724: --
725: l_found := false;
726: g_ctfn_created := false;
727: --

Line 728: hr_utility.set_location ('l_ler_id '||l_ler_id,55);

724: --
725: l_found := false;
726: g_ctfn_created := false;
727: --
728: hr_utility.set_location ('l_ler_id '||l_ler_id,55);
729: hr_utility.set_location ('l_pl_id '||l_pl_id,55);
730: hr_utility.set_location ('l_oipl_id '||l_oipl_id,55);
731: hr_utility.set_location ('l_epe.elig_per_elctbl_chc_id '||
732: l_epe.elig_per_elctbl_chc_id,55);

Line 729: hr_utility.set_location ('l_pl_id '||l_pl_id,55);

725: l_found := false;
726: g_ctfn_created := false;
727: --
728: hr_utility.set_location ('l_ler_id '||l_ler_id,55);
729: hr_utility.set_location ('l_pl_id '||l_pl_id,55);
730: hr_utility.set_location ('l_oipl_id '||l_oipl_id,55);
731: hr_utility.set_location ('l_epe.elig_per_elctbl_chc_id '||
732: l_epe.elig_per_elctbl_chc_id,55);
733: hr_utility.set_location ('l_epe.object_version_number '||

Line 730: hr_utility.set_location ('l_oipl_id '||l_oipl_id,55);

726: g_ctfn_created := false;
727: --
728: hr_utility.set_location ('l_ler_id '||l_ler_id,55);
729: hr_utility.set_location ('l_pl_id '||l_pl_id,55);
730: hr_utility.set_location ('l_oipl_id '||l_oipl_id,55);
731: hr_utility.set_location ('l_epe.elig_per_elctbl_chc_id '||
732: l_epe.elig_per_elctbl_chc_id,55);
733: hr_utility.set_location ('l_epe.object_version_number '||
734: l_epe.object_version_number,55);

Line 731: hr_utility.set_location ('l_epe.elig_per_elctbl_chc_id '||

727: --
728: hr_utility.set_location ('l_ler_id '||l_ler_id,55);
729: hr_utility.set_location ('l_pl_id '||l_pl_id,55);
730: hr_utility.set_location ('l_oipl_id '||l_oipl_id,55);
731: hr_utility.set_location ('l_epe.elig_per_elctbl_chc_id '||
732: l_epe.elig_per_elctbl_chc_id,55);
733: hr_utility.set_location ('l_epe.object_version_number '||
734: l_epe.object_version_number,55);
735: --

Line 733: hr_utility.set_location ('l_epe.object_version_number '||

729: hr_utility.set_location ('l_pl_id '||l_pl_id,55);
730: hr_utility.set_location ('l_oipl_id '||l_oipl_id,55);
731: hr_utility.set_location ('l_epe.elig_per_elctbl_chc_id '||
732: l_epe.elig_per_elctbl_chc_id,55);
733: hr_utility.set_location ('l_epe.object_version_number '||
734: l_epe.object_version_number,55);
735: --
736: l_pl_id := l_epe.pl_id;
737: l_ler_id := l_epe.ler_id;

Line 745: hr_utility.set_location ('Entering oipl ',99);

741: If l_epe.comp_lvl_cd = 'OIPL' then
742: --
743: -- process ler rqrd ctfn if found for oipl
744: --
745: hr_utility.set_location ('Entering oipl ',99);
746: --
747: for l_lre in c_lre_oipl loop
748: --
749: hr_utility.set_location ('Entering oipl lre ',99);

Line 749: hr_utility.set_location ('Entering oipl lre ',99);

745: hr_utility.set_location ('Entering oipl ',99);
746: --
747: for l_lre in c_lre_oipl loop
748: --
749: hr_utility.set_location ('Entering oipl lre ',99);
750: l_found := true;
751: --
752: get_ler_ctfns
753: (p_ler_rqrs_enrt_ctfn_id => l_lre.ler_rqrs_enrt_ctfn_id ,

Line 774: hr_utility.set_location ('Entering oipl ecf',99);

770: --
771: if not l_found then
772: for l_ecf in c_ecf_oipl loop
773: --
774: hr_utility.set_location ('Entering oipl ecf',99);
775: l_found := true;
776: --
777: write_ctfn
778: (p_elig_per_elctbl_chc_id => l_epe.elig_per_elctbl_chc_id,

Line 802: hr_utility.set_location (l_package||' EPE CLC CHK ',10);

798: end if;
799: --
800: end if;
801: --
802: hr_utility.set_location (l_package||' EPE CLC CHK ',10);
803: if l_epe.comp_lvl_cd in ('OIPL','PLAN','PLANFC','PLANIMP') then
804: --
805: -- process plan ler ctfns
806: --

Line 811: hr_utility.set_location ('Entering pl lre',99);

807: if not l_found then
808: --
809: for l_lre in c_lre_pl loop
810: --
811: hr_utility.set_location ('Entering pl lre',99);
812: l_found := true;
813: --
814: get_ler_ctfns
815: (p_ler_rqrs_enrt_ctfn_id => l_lre.ler_rqrs_enrt_ctfn_id ,

Line 829: hr_utility.set_location ('Done glerctfns '||l_package,10);

825: p_pl_typ_id => l_epe.pl_typ_id,
826: p_opt_id => l_epe.opt_id,
827: p_ler_id => l_epe.ler_id);
828: --
829: hr_utility.set_location ('Done glerctfns '||l_package,10);
830: --
831: end loop;
832: --
833: --

Line 837: hr_utility.set_location ('Entering pl ecf',99);

833: --
834: if not l_found then
835: for l_ecf in c_ecf_pl loop
836: --
837: hr_utility.set_location ('Entering pl ecf',99);
838: l_found := true;
839: --
840: write_ctfn
841: (p_elig_per_elctbl_chc_id => l_epe.elig_per_elctbl_chc_id,

Line 859: hr_utility.set_location ('Done gecfctfns '||l_package,10);

855: p_susp_if_ctfn_not_prvd_flag => l_ecf.susp_if_ctfn_not_prvd_flag,
856: p_ctfn_determine_cd => l_ecf.ctfn_determine_cd,
857: p_mode => g_mode);
858: --
859: hr_utility.set_location ('Done gecfctfns '||l_package,10);
860: --
861: end loop;
862: --
863: end if;

Line 869: hr_utility.set_location (l_package||' EPE OIPL ID EPE CRF ',10);

865: end if;
866: --
867: end if;
868: --
869: hr_utility.set_location (l_package||' EPE OIPL ID EPE CRF ',10);
870: if l_epe.oipl_id is not null and l_epe.ctfn_rqd_flag = 'Y' then
871: --
872: -- Write level jumping certifications for OIPL's only if
873: -- bendenrr has already found that certification is required

Line 891: hr_utility.set_location (l_package||' UCRF ',10);

887: p_effective_date => p_effective_date);
888: --
889: end if;
890: --
891: hr_utility.set_location (l_package||' UCRF ',10);
892: update_ctfn_rqd_flag
893: (p_elig_per_elctbl_chc_id => l_epe.elig_per_elctbl_chc_id,
894: p_ctfn_rqd_flag => l_epe.ctfn_rqd_flag,
895: p_object_version_number => l_epe.object_version_number,

Line 899: hr_utility.set_location (l_package||' End EPE loop ',10);

895: p_object_version_number => l_epe.object_version_number,
896: p_business_group_id => l_epe.business_group_id,
897: p_effective_date => p_effective_date);
898: --
899: hr_utility.set_location (l_package||' End EPE loop ',10);
900: /*
901: else
902: close c_epe;
903: */

Line 906: hr_utility.set_location ('Leaving '||l_package,10);

902: close c_epe;
903: */
904: end if;
905: --
906: hr_utility.set_location ('Leaving '||l_package,10);
907: --
908: end main;
909: --
910: procedure update_susp_if_ctfn_flag(

Line 1053: hr_utility.set_location ('Entering '||l_package,10);

1049: l_dummy VARCHAR2(30) := 'N';
1050: l_dummy1 VARCHAR2(30) := 'N';
1051: l_dummy2 VARCHAR2(30) := 'N';
1052: begin
1053: hr_utility.set_location ('Entering '||l_package,10);
1054: FOR l_ecc IN c_ecc LOOP
1055: --
1056: l_dummy := 'N'; --Bug 7701140
1057: l_dummy1 := 'N'; --Bug 7701140

Line 1058: hr_utility.set_location ('l_ecc.pgm_id'||l_ecc.pgm_id,20);

1054: FOR l_ecc IN c_ecc LOOP
1055: --
1056: l_dummy := 'N'; --Bug 7701140
1057: l_dummy1 := 'N'; --Bug 7701140
1058: hr_utility.set_location ('l_ecc.pgm_id'||l_ecc.pgm_id,20);
1059: hr_utility.set_location ('l_ecc.pl_id '||l_ecc.pl_id,20);
1060: hr_utility.set_location ('l_ecc.enrt_ctfn_typ_cd '||l_ecc.enrt_ctfn_typ_cd,20);
1061: --
1062: OPEN c_pl_ctfn(l_ecc.pl_id,p_per_in_ler_id,p_effective_date,l_ecc.enrt_ctfn_typ_cd) ;

Line 1059: hr_utility.set_location ('l_ecc.pl_id '||l_ecc.pl_id,20);

1055: --
1056: l_dummy := 'N'; --Bug 7701140
1057: l_dummy1 := 'N'; --Bug 7701140
1058: hr_utility.set_location ('l_ecc.pgm_id'||l_ecc.pgm_id,20);
1059: hr_utility.set_location ('l_ecc.pl_id '||l_ecc.pl_id,20);
1060: hr_utility.set_location ('l_ecc.enrt_ctfn_typ_cd '||l_ecc.enrt_ctfn_typ_cd,20);
1061: --
1062: OPEN c_pl_ctfn(l_ecc.pl_id,p_per_in_ler_id,p_effective_date,l_ecc.enrt_ctfn_typ_cd) ;
1063: FETCH c_pl_ctfn INTO l_dummy ;

Line 1060: hr_utility.set_location ('l_ecc.enrt_ctfn_typ_cd '||l_ecc.enrt_ctfn_typ_cd,20);

1056: l_dummy := 'N'; --Bug 7701140
1057: l_dummy1 := 'N'; --Bug 7701140
1058: hr_utility.set_location ('l_ecc.pgm_id'||l_ecc.pgm_id,20);
1059: hr_utility.set_location ('l_ecc.pl_id '||l_ecc.pl_id,20);
1060: hr_utility.set_location ('l_ecc.enrt_ctfn_typ_cd '||l_ecc.enrt_ctfn_typ_cd,20);
1061: --
1062: OPEN c_pl_ctfn(l_ecc.pl_id,p_per_in_ler_id,p_effective_date,l_ecc.enrt_ctfn_typ_cd) ;
1063: FETCH c_pl_ctfn INTO l_dummy ;
1064: CLOSE c_pl_ctfn ;

Line 1065: hr_utility.set_location(' l_dummy '||l_dummy,30);

1061: --
1062: OPEN c_pl_ctfn(l_ecc.pl_id,p_per_in_ler_id,p_effective_date,l_ecc.enrt_ctfn_typ_cd) ;
1063: FETCH c_pl_ctfn INTO l_dummy ;
1064: CLOSE c_pl_ctfn ;
1065: hr_utility.set_location(' l_dummy '||l_dummy,30);
1066: IF l_dummy = 'Y' THEN
1067: -- Plan level certification is setup and now check to see current at the plan level
1068: OPEN c_plan_enrolment_info(p_lf_evt_ocrd_dt,
1069: p_person_id,

Line 1075: hr_utility.set_location(' Plan Level Certs l_dummy1 '||l_dummy1,40);

1071: l_ecc.pl_id) ;
1072: FETCH c_plan_enrolment_info INTO l_dummy1 ;
1073: CLOSE c_plan_enrolment_info ;
1074: --Currently enrolled at plan level
1075: hr_utility.set_location(' Plan Level Certs l_dummy1 '||l_dummy1,40);
1076: IF l_dummy1 = 'Y' THEN
1077: --Currently enrolled in this option, so we need to update the flag
1078: OPEN c_pl_or_oipl_ecc(l_ecc.pl_id) ;
1079: loop

Line 1086: hr_utility.set_location(' l_oipl_rec.elctbl_chc_ctfn_id '||l_oipl_rec.elctbl_chc_ctfn_id,50);

1082: close c_pl_or_oipl_ecc ;
1083: exit ;
1084: end if;
1085: --
1086: hr_utility.set_location(' l_oipl_rec.elctbl_chc_ctfn_id '||l_oipl_rec.elctbl_chc_ctfn_id,50);
1087: l_ecc_ovn := l_oipl_rec.object_version_number ;
1088: --
1089: ben_ELTBL_CHC_CTFN_api.update_ELTBL_CHC_CTFN
1090: (p_elctbl_chc_ctfn_id => l_oipl_rec.elctbl_chc_ctfn_id

Line 1101: hr_utility.set_location('Cert at Option Level',60);

1097: END IF;
1098: --
1099: ELSE
1100: -- Plan level certification is not setup, so need to see if current only at the option level
1101: hr_utility.set_location('Cert at Option Level',60);
1102: OPEN c_oipl_ecc(l_ecc.pl_id) ;
1103: loop
1104: fetch c_oipl_ecc INTO l_oipl_rec;
1105: if c_oipl_ecc%notfound then

Line 1115: hr_utility.set_location(' l_dummy2 '||l_dummy2,70);

1111: l_ecc.pgm_id,
1112: l_oipl_rec.oipl_id) ;
1113: FETCH c_oipl_enrolment_info INTO l_dummy2 ;
1114: CLOSE c_oipl_enrolment_info ;
1115: hr_utility.set_location(' l_dummy2 '||l_dummy2,70);
1116: IF l_dummy2 = 'Y' THEN
1117: --Currently enrolled in this option, so we need to update the flag
1118: l_ecc_ovn := l_oipl_rec.object_version_number ;
1119: --

Line 1120: hr_utility.set_location(' l_oipl_rec.elctbl_chc_ctfn_id '||l_oipl_rec.elctbl_chc_ctfn_id,80);

1116: IF l_dummy2 = 'Y' THEN
1117: --Currently enrolled in this option, so we need to update the flag
1118: l_ecc_ovn := l_oipl_rec.object_version_number ;
1119: --
1120: hr_utility.set_location(' l_oipl_rec.elctbl_chc_ctfn_id '||l_oipl_rec.elctbl_chc_ctfn_id,80);
1121: ben_ELTBL_CHC_CTFN_api.update_ELTBL_CHC_CTFN
1122: (p_elctbl_chc_ctfn_id => l_oipl_rec.elctbl_chc_ctfn_id
1123: ,p_susp_if_ctfn_not_prvd_flag => 'N'
1124: ,p_object_version_number => l_ecc_ovn

Line 1134: hr_utility.set_location ('Leaving '||l_package,10);

1130: --
1131: END IF;
1132: --
1133: END LOOP;
1134: hr_utility.set_location ('Leaving '||l_package,10);
1135: end update_susp_if_ctfn_flag ;
1136: --
1137: end BEN_DETERMINE_CHC_CTFN;