33: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
34: Close cur_old_ref_values;
35: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
36: IGS_GE_MSG_STACK.ADD;
37: App_Exception.Raise_Exception;
38: Return;
39: END IF;
40: Close cur_old_ref_values;
41:
77: new_references.closed_ind,
78: v_message_name) = FALSE THEN
79: Fnd_Message.Set_Name('IGS', v_message_name);
80: IGS_GE_MSG_STACK.ADD;
81: App_Exception.Raise_Exception;
82: END IF;
83: END IF;
84:
85:
153: NEW_REFERENCES.govt_honours_level
154: ) THEN
155: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
156: IGS_GE_MSG_STACK.ADD;
157: App_Exception.Raise_Exception;
158: END IF;
159:
160: check_constraints;
161: ELSIF (p_action = 'UPDATE') THEN
171: NEW_REFERENCES.govt_honours_level
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:
178: check_constraints;
179: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
218: end if;
219: else
220: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
221: IGS_GE_MSG_STACK.ADD;
222: app_exception.raise_exception;
223: end if;
224:
225: Before_DML (
226: p_action => 'INSERT',
283: fetch c1 into tlinfo;
284: if (c1%notfound) then
285: close c1;
286: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
287: app_exception.raise_exception;
288: return;
289: end if;
290: close c1;
291:
294: ) then
295: null;
296: else
297: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
298: app_exception.raise_exception;
299: end if;
300: return;
301: end LOCK_ROW;
302:
326: end if;
327: else
328: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
329: IGS_GE_MSG_STACK.ADD;
330: app_exception.raise_exception;
331: end if;
332:
333: Before_DML (
334: p_action => 'UPDATE',
426: IF upper(Column_name) = 'CLOSED_IND' OR COLUMN_NAME IS NULL THEN
427: IF new_references.CLOSED_IND not in ('Y','N') then
428: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
429: IGS_GE_MSG_STACK.ADD;
430: App_Exception.Raise_Exception ;
431: END IF;
432: END IF ;
433:
434:
435: IF upper(Column_name) = 'GOVT_HONOURS_LEVEL' OR COLUMN_NAME IS NULL THEN
436: IF new_references.GOVT_HONOURS_LEVEL<> upper(new_references.GOVT_HONOURS_LEVEL) then
437: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
438: IGS_GE_MSG_STACK.ADD;
439: App_Exception.Raise_Exception ;
440: END IF;
441:
442: END IF ;
443: