The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in hxc_hts_shd.g_rec_type
) IS
--
l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
End chk_non_updateable_args;
SELECT 'error'
FROM sys.dual
WHERE EXISTS (
SELECT 'x'
FROM hxc_time_sources tr
WHERE tr.name = p_name
AND ( tr.time_source_id <> p_time_source_id
OR p_time_source_id IS NULL) );
Procedure chk_delete
(
p_time_source_id in hxc_time_sources.time_source_id%TYPE
) IS
l_used_elsewhere VARCHAR2(1) := 'N';
SELECT 'Y'
FROM sys.dual
WHERE EXISTS (
SELECT 'x'
FROM hxc_deposit_processes dep
WHERE dep.time_source_id = p_time_source_id);
BEGIN -- chk_delete
OPEN csr_chk_dep;
END chk_delete;
Procedure insert_validate
(p_effective_date in date
,p_rec in hxc_hts_shd.g_rec_type
) is
--
l_proc varchar2(72);
l_proc := g_package||'insert_validate';
End insert_validate;
Procedure update_validate
(p_effective_date in date
,p_rec in hxc_hts_shd.g_rec_type
) is
--
l_proc varchar2(72);
l_proc := g_package||'update_validate';
chk_non_updateable_args
(p_effective_date => p_effective_date
,p_rec => p_rec
);
End update_validate;
Procedure delete_validate
(p_rec in hxc_hts_shd.g_rec_type
) is
--
l_proc varchar2(72);
l_proc := g_package||'delete_validate';
hxc_hts_bus.chk_delete ( p_time_source_id => p_rec.time_source_id );
End delete_validate;