The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT closed_ind
FROM IGS_AD_ADM_UNIT_STAT
WHERE administrative_unit_status = p_aus;
SELECT unit_attempt_status
FROM IGS_AD_ADM_UNIT_STAT
WHERE administrative_unit_status = p_aus;
SELECT s_cal_cat,
closed_ind
FROM IGS_CA_DA
WHERE dt_alias = p_dt_alias;
p_delete_ind IN VARCHAR2 DEFAULT 'N',
p_message_name OUT NOCOPY varchar2 )
RETURN BOOLEAN AS
BEGIN
DECLARE
BEGIN
--When inserting/updating unit discontinuation date criteria, ensure that
-- either the IGS_AD_ADM_UNIT_STAT field or the delete_ind field
-- is set.
p_message_name := null;
p_delete_ind <> 'Y') THEN
p_message_name := 'IGS_EN_ADMIN_UNIT_ST_DEL';
p_delete_ind = 'Y') THEN
p_message_name := 'IGS_EN_ADMIN_UNIT_ST_NOTSET';