The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure update_hr_gl_flex
(p_effective_date in date
,p_gl_default_segment_id in number
,p_object_version_number in out nocopy number
,p_cross_charge_id in number default hr_api.g_number
,p_segment in varchar2 default hr_api.g_varchar2
,p_segment_num in number default hr_api.g_number
,p_hr_data_source in varchar2 default hr_api.g_varchar2
,p_constant in varchar2 default hr_api.g_varchar2
,p_hr_cost_segment in varchar2 default hr_api.g_varchar2
,p_validate in boolean default false
) is
l_effective_date date;
l_proc varchar2(72) := g_package||'update_hr_gl_flex';
savepoint update_hr_gl_flex;
OTA_THG_BK2.update_hr_gl_flex_b
(p_effective_date => l_effective_date
,p_cross_charge_id => p_cross_charge_id
,p_segment => p_segment
,p_segment_num => p_segment_num
,p_hr_data_source => p_hr_data_source
,p_constant => p_constant
,p_hr_cost_segment => p_hr_cost_segment
,p_gl_default_segment_id => p_gl_default_segment_id
,p_object_version_number => p_object_version_number
);
(p_module_name => 'update_hr_gl_flex_b'
,p_hook_type => 'BP'
);
OTA_THG_BK2.update_hr_gl_flex_a
(p_effective_date => l_effective_date
,p_cross_charge_id => p_cross_charge_id
,p_segment => p_segment
,p_segment_num => p_segment_num
,p_hr_data_source => p_hr_data_source
,p_constant => p_constant
,p_hr_cost_segment => p_hr_cost_segment
,p_gl_default_segment_id => p_gl_default_segment_id
,p_object_version_number => p_object_version_number
);
(p_module_name => 'update_hr_gl_flex_a'
,p_hook_type => 'AP'
);
rollback to update_hr_gl_flex;
rollback to update_hr_gl_flex;
end update_hr_gl_flex;