[Home] [Help]
34: Open cur_old_ref_values;
35: Fetch cur_old_ref_values INTO old_references;
36: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ( 'INSERT','VALIDATE_INSERT' )) THEN
37: Close cur_old_ref_values;
38: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
39: IGS_GE_MSG_STACK.ADD;
40: App_Exception.Raise_Exception;
41: Return;
42: END IF;
76: IF upper(column_name) = 'TABLE_ALIAS' OR
77: Column_name is null THEN
78: IF new_references.table_alias <>
79: upper(new_references.table_alias) THEN
80: Fnd_Message.Set_Name ('IGS','IGS_GE_INVALID_VALUE');
81: IGS_GE_MSG_STACK.ADD;
82: App_Exception.Raise_Exception;
83: END IF;
84: END IF;
85:
86: IF upper(column_name) = 'PERFORM_ACTION_IND' OR
87: Column_name is null THEN
88: IF new_references.perform_action_ind NOT IN ('Y','N') THEN
89: Fnd_Message.Set_Name ('IGS','IGS_GE_INVALID_VALUE');
90: IGS_GE_MSG_STACK.ADD;
91: App_Exception.Raise_Exception;
92: END IF;
93: END IF;
106: IF NOT IGS_EN_MRG_ID_ACTION_PKG.Get_PK_For_Validation (
107: new_references.table_alias,
108: new_references.action_id
109: ) THEN
110: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
111: IGS_GE_MSG_STACK.ADD;
112: App_Exception.Raise_Exception;
113: END IF;
114: END IF;
119: ELSE
120: IF NOT IGS_EN_MERGE_ID_ROWS_PKG.Get_PK_For_Validation (
121: new_references.smir_id
122: ) THEN
123: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
124: IGS_GE_MSG_STACK.ADD;
125: App_Exception.Raise_Exception;
126: END IF;
127: END IF;
176: Open cur_rowid;
177: Fetch cur_rowid INTO lv_rowid;
178: IF (cur_rowid%FOUND) THEN
179: Close cur_rowid;
180: Fnd_Message.Set_Name ('IGS', 'IGS_EN_SMIAC_SMIA_FK');
181: IGS_GE_MSG_STACK.ADD;
182: App_Exception.Raise_Exception;
183: Return;
184: END IF;
202: Open cur_rowid;
203: Fetch cur_rowid INTO lv_rowid;
204: IF (cur_rowid%FOUND) THEN
205: Close cur_rowid;
206: Fnd_Message.Set_Name ('IGS', 'IGS_EN_SMIAC_SMIR_FK');
207: IGS_GE_MSG_STACK.ADD;
208: App_Exception.Raise_Exception;
209: Return;
210: END IF;
248: new_references.smir_id ,
249: new_references.table_alias,
250: new_references.action_id
251: ) THEN
252: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
253: IGS_GE_MSG_STACK.ADD;
254: App_Exception.Raise_Exception;
255: END IF;
256: Check_constraints;
268: new_references.smir_id ,
269: new_references.table_alias,
270: new_references.action_id
271: ) THEN
272: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
273: IGS_GE_MSG_STACK.ADD;
274: App_Exception.Raise_Exception;
275: END IF;
276: Check_constraints;
332: if X_LAST_UPDATE_LOGIN is NULL then
333: X_LAST_UPDATE_LOGIN := -1;
334: end if;
335: else
336: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
337: IGS_GE_MSG_STACK.ADD;
338: app_exception.raise_exception;
339: end if;
340:
408: open c1;
409: fetch c1 into tlinfo;
410: if (c1%notfound) then
411: close c1;
412: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
413: IGS_GE_MSG_STACK.ADD;
414: app_exception.raise_exception;
415: return;
416: end if;
419: if ( (tlinfo.PERFORM_ACTION_IND = X_PERFORM_ACTION_IND)
420: ) then
421: null;
422: else
423: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
424: IGS_GE_MSG_STACK.ADD;
425: app_exception.raise_exception;
426: end if;
427: return;
452: if X_LAST_UPDATE_LOGIN is NULL then
453: X_LAST_UPDATE_LOGIN := -1;
454: end if;
455: else
456: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
457: IGS_GE_MSG_STACK.ADD;
458: app_exception.raise_exception;
459: end if;
460: