Oracle Application API's
Oracle AOL
FND_PROGRAM.EXECUTABLE
FND_PROGRAM.DELETE_EXECUTABLE
FND_PROGRAM.REGISTER
FND_PROGRAM.DELETE_PROGRAM
FND_PROGRAM.PARAMETER
FND_PROGRAM.DELETE_PARAMETER
FND_PROGRAM.INCOMPATIBILITY
FND_PROGRAM.DELETE_INCOMPATIBILITY
FND_PROGRAM.REQUEST_GROUP
FND_PROGRAM.DELETE_GROUP
FND_PROGRAM.ADD_TO_GROUP
FND_PROGRAM.REMOVE_FROM_GROUP
FND_REQUEST.SUBMIT_REQUEST
FND_CONCURRENT.WAIT_FOR_REQUEST
FND_REQUEST.SET_PRINT_OPTIONS
FND_GLOBAL.USER_IDFND_GLOBAL.APPS_INITIALIZE(user_id in number,resp_id in
number,resp_appl_id in number);
FND_GLOBAL.LOGIN_ID
FND_GLOBAL.CONC_LOGIN_ID
FND_GLOBAL.PROG_APPL_ID
FND_GLOBAL.CONC_PROGRAM_ID
FND_GLOBAL.CONC_REQUEST_ID
FND_PROFILE.PUT(name,value)
FND_PROFILE.GET(name IN varchar2,value out varchar2)
FND_USER_PKG.CREATEUSER
FND_USER_PKG.UPDATEUSER
FND_USER_PKG.ADDRESP
FND_USER_PKG.DELRESP
PO
PO_CUSTOM_PRICE_PUB
PO_DOCUMENT_CONTROL_PUB
PO_DOC_MANAGER_PUB
PO_WFDS_PUB
AP
POS_VENDOR_PUB_PKG.CREATE_VENDOR
AP_NOTES_PUB
AP_WEB_AUDIT_LIST_PUB
HRMS
HR_EMPLOYEE_API.CREATE_EMPLOYEE
HR_PERSON_API.UPDATE_PERSON
HR_CONTACT_REL_API.CREATE_CONTACT
HR_EMPLOYEE_API.HIRE_INTO_JOB
HR_PERSON_ADDRESS_API.CREATE_PERSON_ADDRESS
HR_PERSON_ADDRESS_API.UPDATE_PERSON_ADDRESS
PAY_ELEMENT_ENTRY_API.DELETE_ELEMENT_ENTRY
HR_EMPLOYEE_API.RE_HIRE_EX_EMPLOYEE
HR_PERSONAL_PAY_METHOD_API.CREATE_PERSONAL_PAY_METHOD
HR_PHONE_API.CREATE_OR_UPDATE_PHONE
HR_MAINTAIN_PROPOSAL_API.CRE_OR_UPD_SALARY_PROPOSAL
PAY_FEDERAL_TAX_RULE_API.UPDATE_FED_TAX_RULE
PAY_STATE_TAX_RULE_API.CREATE_STATE_TAX_RULE
PAY_STATE_TAX_RULE_API.UPDATE_STATE_TAX_RULE
HR_ASSIGNMENT_API.UPDATE_EMP_ASG
HR_ASSIGNMENT_API.UPDATE_EMP_ASG_CRITERIA
HR_APPLICANT_API
hr_applicant_api.create_gb_applicant
HR_APPLICATION_API
hr_application_api.update_apl_details
HR_ASSIGNMENT_API
hr_assignment_api.delete_assignment
hr_assignment_api.create_secondary_emp_asg
hr_assignment_api.update_emp_asg
hr_assignment_api.update_emp_asg_criteria
hr_assignment_api.create_gb_secondary_emp_asg
hr_assignment_api.set_new_primary_asg
hr_assignment_api.actual_termination_emp_asg
HR_CONTACT_REL_API
hr_contact_rel_api.create_contact
hr_contact_rel_api.delete_contact_relationship
HR_CONTRACT_API
hr_contract_api.create_contract
HR_EMPLOYEE_API
hr_employee_api.create_gb_employee
HR_EX_EMPLOYEE_API
hr_ex_employee_api.actual_termination_emp
HR_GRADE_RATE_VALUE_API
hr_grade_rate_value_api.update_grade_rate_value
HR_ORGANIZATION_API
hr_organization_api.create_organization
HR_MAINTAIN_PROPOSAL_API
hr_maintain_proposal_api.insert_salary_proposal
HR_PERSON_API
hr_person_absence_api.create_person_absence
hr_person_absence_api.update_person_absence
hr_person_api.update_gb_person
hr_person_api.update_person
HR_POSITION_API
hr_position_api.create_position
hr_position_api.delete_position
HR_SIT_API
hr_sit_api.create_sit
hr_sit_api.update_sit
HR_USER_ACCT_API
hr_user_acct_api.create_user_acct
HR_UPLOAD_PROPOSAL_API
hr_upload_proposal_api.upload_salary_proposal
PER_QUALIFICATIONS_API
per_qualifications_api.update_qualification
hr_maintain_proposal_api.insert_salary_proposal
DECLARE
l_pay_proposal_id number;
l_element_entry_id number;
l_inv_next_sal_date_warning boolean;
l_proposed_salary_warning boolean;
l_approved_warning boolean;
l_payroll_warning boolean;
l_object_version_number number;
BEGIN
hr_maintain_proposal_api.insert_salary_proposal
(p_pay_proposal_id =>l_pay_proposal_id
,p_assignment_id => 5093 -- *** Enter your assignment_id here
,p_business_group_id => 1496 -- *** Enter your business_group_id here
,p_change_date => to_date('01-APR-2001','DD-MON-YYYY')
,p_proposal_reason => 'NEWH' -- *** Enter your own reason here
,p_proposed_salary_n => 17500
,p_object_version_number => l_object_version_number
,p_multiple_components => 'N'
,p_approved => 'Y'
,p_validate => FALSE
,p_element_entry_id => l_element_entry_id
,p_inv_next_sal_date_warning => l_inv_next_sal_date_warning
,p_proposed_salary_warning => l_proposed_salary_warning
,p_approved_warning => l_approved_warning
,p_payroll_warning => l_payroll_warning);
END;
/
-- Go to API List
hr_position_api.delete_position
set serveroutput on;
declare
l_true boolean :=false;
l_POSITION_ID NUMBER := 75502;
l_DATE DATE := to_date('01-feb-2013', 'DD-MON-YYYY');
l_obj NUMBER;
l_datetrack_mode varchar(30) := 'ZAP';
l_date1 Date;
l_date2 Date;
cursor csr_ovn is
select max(object_version_number)
from hr_All_positions_f where position_id=l_POSITION_ID;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
hr_position_api.delete_position
(
p_validate => l_true
,p_position_id => l_POSITION_ID
,p_object_version_number => l_obj
,p_datetrack_mode => l_datetrack_mode
,p_effective_date => l_date
,p_security_profile_id => 42
,p_effective_start_date => l_date1
,p_effective_end_date => l_date2
);
end;
/
-- Go to API List
per_qualifications_api.update_qualification
set serveroutput on;
declare
l_date date := to_date('27-JAN-2012', 'DD-MON-YYYY');
l_true boolean := false;
l_QUALIFICATION_ID number := 56905;
l_obj NUMBER;
l_title varchar2(100) := 'UPDATED_API' ;
cursor csr_ovn is
select max(object_version_number)
from per_qualifications where person_id=32063;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
per_qualifications_api.UPDATE_QUALIFICATION(
p_effective_date => l_date
,p_qualification_id => l_QUALIFICATION_ID
,p_title => l_title
,p_object_version_number => l_obj
);
end;
/
-- Go to API List
hr_contract_api.create_contract
set serveroutput on;
Declare
/* Out variables */
p_validate boolean default false;
p_contract_id number;
p_effective_start_date date;
p_effective_end_date date;
p_object_version_number number;
l_date date := to_date('01-JAN-2013','DD-MON-YYYY');
/* In variables*/
p_person_id number;
p_reference varchar2(240);
p_type varchar2(240);
p_status varchar2(240);
p_effective_date date;
BEGIN
hr_contract_api.create_contract (
p_validate => false
,p_contract_id => p_contract_id
,p_effective_start_date => p_effective_start_date
,p_effective_end_date => p_effective_end_date
,p_object_version_number => p_object_version_number
,p_person_id => 18689
,p_reference => 9874 -- Random number
,p_type => 'UNSPECIFIED_PERIOD' -- defined by the CONTRACT_TYPE lookup type.
,p_status => 'A-ACTIVE' -- defined by the CONTRACT_STATUS lookup type.
,p_effective_date => l_date
);
END;
/
-- Go to API List
hr_ex_employee_api.actual_termination_emp
set serveroutput on;
declare
l_period_of_service_id number := 3123;
l_date date := to_date('01-AUG-2000', 'DD-MON-YYYY');
l_true boolean := false;
l_leaving_reason varchar2(2000) := 'QPJ';
l_term_date date := to_date('31-AUG-2000', 'DD-MON-YYYY');
l_lsp_date date := to_date('31-AUG-2000', 'DD-MON-YYYY');
l_batch_id number := 103;
l_fp_date date := to_date('31-AUG-2000', 'DD-MON-YYYY');
l_obj number;
l_actual_termination_date date := to_date('31-AUG-2000', 'DD-MON-YYYY');
l_SUPERVISOR_WARNING BOOLEAN;
l_EVENT_WARNING BOOLEAN;
l_INTERVIEW_WARNING BOOLEAN;
l_REVIEW_WARNING BOOLEAN;
l_RECRUITER_WARNING BOOLEAN;
l_ASG_FUTURE_CHANGES_WARNING BOOLEAN;
l_ENTRIES_CHANGED_WARNING VARCHAR2(30);
l_PAY_PROPOSAL_WARNING BOOLEAN;
cursor csr_ovn is
select max(object_version_number)
from per_periods_of_Service where period_of_service_id=3123;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
-- execute API to insert leave date
hr_ex_employee_api.actual_termination_emp
(
p_validate => l_true
,p_effective_date => l_date
,p_period_of_service_id => l_period_of_service_id
,p_object_version_number => l_obj
,p_leaving_reason => l_leaving_reason
,p_actual_termination_date => l_actual_termination_date
,p_SUPERVISOR_WARNING => l_SUPERVISOR_WARNING
,p_EVENT_WARNING => l_EVENT_WARNING
,p_INTERVIEW_WARNING => l_INTERVIEW_WARNING
,p_REVIEW_WARNING => l_REVIEW_WARNING
,p_RECRUITER_WARNING => l_RECRUITER_WARNING
,p_ASG_FUTURE_CHANGES_WARNING => l_ASG_FUTURE_CHANGES_WARNING
,p_ENTRIES_CHANGED_WARNING => l_ENTRIES_CHANGED_WARNING
,p_PAY_PROPOSAL_WARNING => l_PAY_PROPOSAL_WARNING
);
end;
/
-- Go to API List
hr_person_absence_api.create_person_absence
set serveroutput on;
DECLARE
l_absence_days Number :=2;
l_absence_hours Number;
l_absence_attendance_id Number;
l_object_version_number Number;
l_occurance Number;
l_dur_dys_less_warning boolean;
l_dur_hrs_less_warning boolean;
l_exceeds_pto_entit_warning boolean;
l_exceeds_run_total_warning boolean;
l_abs_overlap_warning boolean;
l_abs_day_after_warning boolean;
l_dur_overwritten_warning boolean;
BEGIN
HR_PERSON_ABSENCE_API.create_person_absence
(p_validate => FALSE
,p_effective_date => to_date('01-APR-2002','DD-MON-YYYY')
,p_person_id => 2831
,p_business_group_id => 1379
,p_absence_attendance_type_id => 272
,p_abs_attendance_reason_id => 443
,p_date_start => to_date('01-APR-2002','DD-MON-YYYY')
,p_date_end => to_date('02-APR-2002','DD-MON-YYYY')
,p_absence_days => l_absence_days
,p_absence_hours => l_absence_hours
,p_absence_attendance_id => l_absence_attendance_id
,p_object_version_number => l_object_version_number
,p_occurrence => l_occurance
,p_dur_dys_less_warning => l_dur_dys_less_warning
,p_dur_hrs_less_warning => l_dur_hrs_less_warning
,p_exceeds_pto_entit_warning => l_exceeds_pto_entit_warning
,p_exceeds_run_total_warning => l_exceeds_run_total_warning
,p_abs_overlap_warning => l_abs_overlap_warning
,p_abs_day_after_warning => l_abs_day_after_warning
,p_dur_overwritten_warning => l_dur_overwritten_warning
);
END;
/
-- Go to API List
hr_contact_rel_api.create_contact
set serveroutput on;
DECLARE
l_validate_mode BOOLEAN := FALSE;
l_datetrack_update_mode VARCHAR2(30);
l_row_id ROWID;
l_business_group_id NUMBER;
l_contact_type VARCHAR2(30);
l_contact_title VARCHAR2(30);
l_primary_flag VARCHAR2(30);
l_attribute16 VARCHAR2(150);
l_contact_full_name VARCHAR2(240);
l_person_type_id NUMBER;
l_sex VARCHAR2(30);
l_per_start_date DATE;
l_per_end_date DATE;
l_per_comment_id NUMBER;
l_name_comb_warning BOOLEAN;
l_contact_relationship_id NUMBER;
l_contact_rel_ovn NUMBER;
l_contact_person_id NUMBER;
l_contact_person_ovn NUMBER;
l_errors VARCHAR2(100);
L_ORIG_HIRE_WARNING boolean;
BEGIN
HR_CONTACT_REL_API.CREATE_CONTACT
( P_VALIDATE => FALSE
, P_DATE_START => '04-AUG-1999'
, P_START_DATE => '04-AUG-1999'
, P_BUSINESS_GROUP_ID => 626
, P_PERSON_ID => 367
-- , P_CONTACT_PERSON_ID => NULL
, P_CONTACT_TYPE => 'F'
, P_PRIMARY_CONTACT_FLAG => 'N'
, P_CONT_ATTRIBUTE16 => NULL
, P_LAST_NAME => 'BLOGGY1'
, P_SEX => 'M'
, P_PERSON_TYPE_ID => 101
, P_DATE_OF_BIRTH => '12-SEP-1977'
, P_FIRST_NAME => 'FRED'
--, P_TITLE => l_contact_title
, P_CONTACT_RELATIONSHIP_ID => l_contact_relationship_id
, P_CTR_OBJECT_VERSION_NUMBER => l_contact_rel_ovn
, P_PER_PERSON_ID => l_contact_person_id
, P_PER_OBJECT_VERSION_NUMBER => l_contact_person_ovn
, P_PER_EFFECTIVE_START_DATE => l_per_start_date
, P_PER_EFFECTIVE_END_DATE => l_per_end_date
, P_FULL_NAME => l_contact_full_name
, P_PER_COMMENT_ID => l_per_comment_id
, P_NAME_COMBINATION_WARNING => l_name_comb_warning
, P_ORIG_HIRE_WARNING => L_ORIG_HIRE_WARNING
);
END;
/
-- Go to API List
hr_applicant_api.create_gb_applicant
set serverout on;
declare
l_person_id per_people_f.person_id%TYPE;
l_assignment_id per_assignments_f.assignment_id%TYPE;
l_per_object_version_number per_people_f.object_version_number%TYPE;
l_asg_object_version_number per_people_f.object_version_number%TYPE;
l_apl_object_version_number per_applications.object_version_number%TYPE;
l_per_effective_start_date per_people_v.effective_start_date%TYPE;
l_per_effective_end_date per_people_v.effective_end_date%TYPE;
l_full_name per_people_f.full_name%TYPE;
l_per_comment_id per_people_f.comment_id%TYPE;
l_application_id per_applications.application_id%TYPE;
l_assignment_sequence per_people_assignments_view.assignment_sequence%TYPE;
l_applicant_number per_people_f.applicant_number%TYPE;
l_name_combination_warning boolean;
l_assign_payroll_warning boolean;
l_orig_hire_warning boolean;
begin
hr_applicant_api.create_gb_applicant
(
P_VALIDATE => FALSE
,P_DATE_RECEIVED => to_date('31-DEC-1999','DD-MON-YYYY')
,P_DATE_OF_BIRTH => to_date('01-OCT-1985','DD-MON-YYYY')
,P_BUSINESS_GROUP_ID => 1379
,P_LAST_NAME => 'VF-TEST3'
,P_APPLICANT_NUMBER => l_applicant_number
,P_PERSON_ID => L_PERSON_ID
,P_ASSIGNMENT_ID => L_ASSIGNMENT_ID
,P_APPLICATION_ID => l_application_id
,P_PER_OBJECT_VERSION_NUMBER => L_PER_OBJECT_VERSION_NUMBER
,P_ASG_OBJECT_VERSION_NUMBER => L_ASG_OBJECT_VERSION_NUMBER
,P_APL_OBJECT_VERSION_NUMBER => L_APL_OBJECT_VERSION_NUMBER
,P_PER_EFFECTIVE_START_DATE => L_PER_EFFECTIVE_START_DATE
,P_PER_EFFECTIVE_END_DATE => L_PER_EFFECTIVE_END_DATE
,P_FULL_NAME => L_FULL_NAME
,P_PER_COMMENT_ID => L_PER_COMMENT_ID
,P_ASSIGNMENT_SEQUENCE => L_ASSIGNMENT_SEQUENCE
,P_NAME_COMBINATION_WARNING => L_NAME_COMBINATION_WARNING
,P_ORIG_HIRE_WARNING => L_ORIG_HIRE_WARNING
);
end;
/
-- Go to API List
hr_employee_api.create_gb_employee
set serverout on;
declare
l_employee_number per_people_f.employee_number%TYPE;
l_person_id per_people_f.person_id%TYPE;
l_assignment_id per_assignments_f.assignment_id%TYPE;
l_per_object_version_number per_people_f.object_version_number%TYPE;
l_asg_object_version_number per_people_f.object_version_number%TYPE;
l_per_effective_start_date per_people_v.effective_start_date%TYPE;
l_per_effective_end_date per_people_v.effective_end_date%TYPE;
l_full_name per_people_f.full_name%TYPE;
l_per_comment_id per_people_f.comment_id%TYPE;
l_assignment_sequence per_people_assignments_view.assignment_sequence%TYPE;
l_assignment_number per_people_assignments_view.assignment_number%TYPE;
l_name_combination_warning boolean;
l_assign_payroll_warning boolean;
begin
hr_employee_api.create_gb_employee
(
p_validate => FALSE
,p_hire_date => to_date('01-Jul-2000','DD-MON-YYYY')
,p_business_group_id => 1021
,p_first_name => 'FONGY'
,p_last_name => 'FONGY'
,p_sex => 'M'
,p_ni_number => 'WP934486A'
,p_employee_number => l_employee_number
,p_person_id => l_person_id
,p_assignment_id => l_assignment_id
,p_per_object_version_number => l_per_object_version_number
,p_asg_object_version_number => l_asg_object_version_number
,p_per_effective_start_date => l_per_effective_start_date
,p_per_effective_end_date => l_per_effective_end_date
,p_full_name => l_full_name
,p_per_comment_id => l_per_comment_id
,p_assignment_sequence => l_assignment_sequence
,p_assignment_number => l_assignment_number
,p_name_combination_warning => l_name_combination_warning
,p_assign_payroll_warning => l_assign_payroll_warning
);
dbms_output.put_line ('Person ID: ' || to_char(l_person_id));
end;
/
-- Go to API List
hr_organization_api.create_organization
set serveroutput on;
declare
l_date date := to_date('01-jan-2000','DD-MON-YYYY');
l_true boolean := false;
l_business_group_id number := 626;
l_language_code varchar2(10) := 'US';
l_name varchar2(80) := 'NJ TEST ORG';
l_internal_external_flag varchar2(80) := 'INT';
l_organization_id number;
l_object_version_number number;
l_duplicate_org_warning boolean;
begin
hr_organization_api.create_organization
( p_validate => l_true
,p_effective_date => l_date
,p_language_code => l_language_code
,p_business_group_id => l_business_group_id
,p_date_from => l_date
,p_name => l_name
,p_internal_external_flag => l_internal_external_flag
,p_organization_id => l_organization_id
,p_object_version_number => l_object_version_number
,P_duplicate_org_warning => l_duplicate_org_warning
);
end;
/
-- Go to API List
hr_position_api.create_position
set serveroutput on;
declare
l_true boolean :=false;
l_obj NUMBER;
l_JOB_ID NUMBER :=614;
l_ORGANIZATION_ID NUMBER :=1379;
l_DATE_EFFECTIVE DATE := to_date('01-DEC-2000', 'DD-MON-YYYY');
l_POSITION_ID NUMBER;
l_POSITION_DEFINITION_ID NUMBER;
l_NAME VARCHAR2(30);
l_segment1 VARCHAR(30) :='NJ TEST POSITION';
l_segment2 VARCHAR2(30) :='10';
begin
hr_position_api.create_position
(
p_validate => l_true
, p_object_version_number => l_obj
, p_JOB_ID => l_JOB_ID
, p_ORGANIZATION_ID => l_ORGANIZATION_ID
, p_DATE_EFFECTIVE => l_DATE_EFFECTIVE
, p_POSITION_ID => l_POSITION_ID
, p_POSITION_DEFINITION_ID => l_POSITION_DEFINITION_ID
, p_NAME => l_NAME
, p_segment1 => l_segment1
, p_segment2 => l_segment2
, p_location_id => 2694
);
end;
/
-- Go to API List
hr_assignment_api.create_secondary_emp_asg
set serveroutput on;
declare
l_date date := to_date('01-MAR-2012','DD-MON-YYYY');
l_assignment_number varchar2(30);
l_group_name varchar2(100);
l_concatenated_segments varchar2(100);
l_cagr_grade_def_id number;
l_cagr_concatenated_segments varchar2(100);
l_assignment_id number;
l_soft_coding_keyflex_id number;
l_effective_end_date date;
l_assignment_sequence number;
l_comment_id number;
l_other_manager_warning boolean;
l_hourly_salaried_warning boolean;
l_gsp_post_process_warning varchar2(100);
l_people_group_id number := 169;
l_ovn number;
l_person_id number := 367;
l_organization_id number := 647;
l_payroll_id number := 112;
l_location_id number := 431;
begin
hr_assignment_api.create_secondary_emp_asg
(p_validate => FALSE,
p_effective_date => to_date('01-MAR-2012','DD-MON-YYYY'),
p_person_id => l_person_id,
p_organization_id => l_organization_id,
p_payroll_id => l_payroll_id,
p_location_id => l_location_id,
p_assignment_number => l_assignment_number,
p_group_name => l_group_name,
p_concatenated_segments => l_concatenated_segments,
p_cagr_grade_def_id => l_cagr_grade_def_id,
p_cagr_concatenated_segments => l_cagr_concatenated_segments,
p_assignment_id => l_assignment_id,
p_soft_coding_keyflex_id => l_soft_coding_keyflex_id,
p_people_group_id => l_people_group_id,
p_object_version_number => l_ovn,
p_effective_start_date => l_date,
p_effective_end_date => l_effective_end_date,
p_assignment_sequence => l_assignment_sequence,
p_comment_id => l_comment_id,
p_other_manager_warning => l_other_manager_warning,
p_hourly_salaried_warning => l_hourly_salaried_warning,
p_gsp_post_process_warning => l_gsp_post_process_warning
);
end;
/
-- Go to API List
hr_sit_api.create_sit
declare
l_date date := to_date('02-DEC-2002', 'DD-MON-YYYY');
l_true boolean := false;
l_person_id number := 2831;
l_obj NUMBER;
l_business_group_id number := 1379;
l_id_flex_num number := 51058;
l_analysis_criteria_id number;
l_person_analysis_id number;
l_p_segment1 varchar2(250) := '30';
l_p_segment2 varchar2(250) := '30';
l_p_segment3 varchar2(250) := '10';
l_p_segment4 varchar2(250) := '30-jan-2002';
cursor csr_ovn is
select max(object_version_number)
from per_people_f where person_id=l_person_id;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
hr_sit_api.create_sit
(
p_validate => l_true
, p_effective_date => l_date
, p_person_id => l_person_id
, p_pea_object_version_number => l_obj
, p_business_group_id => l_business_group_id
, p_id_flex_num => l_id_flex_num
, p_analysis_criteria_id => l_analysis_criteria_id
, p_person_analysis_id => l_person_analysis_id
, p_segment1 => l_p_segment1
, p_segment2 => l_p_segment2
, p_segment3 => l_p_segment3
, p_segment4 => l_p_segment4
);
end;
/
-- Go to API List
hr_user_acct_api.create_user_acct
set serveroutput on;
declare
l_business_group_id number := 1379;
l_user_id number := 123456;
l_true boolean := false;
l_per_effective_start_date date := to_date('26-JUL-2001', 'DD-MON-YYYY');
l_per_effective_end_date date := to_date('31-DEC-4712', 'DD-MON-YYYY');
l_assignment_id number := 3976;
l_asg_effective_start_date date := to_date('26-JUL-2001', 'DD-MON-YYYY');
l_asg_effective_end_date date := to_date('31-DEC-4712', 'DD-MON-YYYY');
l_date_from date := to_date('26-JUL-2001', 'DD-MON-YYYY');
l_date_to date := to_date('31-DEC-4712', 'DD-MON-YYYY');
l_hire_date date := to_date('26-JUL-2001', 'DD-MON-YYYY');
l_org_structure_id number := 192;
l_org_structure_version_id number := 249;
l_parent_org_id number := 1;
l_single_org_id number := 1;
l_run_type varchar2(30) := 'Bum';
begin
hr_user_acct_api.create_user_acct
(
p_validate => l_true
,p_business_group_id => l_business_group_id
,p_user_id => l_user_id
,p_per_effective_start_date => l_per_effective_start_date
,p_per_effective_end_date => l_per_effective_end_date
,p_assignment_id => l_assignment_id
,p_asg_effective_start_date => l_asg_effective_start_date
,p_asg_effective_end_date => l_asg_effective_end_date
,p_date_from => l_date_from
,p_date_to => l_date_to
,p_hire_date => l_hire_date
,p_org_structure_id => l_org_structure_id
,p_org_structure_version_id => l_org_structure_version_id
,p_parent_org_id => l_parent_org_id
,p_single_org_id => l_single_org_id
,p_run_type => l_run_type
);
end;
/
-- Go to API List
hr_assignment_api.delete_assignment
set serveroutput on;
declare
v_date date := to_date('21052012','ddmmyyyy');
v_assignment_id number;
v_person_id number;
l_aantal number;
l_effective_start_date per_all_assignments_f.effective_start_date%TYPE;
l_effective_end_date per_all_assignments_f.effective_end_date%TYPE;
l_loc_change_tax_inssues boolean;
l_delete_asg_budgets boolean;
l_org_now_no_manager_warning boolean;
l_element_salary_warning boolean;
l_element_entries_warning boolean;
l_spp_warning boolean;
l_cost_warning Boolean;
l_life_events_exists Boolean;
l_cobra_coverage_elements Boolean;
l_assgt_term_elements Boolean;
l_object_version_number number;
l_fout varchar2(3);
l_assignment_id per_all_assignments_f.assignment_id%type;
l_asg_obj_version_number per_all_assignments_f.object_version_number%type;
l_assignment_sequence number;
l_assignment_number per_all_assignments_f.assignment_number%type;
l_assign_payroll_warning boolean;
l_ontslag per_periods_of_service%rowtype;
l_rowid varchar2(2000);
l_dodwarning boolean;
l_s_final_process_date date;
l_s_actual_termination_date date;
l_assignment_status_type_id per_all_assignments_f.assignment_status_type_id%type;
l_requery_required varchar2(1);
l_rowid rowid;
cursor c_obj is
select object_version_number
from per_all_assignments_f paaf
where paaf.person_id = v_person_id
and paaf.assignment_id = v_assignment_id
and v_date between paaf.effective_start_date and paaf.effective_end_date;
begin
v_assignment_id := 35158;
v_person_id := 34634;
open c_obj;
fetch c_obj into l_object_version_number;
close c_obj;
begin
hr_assignment_api.delete_assignment
(p_validate => FALSE
,p_effective_date => v_date -1
,p_datetrack_mode => 'DELETE_NEXT_CHANGE'
,p_assignment_id => v_assignment_id
,p_object_version_number => l_object_version_number
,p_effective_start_date => l_effective_start_date
,p_effective_end_date => l_effective_end_date
,p_loc_change_tax_issues => l_loc_change_tax_inssues
,p_delete_asg_budgets => l_delete_asg_budgets
,p_org_now_no_manager_warning => l_org_now_no_manager_warning
,p_element_salary_warning => l_element_salary_warning
,p_element_entries_warning => l_element_entries_warning
,p_spp_warning => l_spp_warning
,P_cost_warning => l_cost_warning
,p_life_events_exists => l_life_events_exists
,p_cobra_coverage_elements => l_cobra_coverage_elements
,p_assgt_term_elements => l_assgt_term_elements);
--
exception
when others then
dbms_output.put_line(substr(sqlerrm,1,200));
end;
end;
/
-- Go to API List
hr_person_absence_api.update_person_absence
DECLARE
l_absence_days Number :=3;
l_absence_hours Number;
l_absence_attendance_id Number :=194537;
l_obj Number;
l_dur_dys_less_warning boolean;
l_dur_hrs_less_warning boolean;
l_exceeds_pto_entit_warning boolean;
l_exceeds_run_total_warning boolean;
l_abs_overlap_warning boolean;
l_abs_day_after_warning boolean;
l_dur_overwritten_warning boolean;
l_del_element_entry_warning boolean;
l_date_start date :=to_date('01-sep-2011','DD-MON-YYYY');
l_date_end date:=to_date('15-sep-2011','DD-MON-YYYY');
cursor csr_ovn is
select max(object_version_number)
from per_absence_attendances where absence_attendance_id=l_absence_attendance_id;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
hr_person_absence_api.update_person_absence
(p_validate => FALSE
,p_effective_date => to_date('01-SEP-2011','DD-MON-YYYY')
,p_absence_attendance_id => l_absence_attendance_id
,p_abs_attendance_reason_id => 74 -- the reason before was null - now changing to id 74 (COLD)
,p_absence_days => l_absence_days
,p_absence_hours => l_absence_hours
,p_object_version_number => l_obj
,p_dur_dys_less_warning => l_dur_dys_less_warning
,p_dur_hrs_less_warning => l_dur_hrs_less_warning
,p_exceeds_pto_entit_warning => l_exceeds_pto_entit_warning
,p_exceeds_run_total_warning => l_exceeds_run_total_warning
,p_abs_overlap_warning => l_abs_overlap_warning
,p_abs_day_after_warning => l_abs_day_after_warning
,p_dur_overwritten_warning => l_dur_overwritten_warning
,p_del_element_entry_warning => l_del_element_entry_warning
);
END;
/
-- Go to API List
hr_application_api.update_apl_details
set serveroutput on;
declare
l_true boolean := false;
l_application_id number := 2592;
l_obj NUMBER;
l_person_id number :=7814;
l_attrib4 varchar2(30) :='Applicant';
cursor csr_ovn is
select max(object_version_number)
from per_people_f where person_id=l_person_id;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
hr_application_api.update_apl_details
(
p_validate => l_true
, p_application_id => l_application_id
, p_object_version_number => l_obj
, p_appl_attribute4 => l_attrib4
);
end;
/
-- Go to API List
hr_assignment_api.update_emp_asg_criteria
set serveroutput on;
declare
l_date date := to_date('01-OCT-2009', 'DD-MON-YYYY');
l_true boolean := false;
l_assign_id number := 32923;
l_obj NUMBER;
l_datetrack_update_mode VARCHAR2(30);
l_organization_id number;
l_special_ceiling_step_id number;
l_EFFECTIVE_START_DATE DATE;
l_EFFECTIVE_END_DATE DATE;
l_people_group_id number;
l_group_name varchar2(30);
l_org_now_no_manager_warning BOOLEAN;
l_other_manager_warning boolean;
l_spp_delete_warning boolean;
l_entries_changed_warning varchar2(30);
l_tax_district_changed_warning boolean;
cursor csr_ovn is
select max(object_version_number)
from per_assignments_f where assignment_id=32923;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
hr_assignment_api.update_emp_asg_criteria
(
P_VALIDATE => l_true
,P_EFFECTIVE_DATE => l_date
,P_DATETRACK_UPDATE_MODE => 'CORRECTION'
,P_ASSIGNMENT_ID => l_assign_id
,P_OBJECT_VERSION_NUMBER => l_obj
-- ,p_organization_id => 626
,p_special_ceiling_step_id => l_special_ceiling_step_id
,P_effective_start_date => l_effective_start_date
,p_effective_end_date => l_effective_end_date
,p_people_group_id => l_people_group_id
,p_group_name => l_group_name
,p_org_now_no_manager_warning => l_org_now_no_manager_warning
,p_other_manager_warning => l_other_manager_warning
,p_spp_delete_warning => l_spp_delete_warning
,p_entries_changed_warning => l_entries_changed_warning
,p_tax_district_changed_warning => l_tax_district_changed_warning
, p_segment11 => 'Abbott, Mr. John'
);
end;
/
-- Go to API List
hr_person_api.update_gb_person
set serveroutput on;
declare
l_date date := to_date('01-SEP-2002', 'DD-MON-YYYY');
l_true boolean := false;
l_person_id number := 367
l_employee_number varchar2(30) := '4';
l_obj NUMBER;
l_attribute1 VARCHAR2(30) := 'Yes';
l_comment_id number;
l_datetrack_update_mode VARCHAR2(30);
l_EFFECTIVE_START_DATE DATE := to_date('01-DEC-2002', 'DD-MON-YYYY');
l_EFFECTIVE_END_DATE DATE;
l_name_combination_warning BOOLEAN;
l_assign_payroll_warning boolean;
l_full_name VARCHAR2(30) := '-Anthony--Ambrose';
l_orig_hire_warning BOOLEAN;
cursor csr_ovn is
select max(object_version_number)
from per_people_f where person_id=l_person_id;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
hr_person_api.update_gb_person
(
p_validate => l_true
, p_effective_date => l_date
, p_datetrack_update_mode => 'CORRECTION'
, p_person_id => l_person_id
, p_object_version_number => l_obj
, p_employee_number => l_employee_number
, p_attribute1 => l_attribute1
, p_effective_start_date => l_effective_start_date
, p_effective_end_date => l_effective_end_date
, p_full_name => l_full_name
, p_comment_id => l_comment_id
, p_name_combination_warning => l_name_combination_warning
, p_assign_payroll_warning => l_assign_payroll_warning
, p_orig_hire_warning => l_orig_hire_warning
);
end;
/
-- Go to API List
hr_sit_api.update_sit
set serveroutput on;
declare
l_date date := to_date('01-DEC-2000', 'DD-MON-YYYY');
l_true boolean := false;
l_person_id number := 2831;
l_obj NUMBER;
l_business_group_id number := 1379;
l_id_flex_num number := 51058;
l_analysis_criteria_id number := 2029;
l_person_analysis_id number := 1735;
cursor csr_ovn is
select max(object_version_number)
from per_people_f where person_id=l_person_id;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
hr_sit_api.update_sit
(
p_validate => l_true
, p_effective_date => l_date
, p_person_id => l_person_id
, p_pea_object_version_number => l_obj
, p_business_group_id => l_business_group_id
, p_id_flex_num => l_id_flex_num
, p_analysis_criteria_id => l_analysis_criteria_id
, p_person_analysis_id => l_person_analysis_id
, p_analysis_criteria_id => l_analysis_criteria_id
, p_segment1 => '30'
, p_segment2 => '40'
, p_segment3 => '10'
, p_segment4 => '21-JUL-2001'
);
end;
/
-- Go to API List
hr_upload_proposal_api.upload_salary_proposal
set serveroutput on;
declare
L_VALIDATE BOOLEAN := FALSE;
L_BUSINESS_GROUP_ID NUMBER := 626;
L_PROPOSAL_REASON VARCHAR2(20) := 'COL';
L_PAY_PROPOSAL_ID NUMBER := null;
L_OBJECT_VERSION_NUMBER NUMBER := null;
L_COMPONENT_REASON VARCHAR2(10) := null;
L_APPROVED_1 VARCHAR2(10) := null;
L_COMPONENT_ID_1 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_1 NUMBER := null;
L_APPROVED_2 VARCHAR2(10) := null;
L_COMPONENT_ID_2 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_2 NUMBER := null;
L_APPROVED_3 VARCHAR2(10) := null;
L_COMPONENT_ID_3 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_3 NUMBER := null;
L_APPROVED_4 VARCHAR2(10) := null;
L_COMPONENT_ID_4 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_4 NUMBER := null;
L_APPROVED_5 VARCHAR2(10) := null;
L_COMPONENT_ID_5 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_5 NUMBER := null;
L_APPROVED_6 VARCHAR2(10) := null;
L_COMPONENT_ID_6 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_6 NUMBER := null;
L_APPROVED_7 VARCHAR2(10) := null;
L_COMPONENT_ID_7 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_7 NUMBER := null;
L_APPROVED_8 VARCHAR2(10) := null;
L_COMPONENT_ID_8 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_8 NUMBER := null;
L_APPROVED_9 VARCHAR2(10) := null;
L_COMPONENT_ID_9 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_9 NUMBER := null;
L_APPROVED_10 VARCHAR2(10) := null;
L_COMPONENT_ID_10 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_10 NUMBER := null;
L_PYP_PROPOSED_SAL_WARNING BOOLEAN := FALSE;
l_ADDITIONAL_COMP_WARNING BOOLEAN := FALSE;
L_PERSON NUMBER := 517;
L_ASSIGNMENT NUMBER := 524;
L_START_DATE DATE := NULL;
L_END_DATE DATE := NULL;
L_MSG VARCHAR2(200) := NULL;
L_STATUS VARCHAR2(10) := 'VALID';
L_COUNTER NUMBER := 0;
l_date date := to_date('01-Aug-2013', 'DD-MON-YYYY');
l_proposed_salary VARCHAR2(30) := '21000.00';
l_err_num NUMBER;
l_err_msg VARCHAR2(100);
begin
hr_upload_proposal_api.upload_salary_proposal
( p_validate => FALSE
, p_change_date => l_date
, p_business_group_id => l_business_group_id
, p_assignment_id => l_assignment
, p_proposed_salary => l_proposed_salary
, p_proposal_reason => l_proposal_reason
, p_pay_proposal_id => l_pay_proposal_id
, p_object_version_number => l_object_version_number
, p_component_reason_1 => l_component_reason
, p_approved_1 => l_approved_1
, p_component_id_1 => l_component_id_1
, p_ppc_object_version_number_1 => l_ppc_object_version_number_1
, p_component_reason_2 => l_component_reason
, p_approved_2 => l_approved_2
, p_component_id_2 => l_component_id_2
, p_ppc_object_version_number_2 => l_ppc_object_version_number_2
, p_component_reason_3 => l_component_reason
, p_approved_3 => l_approved_3
, p_component_id_3 => l_component_id_3
, p_ppc_object_version_number_3 => l_ppc_object_version_number_3
, p_component_reason_4 => l_component_reason
, p_approved_4 => l_approved_4
, p_component_id_4 => l_component_id_4
, p_ppc_object_version_number_4 => l_ppc_object_version_number_4
, p_component_reason_5 => l_component_reason
, p_approved_5 => l_approved_5
, p_component_id_5 => l_component_id_5
, p_ppc_object_version_number_5 => l_ppc_object_version_number_5
, p_component_reason_6 => l_component_reason
, p_approved_6 => l_approved_6
, p_component_id_6 => l_component_id_6
, p_ppc_object_version_number_6 => l_ppc_object_version_number_6
, p_component_reason_7 => l_component_reason
, p_approved_7 => l_approved_7
, p_component_id_7 => l_component_id_7
, p_ppc_object_version_number_7 => l_ppc_object_version_number_7
, p_component_reason_8 => l_component_reason
, p_approved_8 => l_approved_8
, p_component_id_8 => l_component_id_8
, p_ppc_object_version_number_8 => l_ppc_object_version_number_8
, p_component_reason_9 => l_component_reason
, p_approved_9 => l_approved_9
, p_component_id_9 => l_component_id_9
, p_ppc_object_version_number_9 => l_ppc_object_version_number_9
, p_component_reason_10 => l_component_reason
, p_approved_10 => l_approved_10
, p_component_id_10 => l_component_id_10
, p_ppc_object_version_number_10 => l_ppc_object_version_number_10
, p_pyp_proposed_sal_warning => l_pyp_proposed_sal_warning
, p_additional_comp_warning => l_additional_comp_warning
);
end;
/
-- Go to API List
hr_assignment_api.create_gb_secondary_emp_asg
DECLARE
vv_group_name VARCHAR2(150);
vn_people_group_id NUMBER;
vn_assignment_sequence NUMBER;
vn_comment_id NUMBER;
vb_other_manager_warning BOOLEAN;
vb_hourly_salaried_warning BOOLEAN;
vn_cagr_grade_def_id NUMBER;
vv_cagr_concatenated_segments VARCHAR2(150);
vt_assignment_number VARCHAR2(50);
vt_assignment_id NUMBER;
vt_ass_object_version_number NUMBER;
vt_ass_eff_from_date DATE;
vt_ass_eff_to_date DATE;
BEGIN
vt_assignment_number := NULL;
hr_assignment_api.create_gb_secondary_emp_asg(p_validate => FALSE,
p_effective_date => TRUNC(SYSDATE),
p_person_id => 33255,
p_organization_id => 8464,
--OPTIONAL
p_job_id => 52906,
p_location_id => 519,
--IN/OUT
p_assignment_number => vt_assignment_number,
--OUT
p_group_name => vv_group_name,
p_assignment_id => vt_assignment_id,
p_people_group_id => vn_people_group_id,
p_object_version_number => vt_ass_object_version_number,
p_effective_start_date => vt_ass_eff_from_date,
p_effective_end_date => vt_ass_eff_to_date,
p_assignment_sequence => vn_assignment_sequence,
p_comment_id => vn_comment_id,
p_other_manager_warning => vb_other_manager_warning,
p_hourly_salaried_warning => vb_hourly_salaried_warning,
p_cagr_grade_def_id => vn_cagr_grade_def_id,
p_cagr_concatenated_segments => vv_cagr_concatenated_segments
);
DBMS_OUTPUT.put_line('ID: ' || vt_assignment_id || ', number: ' || vt_assignment_number);
END;
/
-- Go to API List
hr_assignment_api.set_new_primary_asg
DECLARE
l_object_version_number per_all_assignments_f.object_version_number%type;
l_primary_assignment_id per_all_assignments_f.assignment_id%type;
l_primary_ovn per_all_assignments_f.object_version_number%type;
x_end_date DATE;
x_start_date DATE;
x_ovn per_all_assignments_f.object_version_number%type;
BEGIN
hr_assignment_api.set_new_primary_asg(p_validate => FALSE,
p_effective_date => '02-JUN-2010',
p_person_id => 60130,
p_assignment_id => 59381,
p_object_version_number => x_ovn,
p_effective_start_date => x_start_date,
p_effective_end_date => x_end_date);
end;
/
-- Go to API List
hr_assignment_api.actual_termination_emp_asg
DECLARE
l_object_version_number per_all_assignments_f.object_version_number%type;
l_primary_assignment_id per_all_assignments_f.assignment_id%type;
l_primary_ovn per_all_assignments_f.object_version_number%type;
x_end_date DATE;
x_start_date DATE;
x_ovn per_all_assignments_f.object_version_number%type;
x_asg_future_changes_warning BOOLEAN;
x_entries_changed_warning VARCHAR2(100);
x_pay_proposal_warning BOOLEAN;
BEGIN
select max(object_version_number)
into l_primary_ovn
from per_all_assignments_f
where assignment_id=59380;
hr_assignment_api.actual_termination_emp_asg
(p_validate => FALSE,
p_assignment_id => 59380,
p_object_version_number => l_primary_ovn,
p_actual_termination_date => '03-JUN-2010',
p_effective_start_date => x_start_date,
p_effective_end_date => x_end_date,
p_asg_future_changes_warning => x_asg_future_changes_warning,
p_entries_changed_warning => x_entries_changed_warning,
p_pay_proposal_warning => x_pay_proposal_warning);
end;
/
-- Go to API List
hr_employee_api.re_hire_ex_employee
DECLARE
l_object_version_number per_all_people_f.object_version_number%type;
x_assignment_id per_all_people_f.assignment_id%type;
x_asg_object_version_number per_all_people_f.object_version_number%type;
x_effective_start_date DATE;
x_effective_end_date DATE;
x_assignment_sequence per_all_assignments_f.assignment_sequence%type;
x_assignment_number per_all_assignments_f.assignment_number%type;
x_assign_payroll_warning BOOLEAN;
BEGIN
select max(object_version_number)
into l_object_version_number
from per_all_people_f
where person_id=72302;
hr_employee_api.re_hire_ex_employee(
p_validate => false,
P_hire_date => sysdate,
P_person_id => 72302,
p_per_object_version_number => l_object_version_number,
p_person_type_id => 44,
p_rehire_reason => null,
p_assignment_id => x_assignment_id,
p_asg_object_version_number => x_asg_object_version_number,
p_per_effective_start_date => x_effective_start_date,
p_per_effective_end_date => x_effective_end_date,
p_assignment_sequence => x_assignment_sequence,
p_assignment_number => x_assignment_number,
p_assign_payroll_warning => x_assign_payroll_warning)
end;
/
-- Go to API List
hr_person_api.update_person
set serveroutput on;
DECLARE
l_date date := to_date('01-APR-2010', 'DD-MON-YYYY');
l_true boolean := false;
l_person_id number := 35848;
l_employee_number varchar2(30) := '1178';
l_obj NUMBER :=4;
l_comment_id number;
l_EFFECTIVE_START_DATE DATE;
l_EFFECTIVE_END_DATE DATE;
l_name_combination_warning BOOLEAN;
l_assign_payroll_warning boolean;
l_orig_hire_warning BOOLEAN;
l_full_name VARCHAR2(30);
l_last_name VARCHAR2(30) := 'DIFFERENT';
BEGIN
hr_person_api.update_person
(
p_validate => l_true
, p_effective_date => l_date
, p_datetrack_update_mode => 'CORRECTION'
, p_person_id => l_person_id
, p_object_version_number => l_obj
, p_last_name => l_last_name
, p_employee_number => l_employee_number
, p_effective_start_date => l_effective_start_date
, p_effective_end_date => l_effective_end_date
, p_full_name => l_full_name
, p_comment_id => l_comment_id
, p_name_combination_warning => l_name_combination_warning
, p_assign_payroll_warning => l_assign_payroll_warning
, p_orig_hire_warning => l_orig_hire_warning
);
end;
/
-- Go to API List
hr_contact_rel_api.delete_contact_relationship
CONTACT_RELATIONSHIP_ID
OVN
DECLARE
l_true_boolean := FALSE;
l_contact_relationship_id := 147;
l_object_version_number := 7;
BEGIN
hr_contact_rel_api.delete_contact_relationship
(
l_true_boolean
, l_contact_relationship_id
, l_object_version_number
);
END;
/
-- Go to API List
hr_assignment_api.update_emp_asg
set serveroutput on;
DECLARE
i_effective_date DATE := to_date('01-DEC-2012', 'DD-MON-YYYY');
i_datetrack_update_mode VARCHAR2 (30) := 'CORRECTION';
i_assignment_id NUMBER := 34078;
l_obj NUMBER;
io_cagr_grade_def_id NUMBER;
o_cagr_concatenated_segments VARCHAR2 (240);
o_concatenated_segments VARCHAR2 (240);
o_comment_id NUMBER;
o_effective_start_date DATE;
o_effective_end_date DATE;
o_no_managers_warning BOOLEAN;
o_other_manager_warning BOOLEAN;
o_hourly_salaried_warning BOOLEAN;
o_gsp_post_process_warning VARCHAR2 (240);
l_people_group_id NUMBER;
l_object_version_number NUMBER;
l_special_ceiling_step_id NUMBER;
l_soft_coding_keyflex_id NUMBER;
l_group_name VARCHAR2 (240);
l_effective_start_date DATE;
l_effective_end_date DATE;
l_org_now_no_manager_warning BOOLEAN;
l_other_manager_warning BOOLEAN;
l_spp_delete_warning BOOLEAN;
l_entries_changed_warning VARCHAR2 (240);
l_tax_district_changed_warning BOOLEAN;
l_concatenated_segments VARCHAR2 (240);
l_projected_assignment_end date;
cursor csr_ovn is
select max(object_version_number)
from per_assignments_f where assignment_id=i_assignment_id;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
hr_assignment_api.update_emp_asg
(
p_effective_date => i_effective_date,
p_datetrack_update_mode => i_datetrack_update_mode,
p_assignment_id => i_assignment_id,
p_object_version_number => l_obj,
p_cagr_grade_def_id => io_cagr_grade_def_id,
p_cagr_concatenated_segments => o_cagr_concatenated_segments,
p_concatenated_segments => o_concatenated_segments,
p_soft_coding_keyflex_id => l_soft_coding_keyflex_id,
p_comment_id => o_comment_id,
p_effective_start_date => o_effective_start_date,
p_effective_end_date => o_effective_end_date,
p_no_managers_warning => o_no_managers_warning,
p_other_manager_warning => o_other_manager_warning,
p_hourly_salaried_warning => o_hourly_salaried_warning,
p_gsp_post_process_warning => o_gsp_post_process_warning
,p_assignment_number => 'YY123'
);
end;
/
-- Go to API List
hr_grade_rate_value_api.update_grade_rate_value
declare
l_rule_id number := 218;
l_ovn number;
l_start_date date;
l_end_date date;
l_eff_date date := trunc(sysdate + 2);
begin
select object_version_number into l_ovn
from pay_grade_rules_f where grade_rule_id = l_rule_id
and l_eff_date between effective_start_date and effective_end_date;
hr_grade_rate_value_api.update_grade_rate_value
(p_effective_date => trunc(sysdate + 2)
,p_datetrack_update_mode => 'CORRECTION'
,p_grade_rule_id => l_rule_id
,p_object_version_number => l_ovn
,p_minimum => 8000
,p_effective_start_date => l_start_date
,p_effective_end_date => l_end_date);
end;
/
INV
INV_COST_GROUP_PUB
INV_ITEM_CATALOG_ELEM_PUB
INV_ITEM_CATEGORY_PUB
INV_ITEM_PUB
INV_ITEM_REVISION_PUB
INV_ITEM_STATUS_PUB
INV_LOT_API_PUB
INV_MATERIAL_STATUS_PUB
INV_MOVEMENT_STATISTICS_PUB
INV_MOVE_ORDER_PUB
INV_PICK_RELEASE_PUB
INV_PICK_WAVE_PICK_CONFIRM_PUB
INV_RESERVATION_PUB
INV_SERIAL_NUMBER_PUB
INV_SHIPPING_TRANSACTION_PUB
Oracle AOL
FND_PROGRAM.EXECUTABLE
FND_PROGRAM.DELETE_EXECUTABLE
FND_PROGRAM.REGISTER
FND_PROGRAM.DELETE_PROGRAM
FND_PROGRAM.PARAMETER
FND_PROGRAM.DELETE_PARAMETER
FND_PROGRAM.INCOMPATIBILITY
FND_PROGRAM.DELETE_INCOMPATIBILITY
FND_PROGRAM.REQUEST_GROUP
FND_PROGRAM.DELETE_GROUP
FND_PROGRAM.ADD_TO_GROUP
FND_PROGRAM.REMOVE_FROM_GROUP
FND_REQUEST.SUBMIT_REQUEST
FND_CONCURRENT.WAIT_FOR_REQUEST
FND_REQUEST.SET_PRINT_OPTIONS
FND_GLOBAL.USER_IDFND_GLOBAL.APPS_INITIALIZE(user_id in number,resp_id in
number,resp_appl_id in number);
FND_GLOBAL.LOGIN_ID
FND_GLOBAL.CONC_LOGIN_ID
FND_GLOBAL.PROG_APPL_ID
FND_GLOBAL.CONC_PROGRAM_ID
FND_GLOBAL.CONC_REQUEST_ID
FND_PROFILE.PUT(name,value)
FND_PROFILE.GET(name IN varchar2,value out varchar2)
FND_USER_PKG.CREATEUSER
FND_USER_PKG.UPDATEUSER
FND_USER_PKG.ADDRESP
FND_USER_PKG.DELRESP
PO
PO_CUSTOM_PRICE_PUB
PO_DOCUMENT_CONTROL_PUB
PO_DOC_MANAGER_PUB
PO_WFDS_PUB
AP
POS_VENDOR_PUB_PKG.CREATE_VENDOR
AP_NOTES_PUB
AP_WEB_AUDIT_LIST_PUB
HRMS
HR_EMPLOYEE_API.CREATE_EMPLOYEE
HR_PERSON_API.UPDATE_PERSON
HR_CONTACT_REL_API.CREATE_CONTACT
HR_EMPLOYEE_API.HIRE_INTO_JOB
HR_PERSON_ADDRESS_API.CREATE_PERSON_ADDRESS
HR_PERSON_ADDRESS_API.UPDATE_PERSON_ADDRESS
PAY_ELEMENT_ENTRY_API.DELETE_ELEMENT_ENTRY
HR_EMPLOYEE_API.RE_HIRE_EX_EMPLOYEE
HR_PERSONAL_PAY_METHOD_API.CREATE_PERSONAL_PAY_METHOD
HR_PHONE_API.CREATE_OR_UPDATE_PHONE
HR_MAINTAIN_PROPOSAL_API.CRE_OR_UPD_SALARY_PROPOSAL
PAY_FEDERAL_TAX_RULE_API.UPDATE_FED_TAX_RULE
PAY_STATE_TAX_RULE_API.CREATE_STATE_TAX_RULE
PAY_STATE_TAX_RULE_API.UPDATE_STATE_TAX_RULE
HR_ASSIGNMENT_API.UPDATE_EMP_ASG
HR_ASSIGNMENT_API.UPDATE_EMP_ASG_CRITERIA
HR_APPLICANT_API
hr_applicant_api.create_gb_applicant
HR_APPLICATION_API
hr_application_api.update_apl_details
HR_ASSIGNMENT_API
hr_assignment_api.delete_assignment
hr_assignment_api.create_secondary_emp_asg
hr_assignment_api.update_emp_asg
hr_assignment_api.update_emp_asg_criteria
hr_assignment_api.create_gb_secondary_emp_asg
hr_assignment_api.set_new_primary_asg
hr_assignment_api.actual_termination_emp_asg
HR_CONTACT_REL_API
hr_contact_rel_api.create_contact
hr_contact_rel_api.delete_contact_relationship
HR_CONTRACT_API
hr_contract_api.create_contract
HR_EMPLOYEE_API
hr_employee_api.create_gb_employee
HR_EX_EMPLOYEE_API
hr_ex_employee_api.actual_termination_emp
HR_GRADE_RATE_VALUE_API
hr_grade_rate_value_api.update_grade_rate_value
HR_ORGANIZATION_API
hr_organization_api.create_organization
HR_MAINTAIN_PROPOSAL_API
hr_maintain_proposal_api.insert_salary_proposal
HR_PERSON_API
hr_person_absence_api.create_person_absence
hr_person_absence_api.update_person_absence
hr_person_api.update_gb_person
hr_person_api.update_person
HR_POSITION_API
hr_position_api.create_position
hr_position_api.delete_position
HR_SIT_API
hr_sit_api.create_sit
hr_sit_api.update_sit
HR_USER_ACCT_API
hr_user_acct_api.create_user_acct
HR_UPLOAD_PROPOSAL_API
hr_upload_proposal_api.upload_salary_proposal
PER_QUALIFICATIONS_API
per_qualifications_api.update_qualification
hr_maintain_proposal_api.insert_salary_proposal
DECLARE
l_pay_proposal_id number;
l_element_entry_id number;
l_inv_next_sal_date_warning boolean;
l_proposed_salary_warning boolean;
l_approved_warning boolean;
l_payroll_warning boolean;
l_object_version_number number;
BEGIN
hr_maintain_proposal_api.insert_salary_proposal
(p_pay_proposal_id =>l_pay_proposal_id
,p_assignment_id => 5093 -- *** Enter your assignment_id here
,p_business_group_id => 1496 -- *** Enter your business_group_id here
,p_change_date => to_date('01-APR-2001','DD-MON-YYYY')
,p_proposal_reason => 'NEWH' -- *** Enter your own reason here
,p_proposed_salary_n => 17500
,p_object_version_number => l_object_version_number
,p_multiple_components => 'N'
,p_approved => 'Y'
,p_validate => FALSE
,p_element_entry_id => l_element_entry_id
,p_inv_next_sal_date_warning => l_inv_next_sal_date_warning
,p_proposed_salary_warning => l_proposed_salary_warning
,p_approved_warning => l_approved_warning
,p_payroll_warning => l_payroll_warning);
END;
/
-- Go to API List
hr_position_api.delete_position
set serveroutput on;
declare
l_true boolean :=false;
l_POSITION_ID NUMBER := 75502;
l_DATE DATE := to_date('01-feb-2013', 'DD-MON-YYYY');
l_obj NUMBER;
l_datetrack_mode varchar(30) := 'ZAP';
l_date1 Date;
l_date2 Date;
cursor csr_ovn is
select max(object_version_number)
from hr_All_positions_f where position_id=l_POSITION_ID;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
hr_position_api.delete_position
(
p_validate => l_true
,p_position_id => l_POSITION_ID
,p_object_version_number => l_obj
,p_datetrack_mode => l_datetrack_mode
,p_effective_date => l_date
,p_security_profile_id => 42
,p_effective_start_date => l_date1
,p_effective_end_date => l_date2
);
end;
/
-- Go to API List
per_qualifications_api.update_qualification
set serveroutput on;
declare
l_date date := to_date('27-JAN-2012', 'DD-MON-YYYY');
l_true boolean := false;
l_QUALIFICATION_ID number := 56905;
l_obj NUMBER;
l_title varchar2(100) := 'UPDATED_API' ;
cursor csr_ovn is
select max(object_version_number)
from per_qualifications where person_id=32063;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
per_qualifications_api.UPDATE_QUALIFICATION(
p_effective_date => l_date
,p_qualification_id => l_QUALIFICATION_ID
,p_title => l_title
,p_object_version_number => l_obj
);
end;
/
-- Go to API List
hr_contract_api.create_contract
set serveroutput on;
Declare
/* Out variables */
p_validate boolean default false;
p_contract_id number;
p_effective_start_date date;
p_effective_end_date date;
p_object_version_number number;
l_date date := to_date('01-JAN-2013','DD-MON-YYYY');
/* In variables*/
p_person_id number;
p_reference varchar2(240);
p_type varchar2(240);
p_status varchar2(240);
p_effective_date date;
BEGIN
hr_contract_api.create_contract (
p_validate => false
,p_contract_id => p_contract_id
,p_effective_start_date => p_effective_start_date
,p_effective_end_date => p_effective_end_date
,p_object_version_number => p_object_version_number
,p_person_id => 18689
,p_reference => 9874 -- Random number
,p_type => 'UNSPECIFIED_PERIOD' -- defined by the CONTRACT_TYPE lookup type.
,p_status => 'A-ACTIVE' -- defined by the CONTRACT_STATUS lookup type.
,p_effective_date => l_date
);
END;
/
-- Go to API List
hr_ex_employee_api.actual_termination_emp
set serveroutput on;
declare
l_period_of_service_id number := 3123;
l_date date := to_date('01-AUG-2000', 'DD-MON-YYYY');
l_true boolean := false;
l_leaving_reason varchar2(2000) := 'QPJ';
l_term_date date := to_date('31-AUG-2000', 'DD-MON-YYYY');
l_lsp_date date := to_date('31-AUG-2000', 'DD-MON-YYYY');
l_batch_id number := 103;
l_fp_date date := to_date('31-AUG-2000', 'DD-MON-YYYY');
l_obj number;
l_actual_termination_date date := to_date('31-AUG-2000', 'DD-MON-YYYY');
l_SUPERVISOR_WARNING BOOLEAN;
l_EVENT_WARNING BOOLEAN;
l_INTERVIEW_WARNING BOOLEAN;
l_REVIEW_WARNING BOOLEAN;
l_RECRUITER_WARNING BOOLEAN;
l_ASG_FUTURE_CHANGES_WARNING BOOLEAN;
l_ENTRIES_CHANGED_WARNING VARCHAR2(30);
l_PAY_PROPOSAL_WARNING BOOLEAN;
cursor csr_ovn is
select max(object_version_number)
from per_periods_of_Service where period_of_service_id=3123;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
-- execute API to insert leave date
hr_ex_employee_api.actual_termination_emp
(
p_validate => l_true
,p_effective_date => l_date
,p_period_of_service_id => l_period_of_service_id
,p_object_version_number => l_obj
,p_leaving_reason => l_leaving_reason
,p_actual_termination_date => l_actual_termination_date
,p_SUPERVISOR_WARNING => l_SUPERVISOR_WARNING
,p_EVENT_WARNING => l_EVENT_WARNING
,p_INTERVIEW_WARNING => l_INTERVIEW_WARNING
,p_REVIEW_WARNING => l_REVIEW_WARNING
,p_RECRUITER_WARNING => l_RECRUITER_WARNING
,p_ASG_FUTURE_CHANGES_WARNING => l_ASG_FUTURE_CHANGES_WARNING
,p_ENTRIES_CHANGED_WARNING => l_ENTRIES_CHANGED_WARNING
,p_PAY_PROPOSAL_WARNING => l_PAY_PROPOSAL_WARNING
);
end;
/
-- Go to API List
hr_person_absence_api.create_person_absence
set serveroutput on;
DECLARE
l_absence_days Number :=2;
l_absence_hours Number;
l_absence_attendance_id Number;
l_object_version_number Number;
l_occurance Number;
l_dur_dys_less_warning boolean;
l_dur_hrs_less_warning boolean;
l_exceeds_pto_entit_warning boolean;
l_exceeds_run_total_warning boolean;
l_abs_overlap_warning boolean;
l_abs_day_after_warning boolean;
l_dur_overwritten_warning boolean;
BEGIN
HR_PERSON_ABSENCE_API.create_person_absence
(p_validate => FALSE
,p_effective_date => to_date('01-APR-2002','DD-MON-YYYY')
,p_person_id => 2831
,p_business_group_id => 1379
,p_absence_attendance_type_id => 272
,p_abs_attendance_reason_id => 443
,p_date_start => to_date('01-APR-2002','DD-MON-YYYY')
,p_date_end => to_date('02-APR-2002','DD-MON-YYYY')
,p_absence_days => l_absence_days
,p_absence_hours => l_absence_hours
,p_absence_attendance_id => l_absence_attendance_id
,p_object_version_number => l_object_version_number
,p_occurrence => l_occurance
,p_dur_dys_less_warning => l_dur_dys_less_warning
,p_dur_hrs_less_warning => l_dur_hrs_less_warning
,p_exceeds_pto_entit_warning => l_exceeds_pto_entit_warning
,p_exceeds_run_total_warning => l_exceeds_run_total_warning
,p_abs_overlap_warning => l_abs_overlap_warning
,p_abs_day_after_warning => l_abs_day_after_warning
,p_dur_overwritten_warning => l_dur_overwritten_warning
);
END;
/
-- Go to API List
hr_contact_rel_api.create_contact
set serveroutput on;
DECLARE
l_validate_mode BOOLEAN := FALSE;
l_datetrack_update_mode VARCHAR2(30);
l_row_id ROWID;
l_business_group_id NUMBER;
l_contact_type VARCHAR2(30);
l_contact_title VARCHAR2(30);
l_primary_flag VARCHAR2(30);
l_attribute16 VARCHAR2(150);
l_contact_full_name VARCHAR2(240);
l_person_type_id NUMBER;
l_sex VARCHAR2(30);
l_per_start_date DATE;
l_per_end_date DATE;
l_per_comment_id NUMBER;
l_name_comb_warning BOOLEAN;
l_contact_relationship_id NUMBER;
l_contact_rel_ovn NUMBER;
l_contact_person_id NUMBER;
l_contact_person_ovn NUMBER;
l_errors VARCHAR2(100);
L_ORIG_HIRE_WARNING boolean;
BEGIN
HR_CONTACT_REL_API.CREATE_CONTACT
( P_VALIDATE => FALSE
, P_DATE_START => '04-AUG-1999'
, P_START_DATE => '04-AUG-1999'
, P_BUSINESS_GROUP_ID => 626
, P_PERSON_ID => 367
-- , P_CONTACT_PERSON_ID => NULL
, P_CONTACT_TYPE => 'F'
, P_PRIMARY_CONTACT_FLAG => 'N'
, P_CONT_ATTRIBUTE16 => NULL
, P_LAST_NAME => 'BLOGGY1'
, P_SEX => 'M'
, P_PERSON_TYPE_ID => 101
, P_DATE_OF_BIRTH => '12-SEP-1977'
, P_FIRST_NAME => 'FRED'
--, P_TITLE => l_contact_title
, P_CONTACT_RELATIONSHIP_ID => l_contact_relationship_id
, P_CTR_OBJECT_VERSION_NUMBER => l_contact_rel_ovn
, P_PER_PERSON_ID => l_contact_person_id
, P_PER_OBJECT_VERSION_NUMBER => l_contact_person_ovn
, P_PER_EFFECTIVE_START_DATE => l_per_start_date
, P_PER_EFFECTIVE_END_DATE => l_per_end_date
, P_FULL_NAME => l_contact_full_name
, P_PER_COMMENT_ID => l_per_comment_id
, P_NAME_COMBINATION_WARNING => l_name_comb_warning
, P_ORIG_HIRE_WARNING => L_ORIG_HIRE_WARNING
);
END;
/
-- Go to API List
hr_applicant_api.create_gb_applicant
set serverout on;
declare
l_person_id per_people_f.person_id%TYPE;
l_assignment_id per_assignments_f.assignment_id%TYPE;
l_per_object_version_number per_people_f.object_version_number%TYPE;
l_asg_object_version_number per_people_f.object_version_number%TYPE;
l_apl_object_version_number per_applications.object_version_number%TYPE;
l_per_effective_start_date per_people_v.effective_start_date%TYPE;
l_per_effective_end_date per_people_v.effective_end_date%TYPE;
l_full_name per_people_f.full_name%TYPE;
l_per_comment_id per_people_f.comment_id%TYPE;
l_application_id per_applications.application_id%TYPE;
l_assignment_sequence per_people_assignments_view.assignment_sequence%TYPE;
l_applicant_number per_people_f.applicant_number%TYPE;
l_name_combination_warning boolean;
l_assign_payroll_warning boolean;
l_orig_hire_warning boolean;
begin
hr_applicant_api.create_gb_applicant
(
P_VALIDATE => FALSE
,P_DATE_RECEIVED => to_date('31-DEC-1999','DD-MON-YYYY')
,P_DATE_OF_BIRTH => to_date('01-OCT-1985','DD-MON-YYYY')
,P_BUSINESS_GROUP_ID => 1379
,P_LAST_NAME => 'VF-TEST3'
,P_APPLICANT_NUMBER => l_applicant_number
,P_PERSON_ID => L_PERSON_ID
,P_ASSIGNMENT_ID => L_ASSIGNMENT_ID
,P_APPLICATION_ID => l_application_id
,P_PER_OBJECT_VERSION_NUMBER => L_PER_OBJECT_VERSION_NUMBER
,P_ASG_OBJECT_VERSION_NUMBER => L_ASG_OBJECT_VERSION_NUMBER
,P_APL_OBJECT_VERSION_NUMBER => L_APL_OBJECT_VERSION_NUMBER
,P_PER_EFFECTIVE_START_DATE => L_PER_EFFECTIVE_START_DATE
,P_PER_EFFECTIVE_END_DATE => L_PER_EFFECTIVE_END_DATE
,P_FULL_NAME => L_FULL_NAME
,P_PER_COMMENT_ID => L_PER_COMMENT_ID
,P_ASSIGNMENT_SEQUENCE => L_ASSIGNMENT_SEQUENCE
,P_NAME_COMBINATION_WARNING => L_NAME_COMBINATION_WARNING
,P_ORIG_HIRE_WARNING => L_ORIG_HIRE_WARNING
);
end;
/
-- Go to API List
hr_employee_api.create_gb_employee
set serverout on;
declare
l_employee_number per_people_f.employee_number%TYPE;
l_person_id per_people_f.person_id%TYPE;
l_assignment_id per_assignments_f.assignment_id%TYPE;
l_per_object_version_number per_people_f.object_version_number%TYPE;
l_asg_object_version_number per_people_f.object_version_number%TYPE;
l_per_effective_start_date per_people_v.effective_start_date%TYPE;
l_per_effective_end_date per_people_v.effective_end_date%TYPE;
l_full_name per_people_f.full_name%TYPE;
l_per_comment_id per_people_f.comment_id%TYPE;
l_assignment_sequence per_people_assignments_view.assignment_sequence%TYPE;
l_assignment_number per_people_assignments_view.assignment_number%TYPE;
l_name_combination_warning boolean;
l_assign_payroll_warning boolean;
begin
hr_employee_api.create_gb_employee
(
p_validate => FALSE
,p_hire_date => to_date('01-Jul-2000','DD-MON-YYYY')
,p_business_group_id => 1021
,p_first_name => 'FONGY'
,p_last_name => 'FONGY'
,p_sex => 'M'
,p_ni_number => 'WP934486A'
,p_employee_number => l_employee_number
,p_person_id => l_person_id
,p_assignment_id => l_assignment_id
,p_per_object_version_number => l_per_object_version_number
,p_asg_object_version_number => l_asg_object_version_number
,p_per_effective_start_date => l_per_effective_start_date
,p_per_effective_end_date => l_per_effective_end_date
,p_full_name => l_full_name
,p_per_comment_id => l_per_comment_id
,p_assignment_sequence => l_assignment_sequence
,p_assignment_number => l_assignment_number
,p_name_combination_warning => l_name_combination_warning
,p_assign_payroll_warning => l_assign_payroll_warning
);
dbms_output.put_line ('Person ID: ' || to_char(l_person_id));
end;
/
-- Go to API List
hr_organization_api.create_organization
set serveroutput on;
declare
l_date date := to_date('01-jan-2000','DD-MON-YYYY');
l_true boolean := false;
l_business_group_id number := 626;
l_language_code varchar2(10) := 'US';
l_name varchar2(80) := 'NJ TEST ORG';
l_internal_external_flag varchar2(80) := 'INT';
l_organization_id number;
l_object_version_number number;
l_duplicate_org_warning boolean;
begin
hr_organization_api.create_organization
( p_validate => l_true
,p_effective_date => l_date
,p_language_code => l_language_code
,p_business_group_id => l_business_group_id
,p_date_from => l_date
,p_name => l_name
,p_internal_external_flag => l_internal_external_flag
,p_organization_id => l_organization_id
,p_object_version_number => l_object_version_number
,P_duplicate_org_warning => l_duplicate_org_warning
);
end;
/
-- Go to API List
hr_position_api.create_position
set serveroutput on;
declare
l_true boolean :=false;
l_obj NUMBER;
l_JOB_ID NUMBER :=614;
l_ORGANIZATION_ID NUMBER :=1379;
l_DATE_EFFECTIVE DATE := to_date('01-DEC-2000', 'DD-MON-YYYY');
l_POSITION_ID NUMBER;
l_POSITION_DEFINITION_ID NUMBER;
l_NAME VARCHAR2(30);
l_segment1 VARCHAR(30) :='NJ TEST POSITION';
l_segment2 VARCHAR2(30) :='10';
begin
hr_position_api.create_position
(
p_validate => l_true
, p_object_version_number => l_obj
, p_JOB_ID => l_JOB_ID
, p_ORGANIZATION_ID => l_ORGANIZATION_ID
, p_DATE_EFFECTIVE => l_DATE_EFFECTIVE
, p_POSITION_ID => l_POSITION_ID
, p_POSITION_DEFINITION_ID => l_POSITION_DEFINITION_ID
, p_NAME => l_NAME
, p_segment1 => l_segment1
, p_segment2 => l_segment2
, p_location_id => 2694
);
end;
/
-- Go to API List
hr_assignment_api.create_secondary_emp_asg
set serveroutput on;
declare
l_date date := to_date('01-MAR-2012','DD-MON-YYYY');
l_assignment_number varchar2(30);
l_group_name varchar2(100);
l_concatenated_segments varchar2(100);
l_cagr_grade_def_id number;
l_cagr_concatenated_segments varchar2(100);
l_assignment_id number;
l_soft_coding_keyflex_id number;
l_effective_end_date date;
l_assignment_sequence number;
l_comment_id number;
l_other_manager_warning boolean;
l_hourly_salaried_warning boolean;
l_gsp_post_process_warning varchar2(100);
l_people_group_id number := 169;
l_ovn number;
l_person_id number := 367;
l_organization_id number := 647;
l_payroll_id number := 112;
l_location_id number := 431;
begin
hr_assignment_api.create_secondary_emp_asg
(p_validate => FALSE,
p_effective_date => to_date('01-MAR-2012','DD-MON-YYYY'),
p_person_id => l_person_id,
p_organization_id => l_organization_id,
p_payroll_id => l_payroll_id,
p_location_id => l_location_id,
p_assignment_number => l_assignment_number,
p_group_name => l_group_name,
p_concatenated_segments => l_concatenated_segments,
p_cagr_grade_def_id => l_cagr_grade_def_id,
p_cagr_concatenated_segments => l_cagr_concatenated_segments,
p_assignment_id => l_assignment_id,
p_soft_coding_keyflex_id => l_soft_coding_keyflex_id,
p_people_group_id => l_people_group_id,
p_object_version_number => l_ovn,
p_effective_start_date => l_date,
p_effective_end_date => l_effective_end_date,
p_assignment_sequence => l_assignment_sequence,
p_comment_id => l_comment_id,
p_other_manager_warning => l_other_manager_warning,
p_hourly_salaried_warning => l_hourly_salaried_warning,
p_gsp_post_process_warning => l_gsp_post_process_warning
);
end;
/
-- Go to API List
hr_sit_api.create_sit
declare
l_date date := to_date('02-DEC-2002', 'DD-MON-YYYY');
l_true boolean := false;
l_person_id number := 2831;
l_obj NUMBER;
l_business_group_id number := 1379;
l_id_flex_num number := 51058;
l_analysis_criteria_id number;
l_person_analysis_id number;
l_p_segment1 varchar2(250) := '30';
l_p_segment2 varchar2(250) := '30';
l_p_segment3 varchar2(250) := '10';
l_p_segment4 varchar2(250) := '30-jan-2002';
cursor csr_ovn is
select max(object_version_number)
from per_people_f where person_id=l_person_id;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
hr_sit_api.create_sit
(
p_validate => l_true
, p_effective_date => l_date
, p_person_id => l_person_id
, p_pea_object_version_number => l_obj
, p_business_group_id => l_business_group_id
, p_id_flex_num => l_id_flex_num
, p_analysis_criteria_id => l_analysis_criteria_id
, p_person_analysis_id => l_person_analysis_id
, p_segment1 => l_p_segment1
, p_segment2 => l_p_segment2
, p_segment3 => l_p_segment3
, p_segment4 => l_p_segment4
);
end;
/
-- Go to API List
hr_user_acct_api.create_user_acct
set serveroutput on;
declare
l_business_group_id number := 1379;
l_user_id number := 123456;
l_true boolean := false;
l_per_effective_start_date date := to_date('26-JUL-2001', 'DD-MON-YYYY');
l_per_effective_end_date date := to_date('31-DEC-4712', 'DD-MON-YYYY');
l_assignment_id number := 3976;
l_asg_effective_start_date date := to_date('26-JUL-2001', 'DD-MON-YYYY');
l_asg_effective_end_date date := to_date('31-DEC-4712', 'DD-MON-YYYY');
l_date_from date := to_date('26-JUL-2001', 'DD-MON-YYYY');
l_date_to date := to_date('31-DEC-4712', 'DD-MON-YYYY');
l_hire_date date := to_date('26-JUL-2001', 'DD-MON-YYYY');
l_org_structure_id number := 192;
l_org_structure_version_id number := 249;
l_parent_org_id number := 1;
l_single_org_id number := 1;
l_run_type varchar2(30) := 'Bum';
begin
hr_user_acct_api.create_user_acct
(
p_validate => l_true
,p_business_group_id => l_business_group_id
,p_user_id => l_user_id
,p_per_effective_start_date => l_per_effective_start_date
,p_per_effective_end_date => l_per_effective_end_date
,p_assignment_id => l_assignment_id
,p_asg_effective_start_date => l_asg_effective_start_date
,p_asg_effective_end_date => l_asg_effective_end_date
,p_date_from => l_date_from
,p_date_to => l_date_to
,p_hire_date => l_hire_date
,p_org_structure_id => l_org_structure_id
,p_org_structure_version_id => l_org_structure_version_id
,p_parent_org_id => l_parent_org_id
,p_single_org_id => l_single_org_id
,p_run_type => l_run_type
);
end;
/
-- Go to API List
hr_assignment_api.delete_assignment
set serveroutput on;
declare
v_date date := to_date('21052012','ddmmyyyy');
v_assignment_id number;
v_person_id number;
l_aantal number;
l_effective_start_date per_all_assignments_f.effective_start_date%TYPE;
l_effective_end_date per_all_assignments_f.effective_end_date%TYPE;
l_loc_change_tax_inssues boolean;
l_delete_asg_budgets boolean;
l_org_now_no_manager_warning boolean;
l_element_salary_warning boolean;
l_element_entries_warning boolean;
l_spp_warning boolean;
l_cost_warning Boolean;
l_life_events_exists Boolean;
l_cobra_coverage_elements Boolean;
l_assgt_term_elements Boolean;
l_object_version_number number;
l_fout varchar2(3);
l_assignment_id per_all_assignments_f.assignment_id%type;
l_asg_obj_version_number per_all_assignments_f.object_version_number%type;
l_assignment_sequence number;
l_assignment_number per_all_assignments_f.assignment_number%type;
l_assign_payroll_warning boolean;
l_ontslag per_periods_of_service%rowtype;
l_rowid varchar2(2000);
l_dodwarning boolean;
l_s_final_process_date date;
l_s_actual_termination_date date;
l_assignment_status_type_id per_all_assignments_f.assignment_status_type_id%type;
l_requery_required varchar2(1);
l_rowid rowid;
cursor c_obj is
select object_version_number
from per_all_assignments_f paaf
where paaf.person_id = v_person_id
and paaf.assignment_id = v_assignment_id
and v_date between paaf.effective_start_date and paaf.effective_end_date;
begin
v_assignment_id := 35158;
v_person_id := 34634;
open c_obj;
fetch c_obj into l_object_version_number;
close c_obj;
begin
hr_assignment_api.delete_assignment
(p_validate => FALSE
,p_effective_date => v_date -1
,p_datetrack_mode => 'DELETE_NEXT_CHANGE'
,p_assignment_id => v_assignment_id
,p_object_version_number => l_object_version_number
,p_effective_start_date => l_effective_start_date
,p_effective_end_date => l_effective_end_date
,p_loc_change_tax_issues => l_loc_change_tax_inssues
,p_delete_asg_budgets => l_delete_asg_budgets
,p_org_now_no_manager_warning => l_org_now_no_manager_warning
,p_element_salary_warning => l_element_salary_warning
,p_element_entries_warning => l_element_entries_warning
,p_spp_warning => l_spp_warning
,P_cost_warning => l_cost_warning
,p_life_events_exists => l_life_events_exists
,p_cobra_coverage_elements => l_cobra_coverage_elements
,p_assgt_term_elements => l_assgt_term_elements);
--
exception
when others then
dbms_output.put_line(substr(sqlerrm,1,200));
end;
end;
/
-- Go to API List
hr_person_absence_api.update_person_absence
DECLARE
l_absence_days Number :=3;
l_absence_hours Number;
l_absence_attendance_id Number :=194537;
l_obj Number;
l_dur_dys_less_warning boolean;
l_dur_hrs_less_warning boolean;
l_exceeds_pto_entit_warning boolean;
l_exceeds_run_total_warning boolean;
l_abs_overlap_warning boolean;
l_abs_day_after_warning boolean;
l_dur_overwritten_warning boolean;
l_del_element_entry_warning boolean;
l_date_start date :=to_date('01-sep-2011','DD-MON-YYYY');
l_date_end date:=to_date('15-sep-2011','DD-MON-YYYY');
cursor csr_ovn is
select max(object_version_number)
from per_absence_attendances where absence_attendance_id=l_absence_attendance_id;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
hr_person_absence_api.update_person_absence
(p_validate => FALSE
,p_effective_date => to_date('01-SEP-2011','DD-MON-YYYY')
,p_absence_attendance_id => l_absence_attendance_id
,p_abs_attendance_reason_id => 74 -- the reason before was null - now changing to id 74 (COLD)
,p_absence_days => l_absence_days
,p_absence_hours => l_absence_hours
,p_object_version_number => l_obj
,p_dur_dys_less_warning => l_dur_dys_less_warning
,p_dur_hrs_less_warning => l_dur_hrs_less_warning
,p_exceeds_pto_entit_warning => l_exceeds_pto_entit_warning
,p_exceeds_run_total_warning => l_exceeds_run_total_warning
,p_abs_overlap_warning => l_abs_overlap_warning
,p_abs_day_after_warning => l_abs_day_after_warning
,p_dur_overwritten_warning => l_dur_overwritten_warning
,p_del_element_entry_warning => l_del_element_entry_warning
);
END;
/
-- Go to API List
hr_application_api.update_apl_details
set serveroutput on;
declare
l_true boolean := false;
l_application_id number := 2592;
l_obj NUMBER;
l_person_id number :=7814;
l_attrib4 varchar2(30) :='Applicant';
cursor csr_ovn is
select max(object_version_number)
from per_people_f where person_id=l_person_id;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
hr_application_api.update_apl_details
(
p_validate => l_true
, p_application_id => l_application_id
, p_object_version_number => l_obj
, p_appl_attribute4 => l_attrib4
);
end;
/
-- Go to API List
hr_assignment_api.update_emp_asg_criteria
set serveroutput on;
declare
l_date date := to_date('01-OCT-2009', 'DD-MON-YYYY');
l_true boolean := false;
l_assign_id number := 32923;
l_obj NUMBER;
l_datetrack_update_mode VARCHAR2(30);
l_organization_id number;
l_special_ceiling_step_id number;
l_EFFECTIVE_START_DATE DATE;
l_EFFECTIVE_END_DATE DATE;
l_people_group_id number;
l_group_name varchar2(30);
l_org_now_no_manager_warning BOOLEAN;
l_other_manager_warning boolean;
l_spp_delete_warning boolean;
l_entries_changed_warning varchar2(30);
l_tax_district_changed_warning boolean;
cursor csr_ovn is
select max(object_version_number)
from per_assignments_f where assignment_id=32923;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
hr_assignment_api.update_emp_asg_criteria
(
P_VALIDATE => l_true
,P_EFFECTIVE_DATE => l_date
,P_DATETRACK_UPDATE_MODE => 'CORRECTION'
,P_ASSIGNMENT_ID => l_assign_id
,P_OBJECT_VERSION_NUMBER => l_obj
-- ,p_organization_id => 626
,p_special_ceiling_step_id => l_special_ceiling_step_id
,P_effective_start_date => l_effective_start_date
,p_effective_end_date => l_effective_end_date
,p_people_group_id => l_people_group_id
,p_group_name => l_group_name
,p_org_now_no_manager_warning => l_org_now_no_manager_warning
,p_other_manager_warning => l_other_manager_warning
,p_spp_delete_warning => l_spp_delete_warning
,p_entries_changed_warning => l_entries_changed_warning
,p_tax_district_changed_warning => l_tax_district_changed_warning
, p_segment11 => 'Abbott, Mr. John'
);
end;
/
-- Go to API List
hr_person_api.update_gb_person
set serveroutput on;
declare
l_date date := to_date('01-SEP-2002', 'DD-MON-YYYY');
l_true boolean := false;
l_person_id number := 367
l_employee_number varchar2(30) := '4';
l_obj NUMBER;
l_attribute1 VARCHAR2(30) := 'Yes';
l_comment_id number;
l_datetrack_update_mode VARCHAR2(30);
l_EFFECTIVE_START_DATE DATE := to_date('01-DEC-2002', 'DD-MON-YYYY');
l_EFFECTIVE_END_DATE DATE;
l_name_combination_warning BOOLEAN;
l_assign_payroll_warning boolean;
l_full_name VARCHAR2(30) := '-Anthony--Ambrose';
l_orig_hire_warning BOOLEAN;
cursor csr_ovn is
select max(object_version_number)
from per_people_f where person_id=l_person_id;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
hr_person_api.update_gb_person
(
p_validate => l_true
, p_effective_date => l_date
, p_datetrack_update_mode => 'CORRECTION'
, p_person_id => l_person_id
, p_object_version_number => l_obj
, p_employee_number => l_employee_number
, p_attribute1 => l_attribute1
, p_effective_start_date => l_effective_start_date
, p_effective_end_date => l_effective_end_date
, p_full_name => l_full_name
, p_comment_id => l_comment_id
, p_name_combination_warning => l_name_combination_warning
, p_assign_payroll_warning => l_assign_payroll_warning
, p_orig_hire_warning => l_orig_hire_warning
);
end;
/
-- Go to API List
hr_sit_api.update_sit
set serveroutput on;
declare
l_date date := to_date('01-DEC-2000', 'DD-MON-YYYY');
l_true boolean := false;
l_person_id number := 2831;
l_obj NUMBER;
l_business_group_id number := 1379;
l_id_flex_num number := 51058;
l_analysis_criteria_id number := 2029;
l_person_analysis_id number := 1735;
cursor csr_ovn is
select max(object_version_number)
from per_people_f where person_id=l_person_id;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
hr_sit_api.update_sit
(
p_validate => l_true
, p_effective_date => l_date
, p_person_id => l_person_id
, p_pea_object_version_number => l_obj
, p_business_group_id => l_business_group_id
, p_id_flex_num => l_id_flex_num
, p_analysis_criteria_id => l_analysis_criteria_id
, p_person_analysis_id => l_person_analysis_id
, p_analysis_criteria_id => l_analysis_criteria_id
, p_segment1 => '30'
, p_segment2 => '40'
, p_segment3 => '10'
, p_segment4 => '21-JUL-2001'
);
end;
/
-- Go to API List
hr_upload_proposal_api.upload_salary_proposal
set serveroutput on;
declare
L_VALIDATE BOOLEAN := FALSE;
L_BUSINESS_GROUP_ID NUMBER := 626;
L_PROPOSAL_REASON VARCHAR2(20) := 'COL';
L_PAY_PROPOSAL_ID NUMBER := null;
L_OBJECT_VERSION_NUMBER NUMBER := null;
L_COMPONENT_REASON VARCHAR2(10) := null;
L_APPROVED_1 VARCHAR2(10) := null;
L_COMPONENT_ID_1 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_1 NUMBER := null;
L_APPROVED_2 VARCHAR2(10) := null;
L_COMPONENT_ID_2 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_2 NUMBER := null;
L_APPROVED_3 VARCHAR2(10) := null;
L_COMPONENT_ID_3 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_3 NUMBER := null;
L_APPROVED_4 VARCHAR2(10) := null;
L_COMPONENT_ID_4 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_4 NUMBER := null;
L_APPROVED_5 VARCHAR2(10) := null;
L_COMPONENT_ID_5 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_5 NUMBER := null;
L_APPROVED_6 VARCHAR2(10) := null;
L_COMPONENT_ID_6 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_6 NUMBER := null;
L_APPROVED_7 VARCHAR2(10) := null;
L_COMPONENT_ID_7 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_7 NUMBER := null;
L_APPROVED_8 VARCHAR2(10) := null;
L_COMPONENT_ID_8 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_8 NUMBER := null;
L_APPROVED_9 VARCHAR2(10) := null;
L_COMPONENT_ID_9 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_9 NUMBER := null;
L_APPROVED_10 VARCHAR2(10) := null;
L_COMPONENT_ID_10 NUMBER := null;
L_PPC_OBJECT_VERSION_NUMBER_10 NUMBER := null;
L_PYP_PROPOSED_SAL_WARNING BOOLEAN := FALSE;
l_ADDITIONAL_COMP_WARNING BOOLEAN := FALSE;
L_PERSON NUMBER := 517;
L_ASSIGNMENT NUMBER := 524;
L_START_DATE DATE := NULL;
L_END_DATE DATE := NULL;
L_MSG VARCHAR2(200) := NULL;
L_STATUS VARCHAR2(10) := 'VALID';
L_COUNTER NUMBER := 0;
l_date date := to_date('01-Aug-2013', 'DD-MON-YYYY');
l_proposed_salary VARCHAR2(30) := '21000.00';
l_err_num NUMBER;
l_err_msg VARCHAR2(100);
begin
hr_upload_proposal_api.upload_salary_proposal
( p_validate => FALSE
, p_change_date => l_date
, p_business_group_id => l_business_group_id
, p_assignment_id => l_assignment
, p_proposed_salary => l_proposed_salary
, p_proposal_reason => l_proposal_reason
, p_pay_proposal_id => l_pay_proposal_id
, p_object_version_number => l_object_version_number
, p_component_reason_1 => l_component_reason
, p_approved_1 => l_approved_1
, p_component_id_1 => l_component_id_1
, p_ppc_object_version_number_1 => l_ppc_object_version_number_1
, p_component_reason_2 => l_component_reason
, p_approved_2 => l_approved_2
, p_component_id_2 => l_component_id_2
, p_ppc_object_version_number_2 => l_ppc_object_version_number_2
, p_component_reason_3 => l_component_reason
, p_approved_3 => l_approved_3
, p_component_id_3 => l_component_id_3
, p_ppc_object_version_number_3 => l_ppc_object_version_number_3
, p_component_reason_4 => l_component_reason
, p_approved_4 => l_approved_4
, p_component_id_4 => l_component_id_4
, p_ppc_object_version_number_4 => l_ppc_object_version_number_4
, p_component_reason_5 => l_component_reason
, p_approved_5 => l_approved_5
, p_component_id_5 => l_component_id_5
, p_ppc_object_version_number_5 => l_ppc_object_version_number_5
, p_component_reason_6 => l_component_reason
, p_approved_6 => l_approved_6
, p_component_id_6 => l_component_id_6
, p_ppc_object_version_number_6 => l_ppc_object_version_number_6
, p_component_reason_7 => l_component_reason
, p_approved_7 => l_approved_7
, p_component_id_7 => l_component_id_7
, p_ppc_object_version_number_7 => l_ppc_object_version_number_7
, p_component_reason_8 => l_component_reason
, p_approved_8 => l_approved_8
, p_component_id_8 => l_component_id_8
, p_ppc_object_version_number_8 => l_ppc_object_version_number_8
, p_component_reason_9 => l_component_reason
, p_approved_9 => l_approved_9
, p_component_id_9 => l_component_id_9
, p_ppc_object_version_number_9 => l_ppc_object_version_number_9
, p_component_reason_10 => l_component_reason
, p_approved_10 => l_approved_10
, p_component_id_10 => l_component_id_10
, p_ppc_object_version_number_10 => l_ppc_object_version_number_10
, p_pyp_proposed_sal_warning => l_pyp_proposed_sal_warning
, p_additional_comp_warning => l_additional_comp_warning
);
end;
/
-- Go to API List
hr_assignment_api.create_gb_secondary_emp_asg
DECLARE
vv_group_name VARCHAR2(150);
vn_people_group_id NUMBER;
vn_assignment_sequence NUMBER;
vn_comment_id NUMBER;
vb_other_manager_warning BOOLEAN;
vb_hourly_salaried_warning BOOLEAN;
vn_cagr_grade_def_id NUMBER;
vv_cagr_concatenated_segments VARCHAR2(150);
vt_assignment_number VARCHAR2(50);
vt_assignment_id NUMBER;
vt_ass_object_version_number NUMBER;
vt_ass_eff_from_date DATE;
vt_ass_eff_to_date DATE;
BEGIN
vt_assignment_number := NULL;
hr_assignment_api.create_gb_secondary_emp_asg(p_validate => FALSE,
p_effective_date => TRUNC(SYSDATE),
p_person_id => 33255,
p_organization_id => 8464,
--OPTIONAL
p_job_id => 52906,
p_location_id => 519,
--IN/OUT
p_assignment_number => vt_assignment_number,
--OUT
p_group_name => vv_group_name,
p_assignment_id => vt_assignment_id,
p_people_group_id => vn_people_group_id,
p_object_version_number => vt_ass_object_version_number,
p_effective_start_date => vt_ass_eff_from_date,
p_effective_end_date => vt_ass_eff_to_date,
p_assignment_sequence => vn_assignment_sequence,
p_comment_id => vn_comment_id,
p_other_manager_warning => vb_other_manager_warning,
p_hourly_salaried_warning => vb_hourly_salaried_warning,
p_cagr_grade_def_id => vn_cagr_grade_def_id,
p_cagr_concatenated_segments => vv_cagr_concatenated_segments
);
DBMS_OUTPUT.put_line('ID: ' || vt_assignment_id || ', number: ' || vt_assignment_number);
END;
/
-- Go to API List
hr_assignment_api.set_new_primary_asg
DECLARE
l_object_version_number per_all_assignments_f.object_version_number%type;
l_primary_assignment_id per_all_assignments_f.assignment_id%type;
l_primary_ovn per_all_assignments_f.object_version_number%type;
x_end_date DATE;
x_start_date DATE;
x_ovn per_all_assignments_f.object_version_number%type;
BEGIN
hr_assignment_api.set_new_primary_asg(p_validate => FALSE,
p_effective_date => '02-JUN-2010',
p_person_id => 60130,
p_assignment_id => 59381,
p_object_version_number => x_ovn,
p_effective_start_date => x_start_date,
p_effective_end_date => x_end_date);
end;
/
-- Go to API List
hr_assignment_api.actual_termination_emp_asg
DECLARE
l_object_version_number per_all_assignments_f.object_version_number%type;
l_primary_assignment_id per_all_assignments_f.assignment_id%type;
l_primary_ovn per_all_assignments_f.object_version_number%type;
x_end_date DATE;
x_start_date DATE;
x_ovn per_all_assignments_f.object_version_number%type;
x_asg_future_changes_warning BOOLEAN;
x_entries_changed_warning VARCHAR2(100);
x_pay_proposal_warning BOOLEAN;
BEGIN
select max(object_version_number)
into l_primary_ovn
from per_all_assignments_f
where assignment_id=59380;
hr_assignment_api.actual_termination_emp_asg
(p_validate => FALSE,
p_assignment_id => 59380,
p_object_version_number => l_primary_ovn,
p_actual_termination_date => '03-JUN-2010',
p_effective_start_date => x_start_date,
p_effective_end_date => x_end_date,
p_asg_future_changes_warning => x_asg_future_changes_warning,
p_entries_changed_warning => x_entries_changed_warning,
p_pay_proposal_warning => x_pay_proposal_warning);
end;
/
-- Go to API List
hr_employee_api.re_hire_ex_employee
DECLARE
l_object_version_number per_all_people_f.object_version_number%type;
x_assignment_id per_all_people_f.assignment_id%type;
x_asg_object_version_number per_all_people_f.object_version_number%type;
x_effective_start_date DATE;
x_effective_end_date DATE;
x_assignment_sequence per_all_assignments_f.assignment_sequence%type;
x_assignment_number per_all_assignments_f.assignment_number%type;
x_assign_payroll_warning BOOLEAN;
BEGIN
select max(object_version_number)
into l_object_version_number
from per_all_people_f
where person_id=72302;
hr_employee_api.re_hire_ex_employee(
p_validate => false,
P_hire_date => sysdate,
P_person_id => 72302,
p_per_object_version_number => l_object_version_number,
p_person_type_id => 44,
p_rehire_reason => null,
p_assignment_id => x_assignment_id,
p_asg_object_version_number => x_asg_object_version_number,
p_per_effective_start_date => x_effective_start_date,
p_per_effective_end_date => x_effective_end_date,
p_assignment_sequence => x_assignment_sequence,
p_assignment_number => x_assignment_number,
p_assign_payroll_warning => x_assign_payroll_warning)
end;
/
-- Go to API List
hr_person_api.update_person
set serveroutput on;
DECLARE
l_date date := to_date('01-APR-2010', 'DD-MON-YYYY');
l_true boolean := false;
l_person_id number := 35848;
l_employee_number varchar2(30) := '1178';
l_obj NUMBER :=4;
l_comment_id number;
l_EFFECTIVE_START_DATE DATE;
l_EFFECTIVE_END_DATE DATE;
l_name_combination_warning BOOLEAN;
l_assign_payroll_warning boolean;
l_orig_hire_warning BOOLEAN;
l_full_name VARCHAR2(30);
l_last_name VARCHAR2(30) := 'DIFFERENT';
BEGIN
hr_person_api.update_person
(
p_validate => l_true
, p_effective_date => l_date
, p_datetrack_update_mode => 'CORRECTION'
, p_person_id => l_person_id
, p_object_version_number => l_obj
, p_last_name => l_last_name
, p_employee_number => l_employee_number
, p_effective_start_date => l_effective_start_date
, p_effective_end_date => l_effective_end_date
, p_full_name => l_full_name
, p_comment_id => l_comment_id
, p_name_combination_warning => l_name_combination_warning
, p_assign_payroll_warning => l_assign_payroll_warning
, p_orig_hire_warning => l_orig_hire_warning
);
end;
/
-- Go to API List
hr_contact_rel_api.delete_contact_relationship
CONTACT_RELATIONSHIP_ID
OVN
DECLARE
l_true_boolean := FALSE;
l_contact_relationship_id := 147;
l_object_version_number := 7;
BEGIN
hr_contact_rel_api.delete_contact_relationship
(
l_true_boolean
, l_contact_relationship_id
, l_object_version_number
);
END;
/
-- Go to API List
hr_assignment_api.update_emp_asg
set serveroutput on;
DECLARE
i_effective_date DATE := to_date('01-DEC-2012', 'DD-MON-YYYY');
i_datetrack_update_mode VARCHAR2 (30) := 'CORRECTION';
i_assignment_id NUMBER := 34078;
l_obj NUMBER;
io_cagr_grade_def_id NUMBER;
o_cagr_concatenated_segments VARCHAR2 (240);
o_concatenated_segments VARCHAR2 (240);
o_comment_id NUMBER;
o_effective_start_date DATE;
o_effective_end_date DATE;
o_no_managers_warning BOOLEAN;
o_other_manager_warning BOOLEAN;
o_hourly_salaried_warning BOOLEAN;
o_gsp_post_process_warning VARCHAR2 (240);
l_people_group_id NUMBER;
l_object_version_number NUMBER;
l_special_ceiling_step_id NUMBER;
l_soft_coding_keyflex_id NUMBER;
l_group_name VARCHAR2 (240);
l_effective_start_date DATE;
l_effective_end_date DATE;
l_org_now_no_manager_warning BOOLEAN;
l_other_manager_warning BOOLEAN;
l_spp_delete_warning BOOLEAN;
l_entries_changed_warning VARCHAR2 (240);
l_tax_district_changed_warning BOOLEAN;
l_concatenated_segments VARCHAR2 (240);
l_projected_assignment_end date;
cursor csr_ovn is
select max(object_version_number)
from per_assignments_f where assignment_id=i_assignment_id;
begin
open csr_ovn;
fetch csr_ovn into l_obj;
close csr_ovn;
hr_assignment_api.update_emp_asg
(
p_effective_date => i_effective_date,
p_datetrack_update_mode => i_datetrack_update_mode,
p_assignment_id => i_assignment_id,
p_object_version_number => l_obj,
p_cagr_grade_def_id => io_cagr_grade_def_id,
p_cagr_concatenated_segments => o_cagr_concatenated_segments,
p_concatenated_segments => o_concatenated_segments,
p_soft_coding_keyflex_id => l_soft_coding_keyflex_id,
p_comment_id => o_comment_id,
p_effective_start_date => o_effective_start_date,
p_effective_end_date => o_effective_end_date,
p_no_managers_warning => o_no_managers_warning,
p_other_manager_warning => o_other_manager_warning,
p_hourly_salaried_warning => o_hourly_salaried_warning,
p_gsp_post_process_warning => o_gsp_post_process_warning
,p_assignment_number => 'YY123'
);
end;
/
-- Go to API List
hr_grade_rate_value_api.update_grade_rate_value
declare
l_rule_id number := 218;
l_ovn number;
l_start_date date;
l_end_date date;
l_eff_date date := trunc(sysdate + 2);
begin
select object_version_number into l_ovn
from pay_grade_rules_f where grade_rule_id = l_rule_id
and l_eff_date between effective_start_date and effective_end_date;
hr_grade_rate_value_api.update_grade_rate_value
(p_effective_date => trunc(sysdate + 2)
,p_datetrack_update_mode => 'CORRECTION'
,p_grade_rule_id => l_rule_id
,p_object_version_number => l_ovn
,p_minimum => 8000
,p_effective_start_date => l_start_date
,p_effective_end_date => l_end_date);
end;
/
INV
INV_COST_GROUP_PUB
INV_ITEM_CATALOG_ELEM_PUB
INV_ITEM_CATEGORY_PUB
INV_ITEM_PUB
INV_ITEM_REVISION_PUB
INV_ITEM_STATUS_PUB
INV_LOT_API_PUB
INV_MATERIAL_STATUS_PUB
INV_MOVEMENT_STATISTICS_PUB
INV_MOVE_ORDER_PUB
INV_PICK_RELEASE_PUB
INV_PICK_WAVE_PICK_CONFIRM_PUB
INV_RESERVATION_PUB
INV_SERIAL_NUMBER_PUB
INV_SHIPPING_TRANSACTION_PUB
No comments:
Post a Comment