30: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
31: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
32: IGS_GE_MSG_STACK.ADD;
33: Close cur_old_ref_values;
34: APP_EXCEPTION.RAISE_EXCEPTION;
35:
36: Return;
37: END IF;
38: Close cur_old_ref_values;
63: 'N'
64: ) THEN
65: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
66: IGS_GE_MSG_STACK.ADD;
67: APP_EXCEPTION.RAISE_EXCEPTION;
68:
69: END IF;
70: END Check_Parent_Existance;
71:
109: IF (cur_rowid%FOUND) THEN
110: Fnd_Message.Set_Name ('IGS', 'IGS_AS_ATGSM_ASEAT_FK');
111: IGS_GE_MSG_STACK.ADD;
112: Close cur_rowid;
113: APP_EXCEPTION.RAISE_EXCEPTION;
114:
115: Return;
116: END IF;
117: Close cur_rowid;
151: NEW_REFERENCES.result_obtained_yr ,
152: NEW_REFERENCES.institution_score) THEN
153: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
154: IGS_GE_MSG_STACK.ADD;
155: APP_EXCEPTION.RAISE_EXCEPTION;
156: END IF;
157:
158: Check_Constraints;
159:
170: NEW_REFERENCES.result_obtained_yr ,
171: NEW_REFERENCES.institution_score) THEN
172: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
173: IGS_GE_MSG_STACK.ADD;
174: APP_EXCEPTION.RAISE_EXCEPTION;
175: END IF;
176:
177: Check_Constraints;
178: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
216: end if;
217: else
218: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
219: IGS_GE_MSG_STACK.ADD;
220: APP_EXCEPTION.RAISE_EXCEPTION;
221: end if;
222: Before_DML(
223: p_action=>'INSERT',
224: x_rowid=>X_ROWID,
279: fetch c1 into tlinfo;
280: if (c1%notfound) then
281: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
282: IGS_GE_MSG_STACK.ADD;
283: APP_EXCEPTION.RAISE_EXCEPTION;
284: close c1;
285: return;
286: end if;
287: close c1;
290: null;
291: else
292: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
293: IGS_GE_MSG_STACK.ADD;
294: APP_EXCEPTION.RAISE_EXCEPTION;
295: end if;
296: return;
297: end LOCK_ROW;
298: procedure UPDATE_ROW (
322: end if;
323: else
324: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
325: IGS_GE_MSG_STACK.ADD;
326: APP_EXCEPTION.RAISE_EXCEPTION;
327: end if;
328: Before_DML(
329: p_action=>'UPDATE',
330: x_rowid=>X_ROWID,
416: column_name is null Then
417: IF new_references.SCNDRY_EDU_ASS_TYPE <> UPPER(new_references.SCNDRY_EDU_ASS_TYPE) Then
418: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
419: IGS_GE_MSG_STACK.ADD;
420: APP_EXCEPTION.RAISE_EXCEPTION;
421: END IF;
422: END IF;
423:
424: