-- Following is the sample
code to programmatically create Flex value for a particular Value set
--API Name:
fnd_flex_val_api.create_independent_vset_value
-- Parameters:
-- P_DATE -- Effective Date
-- P_ASSIGNMENT_ID -- Assignment_Id
-- P_JOB_ID -- Job_ID
-- P_POSITION_ID -- Position_Id
DECLARE
l_date DATE := TO_DATE ('&P_DATE', 'DD-MON-YYYY');
l_true BOOLEAN := FALSE;
l_assign_id NUMBER := &P_ASSIGNMENT_ID;
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;
l_job_id NUMBER := &P_JOB_ID;
l_position_id NUMBER := &P_POSITION_ID;
CURSOR csr_ovn
IS
SELECT object_version_number
FROM per_all_assignments_f
WHERE assignment_id = l_assign_id
AND l_date BETWEEN effective_start_date AND effective_end_date;
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 => 'UPDATE',
p_assignment_id => l_assign_id,
p_object_version_number => l_obj,
p_job_id => l_job_id,
p_position_id => l_position_id,
p_ass_attribute1 => l_emp_job_imp_rec.mgr_level,
p_ass_attribute2 => l_emp_job_imp_rec.per_sal_type,
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);
DBMS_OUTPUT.put_line
('Successfully updated job id to
assignment ');
EXCEPTION
WHEN OTHERS
THEN
DBMS_OUTPUT.put_line
('Exception=>' || SQLERRM);
END;
No comments:
Post a Comment