The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT pee.person_id
FROM IGS_PE_PERSENC_EFFCT pee
WHERE pee.person_id = p_person_id AND
pee.s_encmb_effect_type = p_s_encmb_effect_type AND
pee.sequence_number <> p_sequence_number AND
( pee.expiry_dt IS NULL OR
pee.expiry_dt > SYSDATE) AND
pee.course_cd = p_course_cd;
--It is included in the selection criteria as it is possible for course_based
--IGS_PE_PERSENC_EFFCT records to exist for more than one records.
--(ie the primary key will match. - uniqueness is enforced by a sequence
-- number.
--1. Validate the input parameters.
IF (p_person_id IS NULL OR
p_course_cd IS NULL OR
(p_s_encmb_effect_type NOT IN ('RSTR_LE_CP', 'RSTR_GE_CP'))) THEN
p_message_name := null;
--2. Select all IGS_PE_PERSENC_EFFCT's-
OPEN c_pee;
SELECT pee.person_id
FROM IGS_PE_PERSENC_EFFCT pee
WHERE pee.person_id = p_person_id AND
pee.s_encmb_effect_type = p_s_encmb_effect_type AND
pee.sequence_number <> p_sequence_number AND
( pee.expiry_dt IS NULL OR
pee.expiry_dt > SYSDATE) AND
pee.course_cd = p_course_cd;
-- It is included in the selection criteria as it is possible for course_based
-- IGS_PE_PERSENC_EFFCT records to exist for more than one records.
-- (ie the primary key will match. - uniqueness is enforced by a sequence
-- number.
--1. Validate the input parameters.
IF (p_person_id IS NULL OR
p_s_encmb_effect_type IS NULL OR
p_course_cd IS NULL) THEN
p_message_name := null;
--2. Select all IGS_PE_PERSENC_EFFCT's-
OPEN c_pee;
SELECT person_id
FROM IGS_PE_PERSENC_EFFCT pee
WHERE pee.person_id = p_person_id AND
pee.encumbrance_type = p_encumbrance_type AND
pee.pen_start_dt = p_pen_start_dt AND
pee.s_encmb_effect_type = p_s_encmb_effect_type AND
pee.pee_start_dt = p_pee_start_dt;
SELECT person_id
FROM IGS_PE_PERSENC_EFFCT pee
WHERE pee.person_id = p_person_id AND
pee.encumbrance_type = p_encumbrance_type AND
pee.pen_start_dt = p_pen_start_dt AND
pee.s_encmb_effect_type = p_s_encmb_effect_type AND
pee.pee_start_dt = p_pee_start_dt AND
pee.course_cd = p_course_cd;
SELECT person_id
FROM IGS_PE_PERSENC_EFFCT pee
WHERE pee.person_id = p_person_id AND
pee.encumbrance_type = p_encumbrance_type AND
pee.pen_start_dt = p_pen_start_dt AND
pee.s_encmb_effect_type = p_s_encmb_effect_type AND
pee.sequence_number <> p_sequence_number AND
pee.expiry_dt IS NULL;
SELECT person_id
FROM IGS_PE_PERSENC_EFFCT pee
WHERE pee.person_id = p_person_id AND
pee.encumbrance_type = p_encumbrance_type AND
pee.pen_start_dt = p_pen_start_dt AND
pee.s_encmb_effect_type = p_s_encmb_effect_type AND
pee.sequence_number <> p_sequence_number AND
pee.expiry_dt IS NULL AND
pee.course_cd = p_course_cd;
SELECT 'x'
FROM IGS_EN_STDNT_PS_ATT
WHERE person_id = p_person_id AND
course_cd = p_course_cd AND
course_attempt_status IN
('ENROLLED', 'INACTIVE', 'INTERMIT');
SELECT 'x'
FROM IGS_EN_STDNT_PS_ATT
WHERE person_id = p_person_id AND
course_attempt_status IN
('ENROLLED', 'INACTIVE', 'INTERMIT');
SELECT 'x'
FROM IGS_EN_ENCMB_EFCTTYP_V
WHERE S_ENCMB_EFFECT_TYPE = p_effect_type AND
apply_to_course_ind = 'Y';
SELECT 'x'
FROM IGS_EN_STDNT_PS_ATT sca
WHERE sca.person_id = p_person_id AND
sca.course_attempt_status IN ('ENROLLED', 'INACTIVE', 'INTERMIT');
SELECT 'x'
FROM IGS_EN_ENCMB_EFCTTYP_V
WHERE s_encmb_effect_type = p_effect_type AND
apply_to_course_ind = 'Y';
SELECT closed_ind
FROM IGS_EN_ATD_TYPE
WHERE attendance_type = p_attend_type;