[Home] [Help]
1130: 13-Sep-11 usaraswa 120.28.12010000.13 Bug 12715758 : In Process_comp_objects while calling ben_comp_obj_filter.filter_comp_objects sending
1131: p_effective_date instead of nvl(l_rec.lf_evt_ocrd_dt,p_effective_date).
1132: 14-Dec-11 usaraswa 120.28.12010000.14 Bug 12732878 : Added procedure check_for_first_eligible to check whether the comp objects present in the global variables
1133: ben_determine_eligibility2.g_cache_first_inelig_object,ben_determine_eligibility2.g_cache_first_elig_object
1134: are having any future records are there in ben_elig_per_f and ben_elig_per_opt_f tables.If the future records are present
1135: then inserting the future records in to back up table and deleting the future records.
1136: called the procedure check_for_first_eligible in process_comp_objects.
1137: 10-Oct-12 velvanop 120.28.12010000.15 Bug 14484394: Set g_max_errors_allowed for the Participation Process: Compensation Workbench Conc Program
1138: 11-Dec-12 velvanop 120.28.12010000.16 Bug 14484281
1162: -------------------------------------------------------------------------------
1163: --Bug 12732878 ud changes start
1164: --Added procedure check_for_first_eligible to check whether the comp objects present in the global variables
1165: --ben_determine_eligibility2.g_cache_first_inelig_object,ben_determine_eligibility2.g_cache_first_elig_object
1166: --are having any future records in ben_elig_per_f and ben_elig_per_opt_f tables.If the future records are
1167: --present then inserting the future records in to back up table and deleting the future records.
1168:
1169: procedure check_for_first_eligible(
1170: p_per_in_ler_id in number
1208: and c_effective_date < pep.effective_start_date;
1209: --
1210:
1211: cursor c_prev_elig_opt_rec(c_elig_per_id number,c_per_in_ler_id number) is
1212: select * from ben_elig_per_opt_f epo
1213: where epo.elig_per_id = c_elig_per_id
1214: and epo.per_in_ler_id = c_per_in_ler_id;
1215:
1216: --
1226: --
1227:
1228: cursor c_get_end_date_version_opt(c_elig_per_opt_id number,c_effective_date date) is
1229: select epo.effective_end_date,epo.object_version_number
1230: from ben_elig_per_opt_f epo
1231: where epo.elig_per_opt_id = c_elig_per_opt_id
1232: and c_effective_date between epo.effective_start_date
1233: and epo.effective_end_date;
1234: -- and c_effective_date > epo.effective_start_date
1237: --
1238:
1239: cursor c_get_option( c_elig_per_id number,c_effective_date date) is
1240: select epo.elig_per_opt_id
1241: from ben_elig_per_opt_f epo
1242: where epo.elig_per_id = c_elig_per_id
1243: and c_effective_date between epo.effective_start_date
1244: and epo.effective_end_date;
1245:
1246: --
1247: cursor c_get_elig_per_opt_rec(c_elig_per_opt_id number
1248: ,c_pil_id number
1249: ,c_effective_date date) is
1250: select * from ben_elig_per_opt_f epo
1251: where epo.elig_per_opt_id = c_elig_per_opt_id
1252: and epo.per_in_ler_id = c_pil_id;
1253: -- and epo.effective_start_date > c_effective_date;
1254:
1345: ,p_elig_per_id => NUll
1346: ,p_elig_per_opt_id => l_fut_elig_per_opt_rec.elig_per_opt_id
1347: ,p_effective_date => l_fut_elig_per_opt_rec.effective_start_date
1348: );
1349: delete from ben_elig_per_opt_f
1350: where elig_per_opt_id = l_fut_elig_per_opt_rec.elig_per_opt_id;
1351: hr_utility.set_location('option was deleted',10);
1352:
1353: end if;
1501: ,p_elig_per_opt_id => l_fut_elig_per_opt_rec.elig_per_opt_id
1502: ,p_effective_date => l_fut_elig_per_opt_rec.effective_start_date
1503: );
1504:
1505: delete from ben_elig_per_opt_f
1506: where elig_per_opt_id = l_fut_elig_per_opt_rec.elig_per_opt_id;
1507: hr_utility.set_location('option was deleted',10);
1508:
1509: end if;
2420: l_ptip_id number := p_comp_obj_tree_row.ptip_id;
2421:
2422: l_elig_per_id ben_elig_per_f.elig_per_id%TYPE;
2423: l_object_version_number ben_elig_per_f.object_version_number%TYPE;
2424: l_object_version_number_opt ben_elig_per_opt_f.object_version_number%type;
2425: l_effective_start_date date;
2426: l_effective_end_date date;
2427: l_datetrack_mode varchar2(100);
2428: l_elig_per_opt_id ben_elig_per_opt_f.elig_per_opt_id%type;
2424: l_object_version_number_opt ben_elig_per_opt_f.object_version_number%type;
2425: l_effective_start_date date;
2426: l_effective_end_date date;
2427: l_datetrack_mode varchar2(100);
2428: l_elig_per_opt_id ben_elig_per_opt_f.elig_per_opt_id%type;
2429: l_elig_per_oiplip_id ben_elig_per_opt_f.elig_per_opt_id%type;
2430: l_effective_start_date_opt date;
2431: l_effective_end_date_opt date;
2432: l_correction boolean;
2425: l_effective_start_date date;
2426: l_effective_end_date date;
2427: l_datetrack_mode varchar2(100);
2428: l_elig_per_opt_id ben_elig_per_opt_f.elig_per_opt_id%type;
2429: l_elig_per_oiplip_id ben_elig_per_opt_f.elig_per_opt_id%type;
2430: l_effective_start_date_opt date;
2431: l_effective_end_date_opt date;
2432: l_correction boolean;
2433: l_update boolean;
2481: pep.elig_per_id,
2482: epo.per_in_ler_id,
2483: pep.prtn_strt_dt strt_dt,
2484: pep.prtn_end_dt end_dt
2485: from ben_elig_per_opt_f epo,
2486: ben_per_in_ler pil,
2487: ben_elig_per_f pep
2488: where pep.person_id = c_person_id
2489: and pep.pl_id = c_pl_id
2521: and pl_id = p_pl_id;
2522: --
2523: cursor c_epo (p_pgm_id number) is
2524: select null
2525: from ben_elig_per_opt_f epo
2526: where epo.per_in_ler_id is null
2527: and p_effective_date between epo.effective_start_date
2528: and epo.effective_end_date
2529: and epo.elig_per_id in
2536: and pgm_id = p_pgm_id);
2537: --
2538: cursor c_epo2 (p_pl_id number) is
2539: select null
2540: from ben_elig_per_opt_f epo
2541: where epo.per_in_ler_id is null
2542: and p_effective_date between epo.effective_start_date
2543: and epo.effective_end_date
2544: and epo.elig_per_id in
2591: fetch c_epo into l_dummy;
2592: if c_epo%found then
2593: l_oipl_rec := ben_cobj_cache.g_oipl_currow;
2594: --
2595: update ben_elig_per_opt_f epo
2596: set per_in_ler_id = p_per_in_ler_id
2597: where epo.per_in_ler_id is null
2598: and epo.elig_per_id in
2599: (select elig_per_id from ben_elig_per_f pep
2633: if c_epo2%found then
2634:
2635: l_oipl_rec := ben_cobj_cache.g_oipl_currow;
2636: --
2637: update ben_elig_per_opt_f epo
2638: set per_in_ler_id = p_per_in_ler_id
2639: where epo.per_in_ler_id is null
2640: and epo.elig_per_id in
2641: (select elig_per_id from ben_elig_per_f pep
11673: --
11674: -------------------------------------------------------------------------------
11675: --Bug 12732878 ud changes start
11676: --if program level comp object is ineligible then inserting the comp object to ben_determine_eligibility2.g_cache_first_inelig_object
11677: --for checking any future records are there in ben_elig_per_f and ben_elig_per_opt_f tables.
11678: hr_utility.set_location('In the l_not_eligible if',20);
11679: if l_comp_obj_tree(l_treeele_num).pgm_id is not null then
11680: hr_utility.set_location('l_comp_obj_tree(l_treeele_num).pgm_id'||l_comp_obj_tree(l_treeele_num).pgm_id,10);
11681: ben_determine_eligibility2.g_cache_first_inelig_object.extend;