[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: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
38: IGS_GE_MSG_STACK.ADD;
39: Close cur_old_ref_values;
40: App_Exception.Raise_Exception;
41: Return;
42: END IF;
81:
82: IF ((UPPER (column_name) = 'CRS_NOTE_TYPE') OR (column_name IS NULL)) THEN
83: IF (new_references.crs_note_type <> UPPER (new_references.crs_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;
89:
89:
90: IF ((UPPER (column_name) = 'UNIT_SET_CD') OR (column_name IS NULL)) THEN
91: IF (new_references.unit_set_cd <> UPPER (new_references.unit_set_cd)) THEN
92: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
93: IGS_GE_MSG_STACK.ADD;
94: App_Exception.Raise_Exception;
95: END IF;
96: END IF;
97:
108: IF NOT IGS_PS_NOTE_TYPE_PKG.Get_PK_For_Validation (
109: new_references.crs_note_type
110: ) THEN
111: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
112: IGS_GE_MSG_STACK.ADD;
113: App_Exception.Raise_Exception;
114:
115: END IF;
116:
125: new_references.reference_number
126: ) THEN
127:
128: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
129: IGS_GE_MSG_STACK.ADD;
130: App_Exception.Raise_Exception;
131:
132: END IF;
133:
143: new_references.unit_set_cd,
144: new_references.version_number
145: ) THEN
146: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
147: IGS_GE_MSG_STACK.ADD;
148: App_Exception.Raise_Exception;
149:
150: END IF;
151:
199: Open cur_rowid;
200: Fetch cur_rowid INTO lv_rowid;
201: IF (cur_rowid%FOUND) THEN
202: Fnd_Message.Set_Name ('IGS', 'IGS_EN_CNT_USN_FK');
203: IGS_GE_MSG_STACK.ADD;
204: Close cur_rowid;
205: App_Exception.Raise_Exception;
206: Return;
207: END IF;
225: Open cur_rowid;
226: Fetch cur_rowid INTO lv_rowid;
227: IF (cur_rowid%FOUND) THEN
228: Fnd_Message.Set_Name ('IGS', 'IGS_EN_USN_NOTE_FK');
229: IGS_GE_MSG_STACK.ADD;
230: Close cur_rowid;
231: App_Exception.Raise_Exception;
232: Return;
233: END IF;
253: Open cur_rowid;
254: Fetch cur_rowid INTO lv_rowid;
255: IF (cur_rowid%FOUND) THEN
256: Fnd_Message.Set_Name ('IGS', 'IGS_EN_US_USN_FK');
257: IGS_GE_MSG_STACK.ADD;
258: Close cur_rowid;
259: App_Exception.Raise_Exception;
260: Return;
261: END IF;
300: new_references.reference_number
301: ) THEN
302:
303: Fnd_message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
304: IGS_GE_MSG_STACK.ADD;
305: App_Exception.Raise_Exception;
306:
307: END IF;
308: Check_Constraints;
320: new_references.version_number,
321: new_references.reference_number
322: ) THEN
323: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
324: IGS_GE_MSG_STACK.ADD;
325: App_Exception.Raise_Exception;
326: END IF;
327: Check_Constraints;
328: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
386: X_LAST_UPDATE_LOGIN := -1;
387: end if;
388: else
389: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
390: IGS_GE_MSG_STACK.ADD;
391: app_exception.raise_exception;
392: end if;
393:
394: Before_DML(
460: open c1;
461: fetch c1 into tlinfo;
462: if (c1%notfound) then
463: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
464: IGS_GE_MSG_STACK.ADD;
465: close c1;
466: app_exception.raise_exception;
467: return;
468: end if;
472: ) then
473: null;
474: else
475: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
476: IGS_GE_MSG_STACK.ADD;
477: app_exception.raise_exception;
478: end if;
479: return;
480: end LOCK_ROW;
505: X_LAST_UPDATE_LOGIN := -1;
506: end if;
507: else
508: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
509: IGS_GE_MSG_STACK.ADD;
510: app_exception.raise_exception;
511: end if;
512:
513: Before_DML(