The following lines contain the word 'select', 'insert', 'update' or 'delete':
select null
from per_letter_types
where upper(p_letter_type) = upper(letter_type_name)
and p_business_group_id = business_group_id + 0
and (p_letter_type_id is null
or (p_letter_type_id is not null
and letter_type_id <> p_letter_type_id));
procedure check_delete_letter_type (p_letter_type_id in number) is
--
g_dummy_number number;
v_no_delete boolean := FALSE;
select null
from per_letter_gen_statuses
where p_letter_type_id = letter_type_id;
select null
from per_letter_requests
where p_letter_type_id = letter_type_id;
v_no_delete := csr_status%found;
if v_no_delete then
hr_utility.set_message (801,'PER_7857_DEF_LETTER_STATUSES');
v_no_delete := csr_request%found;
if v_no_delete then
hr_utility.set_message (801,'PER_7858_DEF_LETTER_REQUESTS');
end check_delete_letter_type;
cursor c1 is select per_letter_types_s.nextval
from sys.dual;
cursor c1 is select concurrent_program_name
from fnd_concurrent_programs fcp
where p_concurrent_program_id = fcp.concurrent_program_id;