HRMS Previous Employer and Jobs API

DECLARE

l_person_id Number;
l_business_group_id number := 81;
l_party_id number;
l_flag varchar2(5);

V_Error  varchar2(3000);
V_Error2  varchar2(3000);

l_previous_employer_id number;
l_object_version_number number;
l_previous_job_id number;

l_status varchar2(5) := 'True' ;
l_error_message varchar2(1000);
l_validate_cnt number;
l_join_date date;

l_total_records number := 0;
l_success_records number := 0;
l_failure_records number := 0;

begin
Begin
hr_previous_employment_api.create_previous_employer
(
p_effective_date => sysdate
,p_person_id => 141 --csr_rec.person_id
,p_business_group_id => l_business_group_id
,p_party_id => l_party_id
,p_start_date => sysdate - 1000 --csr_rec.date_of_change
,p_end_date   => sysdate -10
,p_employer_name => 'XX DISTRIBUTION'
,p_employer_country => 'AE'
,p_employer_type => 'CM'
,p_previous_employer_id => l_previous_employer_id
,p_object_version_number => l_object_version_number
);
COMMIT;
dbms_output.put_line ('Y');

Exception
when others then
V_Error := SQLERRM;
dbms_output.put_line (V_Error);

END;

begin


hr_previous_employment_api.create_previous_job
(
p_effective_date => sysdate
,p_previous_employer_id => l_previous_employer_id
,p_start_date =>  sysdate - 1000
,p_end_date   => sysdate -10
,p_job_name => 'Technical'
,p_description => 'ITS'
--,p_pjo_attribute1 => csr_rec.grade
,p_previous_job_id => l_previous_job_id
,p_object_version_number => l_object_version_number
);
COMMIT;
dbms_output.put_line ('Done');

Exception
when others then
V_Error2 := SQLERRM;
dbms_output.put_line (V_Error2);


end;

end;
/