The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT 'x'
FROM IGS_PR_STDNT_PR_OU spo,
IGS_PR_OU_TYPE pot,
IGS_FI_ENC_DFLT_EFT etde
WHERE spo.person_id = p_person_id AND
spo.course_cd = p_course_cd AND
spo.sequence_number = p_sequence_number AND
spo.progression_outcome_type = pot.progression_outcome_type AND
pot.encumbrance_type = etde.encumbrance_type AND
etde.s_encmb_effect_type IN ('EXC_COURSE','SUS_COURSE');
p_inserting IN BOOLEAN ,
p_updating IN BOOLEAN ,
p_deleting IN BOOLEAN ,
p_message_name OUT NOCOPY VARCHAR2 )
RETURN BOOLEAN IS
v_index BINARY_INTEGER;
IF p_inserting OR p_deleting THEN
-- Update student progression outcome applied date
IGS_PR_GEN_004.IGS_PR_UPD_SPO_APLY_DT (
gt_rowid_table(v_index).person_id,
gt_rowid_table(v_index).course_cd,
gt_rowid_table(v_index).sequence_number);