The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure update_calendar_entry
(p_validate in boolean default false
,p_effective_date in date
,p_calendar_entry_id in number
,p_object_version_number in out nocopy number
,p_name in varchar2 default hr_api.g_varchar2
,p_type in varchar2 default hr_api.g_varchar2
,p_start_date in date
,p_start_hour in varchar2 default hr_api.g_varchar2
,p_start_min in varchar2 default hr_api.g_varchar2
,p_end_date in date
,p_end_hour in varchar2 default hr_api.g_varchar2
,p_end_min in varchar2 default hr_api.g_varchar2
,p_description in varchar2 default hr_api.g_varchar2
,p_hierarchy_id in number default hr_api.g_number
,p_value_set_id in number default hr_api.g_number
,p_organization_structure_id in number default hr_api.g_number
,p_org_structure_version_id in number default hr_api.g_number
,p_business_group_id in number default null
) is
--
-- Declare cursors and local variables
--
l_proc varchar2(80) := g_package||'update_calendar_entry';
savepoint update_calendar_entry;
HR_CALENDAR_ENTRY_BK2.update_calendar_entry_b
(p_effective_date => l_effective_date
,p_object_version_number => l_object_version_number
,p_calendar_entry_id => p_calendar_entry_id
,p_name => p_name
,p_type => p_type
,p_start_date => p_start_date
,p_start_hour => p_start_hour
,p_start_min => p_start_min
,p_end_date => p_end_date
,p_end_hour => p_end_hour
,p_end_min => p_end_min
,p_description => p_description
,p_hierarchy_id => p_hierarchy_id
,p_value_set_id => p_value_set_id
,p_organization_structure_id => p_organization_structure_id
,p_org_structure_version_id => p_org_structure_version_id
);
(p_module_name => 'update_calendar_entry_b'
,p_hook_type => 'BP'
);
HR_CALENDAR_ENTRY_BK2.update_calendar_entry_a
(p_effective_date => l_effective_date
,p_calendar_entry_id => p_calendar_entry_id
,p_object_version_number => l_object_version_number
,p_name => p_name
,p_type => p_type
,p_start_date => p_start_date
,p_start_hour => p_start_hour
,p_start_min => p_start_min
,p_end_date => p_end_date
,p_end_hour => p_end_hour
,p_end_min => p_end_min
,p_description => p_description
,p_hierarchy_id => p_hierarchy_id
,p_value_set_id => p_value_set_id
,p_organization_structure_id => p_organization_structure_id
,p_org_structure_version_id => p_org_structure_version_id
);
(p_module_name => 'update_calendar_entry_a'
,p_hook_type => 'AP'
);
rollback to update_calendar_entry;
rollback to update_calendar_entry;
end update_calendar_entry;
procedure delete_calendar_entry
(p_validate in boolean default false
,p_calendar_entry_id in number
,p_object_version_number in number
) is
--
-- Declare cursors and local variables
--
CURSOR csr_ev IS
Select env.CAL_ENTRY_VALUE_ID, env.OBJECT_VERSION_NUMBER
From per_cal_entry_values env
Where env.calendar_entry_id = p_calendar_entry_id
Order By decode(env.parent_ENTRY_VALUE_ID,NULL,1,2) desc;
l_proc varchar2(72) := g_package||'delete_calendar_entry';
savepoint delete_calendar_entry;
HR_CALENDAR_ENTRY_BK3.delete_calendar_entry_b
(p_calendar_entry_id => p_calendar_entry_id,
p_object_version_number => p_object_version_number
);
(p_module_name => 'delete_calendar_entry_b',
p_hook_type => 'BP'
);
hr_cal_entry_value_api.DELETE_ENTRY_VALUE
(P_VALIDATE => false
,P_CAL_ENTRY_VALUE_ID => del_rec.CAL_ENTRY_VALUE_ID
,P_OBJECT_VERSION_NUMBER => del_rec.OBJECT_VERSION_NUMBER);
HR_CALENDAR_ENTRY_BK3.delete_calendar_entry_a
(p_calendar_entry_id => p_calendar_entry_id,
p_object_version_number => p_object_version_number
);
(p_module_name => 'delete_calendar_entry_a',
p_hook_type => 'AP'
);
ROLLBACK TO delete_calendar_entry;
ROLLBACK TO delete_calendar_entry;
end delete_calendar_entry;