The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT incident_date
FROM per_work_incidents pwi
WHERE pwi.incident_id = p_incident_id;
SELECT null
FROM per_people_f per
WHERE per.person_id = p_person_id
AND p_effective_date BETWEEN per.effective_start_date
AND per.effective_end_date;
select business_group_id
from hr_all_organization_units hou
where hou.organization_id = p_organization_id
and p_effective_date between hou.date_from and nvl(hou.date_to, hr_api.g_eot);
select null
from hr_organization_information hoi
where hoi.organization_id = p_organization_id
and hoi.org_information_context = 'CLASS'
and hoi.org_information1 = 'MEDICAL_ASSESSMENT_ORG'
and hoi.org_information2 = 'Y';
SELECT incident_id
FROM per_work_incidents pwi
WHERE pwi.incident_id = p_incident_id;
SELECT medical_assessment_id
FROM per_medical_assessments mea
WHERE mea.medical_assessment_id <> p_medical_assessment_id
AND mea.incident_id = p_incident_id
AND mea.person_id = p_person_id
AND mea.disability_id = p_disability_id;
SELECT disability_id
FROM per_disabilities_f pdf
WHERE pdf.disability_id = p_disability_id
AND pdf.person_id = p_person_id
AND pdf.incident_id = p_incident_id
AND p_effective_date BETWEEN pdf.effective_start_date
AND pdf.effective_end_date;
SELECT disability_id
FROM per_disabilities_f pdf
WHERE pdf.disability_id = p_disability_id
AND pdf.person_id = p_person_id
AND p_effective_date BETWEEN pdf.effective_start_date
AND pdf.effective_end_date;
SELECT pbg.security_group_id
FROM per_business_groups pbg,
per_medical_assessments mea,
per_people_f per
WHERE mea.medical_assessment_id = p_medical_assessment_id
AND per.person_id = mea.person_id
AND pbg.business_group_id = per.business_group_id;
select pbg.legislation_code
from per_medical_assessments mea,
per_people_f per,
per_business_groups pbg
where mea.medical_assessment_id = p_medical_assessment_id
and mea.person_id = per.person_id
and per.business_group_id = pbg.business_group_id;
PROCEDURE chk_non_updateable_args
(p_effective_date IN DATE
,p_rec IN per_mea_shd.g_rec_type
) IS
--
l_proc VARCHAR2(72) := g_package || 'chk_non_updateable_args';
END chk_non_updateable_args;
PROCEDURE insert_validate
(p_effective_date IN DATE
,p_rec IN per_mea_shd.g_rec_type) IS
--
-- Declare cursors
--
CURSOR csr_business_group is
SELECT business_group_id
FROM per_all_people_f pap
WHERE pap.person_id = p_rec.person_id
AND p_effective_date BETWEEN pap.effective_start_date AND pap.effective_end_date;
l_proc VARCHAR2(72) := g_package||'insert_validate';
END insert_validate;
PROCEDURE update_validate
(p_effective_date IN DATE
,p_rec IN per_mea_shd.g_rec_type
) IS
--
-- Declare cursors
--
CURSOR csr_business_group is
SELECT business_group_id
FROM per_all_people_f pap
WHERE pap.person_id = p_rec.person_id
AND p_effective_date BETWEEN pap.effective_start_date AND pap.effective_end_date;
l_proc VARCHAR2(72) := 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 per_mea_shd.g_rec_type) IS
--
l_proc VARCHAR2(72) := g_package||'delete_validate';
END delete_validate;