[Home] [Help]
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;
73: IF upper(column_name)= 'COURSE_CD' OR
74: column_name is null THEN
75: IF new_references.course_cd <> UPPER(new_references.course_cd)
76: THEN
77: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
78: IGS_GE_MSG_STACK.ADD;
79: App_Exception.Raise_Exception;
80: END IF;
81: END IF;
83: IF upper(column_name)= 'S_RULE_CALL_CD' OR
84: column_name is null THEN
85: IF new_references.s_rule_call_cd <> UPPER(new_references.s_rule_call_cd)
86: THEN
87: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
88: IGS_GE_MSG_STACK.ADD;
89: App_Exception.Raise_Exception;
90: END IF;
91: END IF;
100: ELSE
101: IF NOT IGS_PS_COURSE_PKG.Get_PK_For_Validation (
102: new_references.course_cd
103: )THEN
104: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
105: IGS_GE_MSG_STACK.ADD;
106: App_Exception.Raise_Exception;
107: END IF;
108: END IF;
113: ELSE
114: IF NOT IGS_RU_RULE_PKG.Get_PK_For_Validation (
115: new_references.rul_sequence_number
116: )THEN
117: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
118: IGS_GE_MSG_STACK.ADD;
119: App_Exception.Raise_Exception;
120: END IF;
121: END IF;
126: ELSE
127: IF NOT IGS_RU_CALL_PKG.Get_PK_For_Validation (
128: new_references.s_rule_call_cd
129: )THEN
130: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
131: IGS_GE_MSG_STACK.ADD;
132: App_Exception.Raise_Exception;
133: END IF;
134: END IF;
179: Open cur_rowid;
180: Fetch cur_rowid INTO lv_rowid;
181: IF (cur_rowid%FOUND) THEN
182: Close cur_rowid;
183: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CR_CRS_FK');
184: IGS_GE_MSG_STACK.ADD;
185: App_Exception.Raise_Exception;
186: Return;
187: END IF;
205: Open cur_rowid;
206: Fetch cur_rowid INTO lv_rowid;
207: IF (cur_rowid%FOUND) THEN
208: Close cur_rowid;
209: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CR_RUL_FK');
210: IGS_GE_MSG_STACK.ADD;
211: App_Exception.Raise_Exception;
212: Return;
213: END IF;
231: Open cur_rowid;
232: Fetch cur_rowid INTO lv_rowid;
233: IF (cur_rowid%FOUND) THEN
234: Close cur_rowid;
235: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CR_SRC_FK');
236: IGS_GE_MSG_STACK.ADD;
237: App_Exception.Raise_Exception;
238: Return;
239: END IF;
273: IF Get_PK_For_Validation(
274: new_references.course_cd ,
275: new_references.s_rule_call_cd
276: ) THEN
277: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
278: IGS_GE_MSG_STACK.ADD;
279: App_Exception.Raise_Exception;
280: END IF;
281: Check_Constraints;
290: IF Get_PK_For_Validation(
291: new_references.course_cd ,
292: new_references.s_rule_call_cd
293: ) THEN
294: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
295: IGS_GE_MSG_STACK.ADD;
296: App_Exception.Raise_Exception;
297: END IF;
298: Check_Constraints;
340: if X_LAST_UPDATE_LOGIN is NULL then
341: X_LAST_UPDATE_LOGIN := -1;
342: end if;
343: else
344: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
345: IGS_GE_MSG_STACK.ADD;
346: app_exception.raise_exception;
347: end if;
348: Before_DML (
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.RUL_SEQUENCE_NUMBER = X_RUL_SEQUENCE_NUMBER)
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;
451: if X_LAST_UPDATE_LOGIN is NULL then
452: X_LAST_UPDATE_LOGIN := -1;
453: end if;
454: else
455: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
456: IGS_GE_MSG_STACK.ADD;
457: app_exception.raise_exception;
458: end if;
459: Before_DML (