HRMS Re-Hire EX Employee API

Create Or replace procedure KFU_re_hire_ex_employee ( V_Person_ID Number, Re_Hire_Date  Date )
is
p_validate                    boolean  default false   ;
p_hire_date                   date           ;
p_person_id                   number        ;
p_per_object_version_number   number  ;
p_person_type_id              number ;
p_rehire_reason               varchar2  (100);
V_object_version_number       number;
------------------------------------------------------------------------------------
p_assignment_id               number;
p_asg_object_version_number   number;
p_per_effective_start_date    date;
p_per_effective_end_date      date;
p_assignment_sequence         number;
p_assignment_number           varchar2 (100);
p_assign_payroll_warning      boolean;

Begin


SELECT MAX (object_version_number)
INTO  V_object_version_number
FROM  per_all_people_f
WHERE person_id = V_Person_ID
and   PERSON_TYPE_ID =1123;

hr_employee_api.re_hire_ex_employee
(p_validate  =>  false ,
p_hire_date                       => to_date( Re_Hire_Date ,'DD/MM/RRRR'),
p_person_id                       => V_Person_ID ,
p_per_object_version_number       => V_object_version_number,
p_person_type_id                  => 1120,
p_rehire_reason                   => Null,
------------------------------------------------------------------------------------------
p_assignment_id                   => p_assignment_id,
p_asg_object_version_number       => p_asg_object_version_number,
p_per_effective_start_date        => p_per_effective_start_date,
p_per_effective_end_date          => p_per_effective_end_date,
p_assignment_sequence             => p_assignment_sequence,
p_assignment_number               => p_assignment_number,
p_assign_payroll_warning          => p_assign_payroll_warning

) ;
Commit;

End;