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;
43: Close cur_old_ref_values;
44:
81: IF new_references.closed_ind <> upper(NEW_REFERENCES.closed_ind) OR
82: new_references.closed_ind NOT IN ('Y', 'N') then
83: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
84: IGS_GE_MSG_STACK.ADD;
85: App_Exception.Raise_Exception ;
86: END IF;
87: END IF;
88:
89: IF upper(column_name) = 'S_THESIS_RESULT_CD' OR COLUMN_NAME IS NULL THEN
89: IF upper(column_name) = 'S_THESIS_RESULT_CD' OR COLUMN_NAME IS NULL THEN
90: IF new_references.S_THESIS_RESULT_CD <> upper(NEW_REFERENCES.S_THESIS_RESULT_CD) then
91: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
92: IGS_GE_MSG_STACK.ADD;
93: App_Exception.Raise_Exception ;
94: END IF;
95: END IF;
96:
97: IF upper(column_name) = 'THESIS_RESULT_CD' OR COLUMN_NAME IS NULL THEN
97: IF upper(column_name) = 'THESIS_RESULT_CD' OR COLUMN_NAME IS NULL THEN
98: IF new_references.THESIS_RESULT_CD <> upper(NEW_REFERENCES.THESIS_RESULT_CD) then
99: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
100: IGS_GE_MSG_STACK.ADD;
101: App_Exception.Raise_Exception ;
102: END IF;
103: END IF;
104:
105: END Check_Constraints ;
114: ELSE
115: IF NOT IGS_LOOKUPS_VIEW_PKG.Get_PK_For_Validation ( 'THESIS_RESULT',new_references.s_thesis_result_cd) THEN
116: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
117: IGS_GE_MSG_STACK.ADD;
118: App_Exception.Raise_Exception;
119: END IF;
120: END IF;
121:
122: END Check_Parent_Existance;
181: IF (cur_rowid%FOUND) THEN
182: Close cur_rowid;
183: Fnd_Message.Set_Name ('IGS', 'IGS_RE_THR_SLV_FK');
184: IGS_GE_MSG_STACK.ADD;
185: App_Exception.Raise_Exception;
186: Return;
187: END IF;
188: Close cur_rowid;
189:
228: new_references.thesis_result_cd
229: ) THEN
230: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
231: IGS_GE_MSG_STACK.ADD;
232: App_Exception.Raise_Exception;
233: END IF;
234: Check_Constraints;
235: Check_Parent_Existance;
236: ELSIF (p_action = 'UPDATE') THEN
245: new_references.thesis_result_cd
246: ) THEN
247: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
248: IGS_GE_MSG_STACK.ADD;
249: App_Exception.Raise_Exception;
250: END IF;
251: Check_Constraints;
252: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
253: Check_Constraints;
287: end if;
288: else
289: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
290: IGS_GE_MSG_STACK.ADD;
291: app_exception.raise_exception;
292: end if;
293:
294: Before_DML (
295: p_action => 'INSERT',
365: fetch c1 into tlinfo;
366: if (c1%notfound) then
367: close c1;
368: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
369: app_exception.raise_exception;
370: return;
371: end if;
372: close c1;
373:
380: ) then
381: null;
382: else
383: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
384: app_exception.raise_exception;
385: end if;
386: return;
387: end LOCK_ROW;
388:
414: end if;
415: else
416: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
417: IGS_GE_MSG_STACK.ADD;
418: app_exception.raise_exception;
419: end if;
420:
421: Before_DML (
422: p_action => 'UPDATE',