The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in ame_act_shd.g_rec_type
) IS
--
createdBy ame_actions.created_by%type;
l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
select action_type_id
from ame_action_types
where
name in (ame_util.preApprovalTypeName,
ame_util.postApprovalTypeName,
ame_util.groupChainApprovalTypeName) and
p_effective_date between start_date and
nvl(end_date - ame_util.oneSecond, p_effective_date);
/* Seeded actions cannot be deleted. */
select ame_utility_pkg.is_seed_user(created_by)
into createdBy
from ame_actions
where
action_id = p_rec.action_id and
p_effective_date between start_date and
nvl(end_date - ame_util.oneSecond, p_effective_date);
/* Action is based on an approval group so it's not updateable. */
IF
nvl(p_rec.parameter,
hr_api.g_number) <>
nvl(ame_act_shd.g_old_rec.parameter,
hr_api.g_number) THEN
l_argument := 'parameter';
/* Descriptions for seeded actions cannot be updated. */
ELSIF(createdBy = ame_util.seededDataCreatedById
and ame_utility_pkg.check_seeddb = 'N') THEN
IF
nvl(p_rec.description,
hr_api.g_number) <>
nvl(ame_act_shd.g_old_rec.description,
hr_api.g_number) then
l_argument := 'description';
End chk_non_updateable_args;
select null
from ame_action_types
where
action_type_id = p_action_type_id and
p_effective_date between start_date and
nvl(end_date - ame_util.oneSecond, p_effective_date) ;
select null
from wf_roles
where
name = p_name
and status = 'ACTIVE'
and (expiration_date is null or
p_effective_date < expiration_date)
and rownum < 2;
select count(action_id)
into l_par_count
from ame_actions
where action_type_id = p_action_type_id and
parameter = p_parameter and
((parameter_two is null and p_parameter_two is null) or parameter_two = p_parameter_two) and
p_effective_date between start_date and
nvl(end_date - ame_util.oneSecond, p_effective_date) and
(p_action_id is null or
action_id <> p_action_id);
select name
into l_action_type_name
from ame_action_types
where action_type_id = p_action_type_id
and p_effective_date between start_date and
nvl(end_date - ame_util.oneSecond, p_effective_date);
select dynamic_description
into dynamicDescription
from ame_action_types
where
action_type_id = p_action_type_id and
p_effective_date between start_date and
nvl(end_date - ame_util.oneSecond, p_effective_date);
procedure chk_delete
(p_action_id in number,
p_object_version_number in number,
p_effective_date in date) is
l_proc varchar2(72) := g_package||'chk_delete';
select null
from ame_actions
where
action_id = p_action_id and
ame_utility_pkg.is_seed_user(created_by) = ame_util.seededDataCreatedById and
ame_utility_pkg.check_seeddb = 'N';
fnd_message.set_token('OBJECT','AME_ACTIONS.DELETE');
end chk_delete;
Procedure dt_update_validate
(p_action_type_id in number default hr_api.g_number
,p_datetrack_mode in varchar2
,p_validation_start_date in date
,p_validation_end_date in date
) Is
--
l_proc varchar2(72) := g_package||'dt_update_validate';
End dt_update_validate;
Procedure dt_delete_validate
(p_action_id in number
,p_action_type_id in number
,p_datetrack_mode in varchar2
,p_validation_start_date in date
,p_validation_end_date in date
) Is
--
l_proc varchar2(72) := g_package||'dt_delete_validate';
If (p_datetrack_mode = hr_api.g_delete or
p_datetrack_mode = hr_api.g_zap) then
--
--
-- Ensure the arguments are not null
--
hr_api.mandatory_arg_error
(p_api_name => l_proc
,p_argument => 'validation_start_date'
,p_argument_value => p_validation_start_date
);
End dt_delete_validate;
Procedure insert_validate
(p_rec in ame_act_shd.g_rec_type
,p_effective_date in date
,p_datetrack_mode in varchar2
,p_validation_start_date in date
,p_validation_end_date in date
) is
--
l_proc varchar2(72) := g_package||'insert_validate';
End insert_validate;
Procedure update_validate
(p_rec in ame_act_shd.g_rec_type
,p_effective_date in date
,p_datetrack_mode in varchar2
,p_validation_start_date in date
,p_validation_end_date in date
) is
--
l_proc varchar2(72) := g_package||'update_validate';
dt_update_validate
(p_action_type_id => p_rec.action_type_id
,p_datetrack_mode => p_datetrack_mode
,p_validation_start_date => p_validation_start_date
,p_validation_end_date => p_validation_end_date
);
chk_non_updateable_args
(p_effective_date => p_effective_date
,p_rec => p_rec
);
End update_validate;
Procedure delete_validate
(p_rec in ame_act_shd.g_rec_type
,p_effective_date in date
,p_datetrack_mode in varchar2
,p_validation_start_date in date
,p_validation_end_date in date
) is
--
l_proc varchar2(72) := g_package||'delete_validate';
chk_delete(p_action_id => p_rec.action_id,
p_object_version_number => p_rec.object_version_number,
p_effective_date => p_effective_date);
dt_delete_validate
(p_datetrack_mode => p_datetrack_mode
,p_validation_start_date => p_validation_start_date
,p_validation_end_date => p_validation_end_date
,p_action_id => p_rec.action_id
,p_action_type_id => p_rec.action_type_id
);
End delete_validate;