DECLARE
l_combination_name VARCHAR2(100);
l_combination_name VARCHAR2(100);
NUMBER; l_effective_start_date
DATE; l_effective_end_date
DATE; l_cost_allocation_keyflex_id
NUMBER;l_cc_object_version_number NUMBER; BEGIN
pay_cost_allocation_api.create_cost_allocation
(p_validate => FALSE,
p_effective_date => SYSDATE,
p_assignment_id => 11972,
p_proportion => 1,
p_business_group_id => 81,
p_segment1 => '600',
p_segment2 => '310000',
p_segment3 => 'AFA',
p_combination_name => l_combination_name
p_cost_allocation_id => l_cost_allocation_id
p_effective_start_date => l_effective_start_date
p_effective_end_date => l_effective_end_date
p_cost_allocation_keyflex_id => l_cost_allocation_keyflex_id
p_object_version_number => l_object_version_number
);
EXCEPTIONWHEN OTHERSTHENapi_msg := SUBSTR(SQLERRM,1,2400);
Fnd_File.put_line(Fnd_File.log,'Error - '||api_msg);
END;