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_learning_paths lps
where lps.learning_path_id = p_learning_path_id
and pbg.business_group_id = lps.business_group_id;
select pbg.legislation_code
from per_business_groups_perf pbg
, ota_learning_paths lps
where lps.learning_path_id = p_learning_path_id
and pbg.business_group_id = lps.business_group_id;
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in ota_lps_shd.g_rec_type
) IS
--
l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
End chk_non_updateable_args;
PROCEDURE chk_competency_update_level (p_learning_path_id IN number
,p_object_version_number IN NUMBER
,p_competency_update_level IN VARCHAR2
,p_effective_date IN date) IS
--
l_proc VARCHAR2(72) := g_package||'chk_competency_update_level';
NVL(ota_lps_shd.g_old_rec.competency_update_level,hr_api.g_varchar2) <>
NVL(p_competency_update_level, hr_api.g_varchar2))
OR NOT l_api_updating AND p_competency_update_level IS NOT NULL) THEN
hr_utility.set_location(' Leaving:'||l_proc, 20);
IF p_competency_update_level IS NOT NULL THEN
IF hr_api.not_exists_in_hr_lookups
(p_effective_date => p_effective_date
,p_lookup_type => 'OTA_COMPETENCY_UPDATE_LEVEL'
,p_lookup_code => p_competency_update_level) THEN
fnd_message.set_name('OTA','OTA_443411_COMP_UPD_LEV_INVLD');
(p_associated_column1 => 'OTA_LEARNING_PATHS.competency_update_level') THEN
hr_utility.set_location(' Leaving:'||l_proc, 42);
END chk_competency_update_level;
SELECT 1
FROM ota_learning_path_members lpm,
ota_activity_versions tav
WHERE tav.activity_version_id = lpm.activity_version_id
AND lpm.learning_path_id = p_learning_path_id
AND (( tav.end_date IS NOT NULL AND l_start_date_active > tav.end_date)
OR (l_end_date_active IS NOT NULL AND tav.start_date > l_end_date_active));
select
ctu.start_date_active,
nvl(ctu.end_date_active, to_date ('31-12-4712', 'DD-MM-YYYY'))
from
ota_lp_cat_inclusions lci,
ota_category_usages ctu
where
ctu.category_usage_id = lci.category_usage_id
and lci.learning_path_id = p_learning_path_id
and lci.primary_flag = 'Y';
SELECT path_source_code
FROM ota_learning_paths lps
WHERE lps.learning_path_id = p_learning_path_id;
SELECT 1
FROM ota_lp_enrollments lpm
WHERE lpm.learning_path_id = p_learning_path_id;
Procedure insert_validate
(p_effective_date in date
,p_rec in ota_lps_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'insert_validate';
ota_lps_bus.chk_competency_update_level (p_learning_path_id => p_rec.learning_path_id
,p_object_version_number => p_rec.object_version_number
,p_competency_update_level => p_rec.competency_update_level
,p_effective_date => p_effective_date);
End insert_validate;
Procedure update_validate
(p_effective_date in date
,p_rec in ota_lps_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
);
ota_lps_bus.chk_competency_update_level (p_learning_path_id => p_rec.learning_path_id
,p_object_version_number => p_rec.object_version_number
,p_competency_update_level => p_rec.competency_update_level
,p_effective_date => p_effective_date);
End update_validate;
Procedure delete_validate
(p_rec in ota_lps_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'delete_validate';
End delete_validate;