32: Open cur_old_ref_values;
33: Fetch cur_old_ref_values INTO old_references;
34: IF (cur_old_ref_values%NOTFOUND) AND p_action NOT IN ('INSERT','VALIDATE_INSERT') THEN
35: Close cur_old_ref_values;
36: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
37: IGS_GE_MSG_STACK.ADD;
38: App_Exception.Raise_Exception;
39: Return;
40: END IF;
73: END IF;
74:
75: IF upper(Column_Name) = 'CLOSED_IND' OR Column_Name IS NULL THEN
76: IF new_references.closed_ind NOT IN ('Y','N') THEN
77: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
78: IGS_GE_MSG_STACK.ADD;
79: App_Exception.Raise_Exception;
80: END IF;
81: END IF;
80: END IF;
81: END IF;
82: IF upper(Column_Name) = 'TAC_AUS_SCNDRY_EDU_ASS_TYPE' OR Column_Name IS NULL THEN
83: IF new_references.tac_aus_scndry_edu_ass_type <> UPPER(new_references.tac_aus_scndry_edu_ass_type) THEN
84: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
85: IGS_GE_MSG_STACK.ADD;
86: App_Exception.Raise_Exception;
87: END IF;
88: END IF;
155: IF (p_action = 'INSERT') THEN
156: IF Get_PK_For_Validation (
157: new_references.tac_aus_scndry_edu_ass_type
158: ) THEN
159: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
160: IGS_GE_MSG_STACK.ADD;
161: App_Exception.Raise_Exception;
162: END IF;
163: Check_Constraints;
169: ELSIF (p_action = 'VALIDATE_INSERT') THEN
170: IF Get_PK_For_Validation (
171: new_references.tac_aus_scndry_edu_ass_type
172: ) THEN
173: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
174: IGS_GE_MSG_STACK.ADD;
175: App_Exception.Raise_Exception;
176: END IF;
177: Check_Constraints;
217: if X_LAST_UPDATE_LOGIN is NULL then
218: X_LAST_UPDATE_LOGIN := -1;
219: end if;
220: else
221: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
222: IGS_GE_MSG_STACK.ADD;
223: app_exception.raise_exception;
224: end if;
225: Before_DML (
285: open c1;
286: fetch c1 into tlinfo;
287: if (c1%notfound) then
288: close c1;
289: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
290: IGS_GE_MSG_STACK.ADD;
291: app_exception.raise_exception;
292: return;
293: end if;
298: AND (tlinfo.CLOSED_IND = X_CLOSED_IND)
299: ) then
300: null;
301: else
302: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
303: IGS_GE_MSG_STACK.ADD;
304: app_exception.raise_exception;
305: end if;
306: return;
330: if X_LAST_UPDATE_LOGIN is NULL then
331: X_LAST_UPDATE_LOGIN := -1;
332: end if;
333: else
334: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
335: IGS_GE_MSG_STACK.ADD;
336: app_exception.raise_exception;
337: end if;
338: Before_DML (