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;
72:
73: IF upper(column_name) = 'ENR_NOTE_TYPE' OR
74: column_name is null then
75: if new_references.enr_note_type <> upper(new_references.enr_note_type) then
76: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
77: IGS_GE_MSG_STACK.ADD;
78: App_Exception.Raise_Exception;
79: END IF;
80: end if;
80: end if;
81: IF upper(column_name) = 'S_ENR_NOTE_TYPE' OR
82: column_name is null then
83: if new_references.s_enr_note_type <> upper(new_references.s_enr_note_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;
99: IF NOT IGS_LOOKUPS_VIEW_Pkg.Get_PK_For_Validation (
100: 'ENR_NOTE_TYPE',
101: new_references.s_enr_note_type
102: ) THEN
103: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
104: IGS_GE_MSG_STACK.ADD;
105: App_Exception.Raise_Exception;
106: end if;
107: END IF;
159: Open cur_rowid;
160: Fetch cur_rowid INTO lv_rowid;
161: IF (cur_rowid%FOUND) THEN
162: Close cur_rowid;
163: Fnd_Message.Set_Name ('IGS', 'IGS_EN_ENT_LKUPV_FK');
164: IGS_GE_MSG_STACK.ADD;
165: App_Exception.Raise_Exception;
166: Return;
167: END IF;
202: -- Call all the procedures related to Before Insert.
203: IF Get_PK_For_Validation (
204: new_references.enr_note_type
205: ) then
206: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
207: IGS_GE_MSG_STACK.ADD;
208: App_Exception.Raise_Exception;
209: end if;
210: Check_constraints;
219: ELSIF (p_action = 'VALIDATE_INSERT') then
220: IF Get_PK_For_Validation (
221: new_references.enr_note_type
222: ) then
223: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
224: IGS_GE_MSG_STACK.ADD;
225: App_Exception.Raise_Exception;
226: end if;
227: Check_constraints;
280: if X_LAST_UPDATE_LOGIN is NULL then
281: X_LAST_UPDATE_LOGIN := -1;
282: end if;
283: else
284: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
285: IGS_GE_MSG_STACK.ADD;
286: app_exception.raise_exception;
287: end if;
288: Before_DML (
349: open c1;
350: fetch c1 into tlinfo;
351: if (c1%notfound) then
352: close c1;
353: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
354: IGS_GE_MSG_STACK.ADD;
355: app_exception.raise_exception;
356: return;
357: end if;
363: AND (X_S_ENR_NOTE_TYPE is null)))
364: ) then
365: null;
366: else
367: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
368: IGS_GE_MSG_STACK.ADD;
369: app_exception.raise_exception;
370: end if;
371: return;
395: if X_LAST_UPDATE_LOGIN is NULL then
396: X_LAST_UPDATE_LOGIN := -1;
397: end if;
398: else
399: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
400: IGS_GE_MSG_STACK.ADD;
401: app_exception.raise_exception;
402: end if;
403: Before_DML (