The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT rowid
,prop_of_teaching_in_welsh
,credit_transfer_scheme
,module_length
,proportion_of_fte
,location_cd
,exclude_flag
FROM igs_he_st_unt_vs
WHERE unit_cd = p_c_old_unit_cd
AND version_number = p_n_old_version_number
AND NOT EXISTS (
SELECT 'x'
FROM igs_he_st_unt_vs
WHERE unit_cd = p_c_new_unit_cd
AND version_number = p_n_new_version_number
);
SELECT rowid
,org_unit_cd
,cost_centre
,subject
,proportion
FROM igs_he_unt_ou_cc
WHERE unit_cd = p_c_old_unit_cd
AND version_number = p_n_old_version_number
AND NOT EXISTS (
SELECT 'x'
FROM igs_he_unt_ou_cc
WHERE unit_cd = p_c_new_unit_cd
AND version_number = p_n_new_version_number
);
-- p_c_message := 'WILL NOW INSERT INTO IGS_HE_ST_UNT_VS_ALL';
IGS_HE_ST_UNT_VS_ALL_PKG.Insert_Row(
X_ROWID => x_c1_rec.rowid,
X_HESA_ST_UNT_VS_ID => x_seq_id,--Sequence generated in handler!!
X_ORG_ID => x_org_id,
X_UNIT_CD => p_c_new_unit_cd,
X_VERSION_NUMBER => p_n_new_version_number,
X_PROP_OF_TEACHING_IN_WELSH => x_c1_rec.prop_of_teaching_in_welsh,
X_CREDIT_TRANSFER_SCHEME => x_c1_rec.credit_transfer_scheme,
X_MODULE_LENGTH => x_c1_rec.module_length,
X_PROPORTION_OF_FTE => x_c1_rec.proportion_of_fte,
X_LOCATION_CD => l_location_cd,
X_MODE => 'R',
X_EXCLUDE_FLAG => x_c1_rec.exclude_flag
);
-- p_c_message := 'WILL NOW INSERT INTO IGS_HE_ST_UV_CC_ALL';
IGS_HE_UNT_OU_CC_PKG.Insert_Row(
X_ROWID => x_c2_rec.rowid,
X_HESA_UNIT_CC_ID => x_seq_id, --Sequence generated in handler!!
X_UNIT_CD => p_c_new_unit_cd,
X_VERSION_NUMBER => p_n_new_version_number,
X_ORG_UNIT_CD => x_c2_rec.org_unit_cd,
X_COST_CENTRE => x_c2_rec.cost_centre,
X_SUBJECT => x_c2_rec.subject,
X_PROPORTION => x_c2_rec.proportion,
X_MODE => 'R'
);