41: and obj.ELIG_OBJ_ID = obe.ELIG_OBJ_ID
42: and obe.elig_prfl_id = p_eligy_prfl_id
43: and obe.ELIG_OBJ_ELIG_PRFL_ID <> nvl(p_ELIG_OBJ_ELIG_PRFL_ID,ELIG_OBJ_ELIG_PRFL_ID);
44: Begin
45: hr_utility.set_location('Entering:'||l_proc, 5);
46: --
47: -- raise error as the record already exists
48: open c_uniq_cm_typ_elig_prfl ;
49: fetch c_uniq_cm_typ_elig_prfl into l_dummy ;
50: --
51: if c_uniq_cm_typ_elig_prfl%found then
52: --
53: close c_uniq_cm_typ_elig_prfl ;
54: hr_utility.set_location('Future record exists.Cannot insert ', 8 ) ;
55: fnd_message.set_name('PER','HR_7211_DT_UPD_ROWS_IN_FUTURE');
56: fnd_message.raise_error;
57: --
58: else
58: else
59: close c_uniq_cm_typ_elig_prfl ;
60: end if;
61: --
62: hr_utility.set_location('Leaving:'||l_proc, 10);
63: --
64: End chk_uniq_elig_prfl;
65:
66: procedure create_eligibility_object
174: end if;
175:
176: Exception
177: when others then
178: hr_utility.set_location('In exce:', 10);
179: ROLLBACK TO create_eligibility_object_s;
180: fnd_message.raise_error;
181: p_result := 'F';
182: end create_eligibility_object;
408: l_asg_tab l_asg_tab_type;
409:
410: begin
411:
412: hr_utility.set_location('Entering '||l_proc,10);
413: if p_person_id is null then
414: hr_utility.set_message(801, 'HR_7207_API_MANDATORY_ARG');
415: hr_utility.set_message_token('API_NAME', l_proc);
416: hr_utility.set_message_token('ARGUMENT', 'person_id');
410: begin
411:
412: hr_utility.set_location('Entering '||l_proc,10);
413: if p_person_id is null then
414: hr_utility.set_message(801, 'HR_7207_API_MANDATORY_ARG');
415: hr_utility.set_message_token('API_NAME', l_proc);
416: hr_utility.set_message_token('ARGUMENT', 'person_id');
417: hr_utility.raise_error;
418:
411:
412: hr_utility.set_location('Entering '||l_proc,10);
413: if p_person_id is null then
414: hr_utility.set_message(801, 'HR_7207_API_MANDATORY_ARG');
415: hr_utility.set_message_token('API_NAME', l_proc);
416: hr_utility.set_message_token('ARGUMENT', 'person_id');
417: hr_utility.raise_error;
418:
419: end if;
412: hr_utility.set_location('Entering '||l_proc,10);
413: if p_person_id is null then
414: hr_utility.set_message(801, 'HR_7207_API_MANDATORY_ARG');
415: hr_utility.set_message_token('API_NAME', l_proc);
416: hr_utility.set_message_token('ARGUMENT', 'person_id');
417: hr_utility.raise_error;
418:
419: end if;
420:
413: if p_person_id is null then
414: hr_utility.set_message(801, 'HR_7207_API_MANDATORY_ARG');
415: hr_utility.set_message_token('API_NAME', l_proc);
416: hr_utility.set_message_token('ARGUMENT', 'person_id');
417: hr_utility.raise_error;
418:
419: end if;
420:
421: hr_api.mandatory_arg_error(p_api_name => l_proc,
448: p_max_errors => null,
449: p_benefit_action_id => null,
450: p_effective_date=> p_effective_date);
451: -- end if;
452: hr_utility.set_location('Entering '||l_proc,11);
453: open c_chk_ebo for l_chk_obj_id;
454: hr_utility.set_location('Entering '||l_proc,12);
455: fetch c_chk_ebo into l_elig_obj_id;
456: if c_chk_ebo%notfound then
450: p_effective_date=> p_effective_date);
451: -- end if;
452: hr_utility.set_location('Entering '||l_proc,11);
453: open c_chk_ebo for l_chk_obj_id;
454: hr_utility.set_location('Entering '||l_proc,12);
455: fetch c_chk_ebo into l_elig_obj_id;
456: if c_chk_ebo%notfound then
457: close c_chk_ebo;
458: hr_utility.set_message(801, 'HR_7180_DT_NO_ROW_EXIST');
454: hr_utility.set_location('Entering '||l_proc,12);
455: fetch c_chk_ebo into l_elig_obj_id;
456: if c_chk_ebo%notfound then
457: close c_chk_ebo;
458: hr_utility.set_message(801, 'HR_7180_DT_NO_ROW_EXIST');
459: hr_utility.set_message_token('TABLE_NAME', 'ben_elig_obj_f');
460: hr_utility.set_message_token('SESSION_DATE', to_char(p_effective_date));
461: hr_utility.raise_error;
462: end if;
455: fetch c_chk_ebo into l_elig_obj_id;
456: if c_chk_ebo%notfound then
457: close c_chk_ebo;
458: hr_utility.set_message(801, 'HR_7180_DT_NO_ROW_EXIST');
459: hr_utility.set_message_token('TABLE_NAME', 'ben_elig_obj_f');
460: hr_utility.set_message_token('SESSION_DATE', to_char(p_effective_date));
461: hr_utility.raise_error;
462: end if;
463: close c_chk_ebo;
456: if c_chk_ebo%notfound then
457: close c_chk_ebo;
458: hr_utility.set_message(801, 'HR_7180_DT_NO_ROW_EXIST');
459: hr_utility.set_message_token('TABLE_NAME', 'ben_elig_obj_f');
460: hr_utility.set_message_token('SESSION_DATE', to_char(p_effective_date));
461: hr_utility.raise_error;
462: end if;
463: close c_chk_ebo;
464:
457: close c_chk_ebo;
458: hr_utility.set_message(801, 'HR_7180_DT_NO_ROW_EXIST');
459: hr_utility.set_message_token('TABLE_NAME', 'ben_elig_obj_f');
460: hr_utility.set_message_token('SESSION_DATE', to_char(p_effective_date));
461: hr_utility.raise_error;
462: end if;
463: close c_chk_ebo;
464:
465: open c_chk_ebo for l_chk_obj_id;
464:
465: open c_chk_ebo for l_chk_obj_id;
466: loop
467: fetch c_chk_ebo into l_elig_obj_id;
468: hr_utility.set_location('l_elig_obj_id '||l_elig_obj_id,10);
469: if c_chk_ebo%notfound then
470: exit;
471: end if;
472: open c_elig_prof(l_elig_obj_id);
513: else
514: l_eligible := true;
515: end if;
516:
517: hr_utility.set_location('Score Tab '||l_score_tab.count,10);
518: if l_eligible then
519: l_elig_flag := 'Y';
520: else
521: l_elig_flag := 'N';