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
, ota_act_cat_inclusions aci
, ota_category_usages ctu
where aci.activity_version_id = p_activity_version_id
and aci.category_usage_id = p_category_usage_id
and pbg.business_group_id = ctu.business_group_id
and ctu.category_usage_id = aci.category_usage_id;
select pbg.legislation_code
from per_business_groups_perf pbg
, ota_act_cat_inclusions aci
, ota_category_usages ctu
where aci.activity_version_id = p_activity_version_id
and aci.category_usage_id = p_category_usage_id
and pbg.business_group_id = ctu.business_group_id
and ctu.category_usage_id = aci.category_usage_id ;
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in ota_aci_shd.g_rec_type
) IS
--
v_proc varchar2(72) := g_package || 'chk_non_updateable_args';
End chk_non_updateable_args;
SELECT
start_date_active,
nvl(end_date_active, hr_api.g_eot ),
type
FROM ota_category_usages
WHERE category_usage_id =p_category_usage_id;
SELECT
start_date,
nvl(end_date, hr_api.g_eot)
FROM ota_activity_versions
WHERE activity_version_id = p_activity_version_id;
select 'Y'
from ota_act_cat_inclusions aci
where aci.activity_version_id = p_activity_version_id
and aci.primary_flag = 'Y';
select 'Y'
from ota_act_cat_inclusions aci
where aci.activity_version_id = p_activity_version_id
and aci.category_usage_id = p_category_usage_id
and aci.primary_flag = 'Y';
Procedure check_dates_update
(
p_category_usage_id in number
,p_start_date in date
,p_end_date in date
) is
--
v_start_date date;
v_proc varchar2(72) := g_package||'check_dates_update';
select start_date_active
, end_date_active
from ota_category_usages aci
where aci.category_usage_id = p_category_usage_id;
End check_dates_update;
Procedure check_dates_update_act
(
p_activity_version_id in number
,p_start_date in date
,p_end_date in date
) is
--
v_start_date date;
v_proc varchar2(72) := g_package||'check_dates_update_act';
select start_date
, end_date
from ota_activity_versions tav
where tav.activity_version_id = p_activity_version_id;
End check_dates_update_act;
select 'Y'
from ota_act_cat_inclusions aci
where aci.activity_version_id = p_activity_version_id
and aci.category_usage_id = p_category_usage_id;
Procedure insert_validate
(p_effective_date in date
,p_rec in ota_aci_shd.g_rec_type
,p_activity_version_id in number
,p_category_usage_id in number
) is
--
v_proc varchar2(72) := g_package||'insert_validate';
check_dates_update(p_rec.category_usage_id
,p_rec.start_date_active
,p_rec.end_date_active);
check_dates_update_act( p_rec.activity_version_id
, p_rec.start_date_active
, p_rec.end_date_active);
End insert_validate;
Procedure update_validate
(p_effective_date in date
,p_rec in ota_aci_shd.g_rec_type
) is
--
v_proc varchar2(72) := g_package||'update_validate';
chk_non_updateable_args
(p_effective_date => p_effective_date
,p_rec => p_rec
);
check_dates_update(p_rec.category_usage_id
,p_rec.start_date_active
,p_rec.end_date_active);
check_dates_update_act( p_rec.activity_version_id
, p_rec.start_date_active
, p_rec.end_date_active);
End update_validate;
Procedure delete_validate
(p_rec in ota_aci_shd.g_rec_type
) is
--
v_proc varchar2(72) := g_package||'delete_validate';
End delete_validate;