Error while trying to create new assignment with supervisor through API

Question

Hi Experts,
I'am trying to create new assignment with supervisor for employee, but i'am facing this error:
=============================================================
ORA-20008: Error While Create new assignment..-20001
ORA-20001: The supervisor assignment that you have entered is invalid.
Please check that you have entered the supervisor,
that the supervisor assignment belongs to this supervisor and that the assignment is effective.
ORA-06512: at line 198
=============================================================
This is my script, (Oracle EBS 12.1.1)(DB 11):
DECLARE
v_user_id NUMBER;
v_res_id NUMBER;
v_res_appl_id NUMBER;
v_org_now_no_manager_warning BOOLEAN;
v_spp_delete_warning BOOLEAN;
v_other_manager_warning BOOLEAN;
v_tax_district_changed_warning BOOLEAN;
v_entries_changed_warning VARCHAR(4000);
v_person_id per_all_assignments_f.person_id %TYPE;
v_business_group_id hr_all_organization_units_tl.organization_id %TYPE;
v_people_group_id per_all_assignments_f.people_group_id %TYPE;
v_object_version_number per_all_assignments_f.object_version_number %TYPE;
v_special_ceiling_step_id per_all_assignments_f.special_ceiling_step_id %TYPE;
v_group_name pay_people_groups.group_name %TYPE;
v_ass_effective_start_date per_all_assignments_f.effective_start_date %TYPE;
v_effective_start_date per_all_assignments_f.effective_start_date %TYPE;
v_effective_end_date per_all_assignments_f.effective_end_date %TYPE;
v_assignment_id per_all_assignments_f.assignment_id %TYPE;
v_sup_assignment_id per_all_assignments_f.assignment_id %TYPE;
v_supervisor_assignment_id per_all_assignments_f.assignment_id %TYPE;
v_job_id per_jobs.job_id %TYPE;
v_grade_id per_grades.grade_id %TYPE;
v_location_id hr_locations_all.location_id %TYPE;
v_payroll_id pay_all_payrolls_f.payroll_id %TYPE;
v_pay_basis_id per_pay_bases.pay_basis_id %TYPE;
BEGIN
v_user_id := FND_GLOBAL.user_id ;
v_res_id := FND_GLOBAL.resp_id ;
v_res_appl_id:= FND_GLOBAL.resp_appl_id;
FND_GLOBAL.apps_initialize(v_user_id, v_res_id, v_res_appl_id);
BEGIN
SELECT organization_id
INTO v_business_group_id
FROM hr_all_organization_units_tl
WHERE name = 'Vision University'
AND language = 'US';
EXCEPTION
WHEN OTHERS THEN
RAISE_APPLICATION_ERROR(-20000,'Error While Retrieving (Business Group ID) Info...'||SQLCODE||' '||SQLERRM);
END;
FOR R IN (SELECT * FROM xx_assignment) LOOP
BEGIN
SELECT assignment_id , ass_f.object_version_number
INTO v_assignment_id , v_object_version_number
FROM per_all_assignments_f ass_f, per_all_people_f p_f
WHERE ass_f.person_id = p_f.person_id
AND ass_f.business_group_id = p_f.business_group_id
AND ass_f.business_group_id = v_business_group_id
AND p_f.employee_number = R.employee_number
AND TRUNC(p_f.effective_start_date)= TRUNC(ass_f.effective_start_date)
AND TRUNC(p_f.effective_end_date) = TRUNC(ass_f.effective_end_date);
EXCEPTION
WHEN OTHERS THEN
RAISE_APPLICATION_ERROR(-20001,'Error While Retrieving (Assignmet_ID) for employee..'||SQLCODE||' '||SQLERRM);
END;
BEGIN
SELECT job_id
INTO v_job_id
FROM per_jobs
WHERE trim(lower(name)) = trim(lower(r.employee_job))
AND business_group_id = v_business_group_id;
EXCEPTION
WHEN OTHERS THEN
RAISE_APPLICATION_ERROR(-20002,'Error While Retrieving (Job_ID) Info...'||SQLCODE||' '||SQLERRM);
END;
BEGIN
SELECT grade_id
INTO v_grade_id
FROM per_grades
WHERE trim(lower(name)) = trim(lower(r.employee_grade))
AND business_group_id = v_business_group_id;
EXCEPTION
WHEN OTHERS THEN
RAISE_APPLICATION_ERROR(-20003,'Error While Retrieving (Grade_ID) Info...'||SQLCODE||' '||SQLERRM);
END;
BEGIN
SELECT location_id
INTO v_location_id
FROM hr_locations_all
WHERE trim(lower(description))= trim(lower(r.employee_location))
AND business_group_id = v_business_group_id;
EXCEPTION
WHEN OTHERS THEN
RAISE_APPLICATION_ERROR(-20004,'Error While Retrieving (Location_ID) Info...'||SQLCODE||' '||SQLERRM);
END;
BEGIN
SELECT payroll_id
INTO v_payroll_id
FROM pay_all_payrolls_f
WHERE trim(lower(payroll_name)) = trim(lower(r.payroll_name))
AND business_group_id = v_business_group_id;
EXCEPTION
WHEN OTHERS THEN
RAISE_APPLICATION_ERROR(-20005,'Error While Retrieving (Payroll_ID) Info...'||SQLCODE||' '||SQLERRM);
END;
BEGIN
SELECT pay_basis_id
INTO v_pay_basis_id
FROM per_pay_bases
WHERE trim(lower(pay_basis)) = trim(lower(r.pay_basis))
AND business_group_id = v_business_group_id;
EXCEPTION
WHEN OTHERS THEN
RAISE_APPLICATION_ERROR(-20006,'Error While Retrieving (Pay_Basis_ID) Info...'||SQLCODE||' '||SQLERRM);
END;
BEGIN
SELECT person_id
INTO v_person_id
FROM per_all_people_f
WHERE employee_number = r.supervisor_number
AND business_group_id= v_business_group_id;
SELECT assignment_id
INTO v_sup_assignment_id
FROM per_all_assignments_f
WHERE person_id = v_person_id
AND business_group_id = v_business_group_id;
EXCEPTION
WHEN OTHERS THEN
RAISE_APPLICATION_ERROR(-20007,'Error While Retrieving (Assignmet_ID) for supervisor..'||SQLCODE||' '||SQLERRM);
end;
BEGIN
hr_assignment_api.update_emp_asg_criteria(p_effective_date => TRUNC(SYSDATE),
p_datetrack_update_mode => 'CORRECTION',
p_assignment_id => v_assignment_id,
p_validate => FALSE,
p_called_from_mass_update => NULL,
p_grade_id => v_grade_id,
p_position_id => NULL,
p_job_id => v_job_id,
p_payroll_id => null,--v_payroll_id,
p_location_id => v_location_id,
p_organization_id => v_business_group_id,
p_pay_basis_id => v_pay_basis_id,
p_segment1 => NULL,
p_segment2 => NULL,
p_segment3 => NULL,
p_segment4 => NULL,
p_segment5 => NULL,
p_segment6 => NULL,
p_segment7 => NULL,
p_segment8 => NULL,
p_segment9 => NULL,
p_segment10 => NULL,
p_segment11 => NULL,
p_segment12 => NULL,
p_segment13 => NULL,
p_segment14 => NULL,
p_segment15 => NULL,
p_segment16 => NULL,
p_segment17 => NULL,
p_segment18 => NULL,
p_segment19 => NULL,
p_segment20 => NULL,
p_segment21 => NULL,
p_segment22 => NULL,
p_segment23 => NULL,
p_segment24 => NULL,
p_segment25 => NULL,
p_segment26 => NULL,
p_segment27 => NULL,
p_segment28 => NULL,
p_segment29 => NULL,
p_segment30 => NULL,
p_employment_category => NULL,
p_concat_segments => NULL,
p_grade_ladder_pgm_id => NULL,
p_supervisor_assignment_id => v_sup_assignment_id,
p_people_group_id => v_people_group_id,
p_object_version_number => v_object_version_number,
p_special_ceiling_step_id => v_special_ceiling_step_id,
p_group_name => v_group_name,
p_effective_start_date => v_ass_effective_start_date,
p_effective_end_date => v_effective_end_date,
p_org_now_no_manager_warning => v_org_now_no_manager_warning ,
p_spp_delete_warning => v_spp_delete_warning,
p_entries_changed_warning => v_entries_changed_warning,
p_tax_district_changed_warning => v_tax_district_changed_warning,
p_other_manager_warning => v_other_manager_warning);
EXCEPTION
WHEN OTHERS THEN
RAISE_APPLICATION_ERROR(-20008,'Error While Create new assignment..'||SQLCODE||' '||SQLERRM);
END;
END LOOP;
COMMIT;
END;
Thank you & Best Regards

