79: BEGIN
80: IF p_inserting OR p_updating THEN
81: -- Validate that the ARTS teaching calendar type is not closed
82: IF new_references.arts_teaching_cal_type_cd IS NOT NULL THEN
83: IF IGS_CA_VAL_CAT.calp_val_atctc_clsd(
84: new_references.arts_teaching_cal_type_cd,
85: v_message_name) = FALSE THEN
86: Fnd_Message.Set_Name('IGS',v_message_name);
87: IGS_GE_MSG_STACK.ADD;
89: END IF;
90: END IF;
91: -- Validate that the ARTS teaching calendar type is specified only for
92: -- TEACHING system calendar category
93: IF IGS_CA_VAL_CAT.calp_val_cat_arts_cd(
94: new_references.s_cal_cat,
95: new_references.arts_teaching_cal_type_cd,
96: v_message_name) = FALSE THEN
97: Fnd_Message.Set_Name('IGS',v_message_name);
102: IF p_updating THEN
103: -- Validate that the system calendar category is not being changed
104: -- when the calendar type has active or inactive calendar instances
105: IF (new_references.s_cal_cat <> old_references.s_cal_cat) THEN
106: IF IGS_CA_VAL_CAT.calp_val_sys_cal_cat(
107: new_references.cal_type,
108: v_message_name) = FALSE THEN
109: Fnd_Message.Set_Name('IGS',v_message_name);
110: IGS_GE_MSG_STACK.ADD;