The following lines contain the word 'select', 'insert', 'update' or 'delete':
select pbg.security_group_id,
pbg.legislation_code
from per_business_groups_perf pbg
, irc_comm_messages cmm
-- , EDIT_HERE table_name(s) 333
where cmm.communication_message_id = p_communication_message_id;
select pbg.legislation_code
from per_business_groups_perf pbg
, irc_comm_messages cmm
-- , EDIT_HERE table_name(s) 333
where cmm.communication_message_id = p_communication_message_id;
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in irc_cmm_shd.g_rec_type
) IS
--
l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
End chk_non_updateable_args;
select 1
from irc_comm_topics
where communication_topic_id = p_topic_id;
select person_id
from per_all_people_f
where person_id = p_sender_id;
select vendor_id
from po_vendors
where vendor_id = p_sender_id;
select document_id
from irc_documents
where document_id = p_document_id;
Procedure chk_deleted_flag
(p_deleted_flag in irc_comm_messages.deleted_flag%type
) is
--
l_proc varchar2(72) := g_package||'chk_deleted_flag';
if p_deleted_flag <> 'Y' and p_deleted_flag <> 'N' then
--
-- raise error
--
hr_utility.set_location('Leaving: '|| l_proc, 3);
hr_utility.set_message(800,'IRC_412421_INVALID_DELETED_FLAG');
(p_associated_column1 => 'IRC_COMM_MESSAGES.DELETED_FLAG'
) then
--
hr_utility.set_location(' Leaving:'||l_proc,20);
End chk_deleted_flag;
Procedure insert_validate
(p_effective_date in date
,p_rec in irc_cmm_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'insert_validate';
chk_deleted_flag(p_rec.deleted_flag);
End insert_validate;
Procedure update_validate
(p_effective_date in date
,p_rec in irc_cmm_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'update_validate';
chk_non_updateable_args
(p_effective_date => p_effective_date
,p_rec => p_rec
);
chk_deleted_flag(p_rec.deleted_flag);
End update_validate;
Procedure delete_validate
(p_rec in irc_cmm_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'delete_validate';
End delete_validate;