Answer 1

I think this is essentially saying that the Supervisor Assignment is wrong or no longer effective. Looking at your SQL to fetch the Supervisor Assignment there are a number of potential issues. This is what you've currently got:
SELECT person_id
INTO v_person_id
FROM per_all_people_f
WHERE employee_number = r.supervisor_number
AND business_group_id= v_business_group_id;
SELECT assignment_id
INTO v_sup_assignment_id
FROM per_all_assignments_f
WHERE person_id = v_person_id
AND business_group_id = v_business_group_id;
Potential Problems/Clarifications
1. What is r.supervisor_number, what does it contain and how is it derived? I can't see that anywhere else in the block...
2. Is there a chance that r.supervisor_number is referencing an employee who has left, ie, now an ex-employee?
3. The SELECT statement that fetches the assignment_id does not perform any date-effective restrictions, which means you might be lucky enough to fetch the person's current assignment. But you might also fetch an old or future-dated assignment.
4. The SELECT statement that fetches the assignment_id does not restrict the type of assignment, so if this manager has applied for a job (ie, they have an applicant assignment) or some other type of non-employee assignment you might be picking that up.
This would work better for you:
SELECT paaf.assignment_id
INTO v_sup_assignment_id
FROM per_all_people_f papf
,per_all_assignments_f paaf
WHERE papf.employee_number = r.supervisor_number
AND papf.business_group_id = v_business_group_id
AND nvl(papf.current_employee_flag, 'N') = 'Y'
AND trunc(sysdate) BETWEEN
papf.effective_start_date AND papf.effective_end_date
AND papf.person_id = paaf.person_id
AND paaf.assignment_type = 'E'
AND paaf.primary_flag = 'Y'
AND trunc(sysdate) BETWEEN
paaf.effective_start_date AND paaf.effective_end_date;
If it doesn't return a row it means that the supervisor (or whatever employee is returned by r.supervisor_number) is not active as at sysdate and cannot be used. Note that this SQL only applies for employees. If you can have Contingent Workers as supervisors in your implementation then this needs tweaking.
Does that help?