[Home] [Help]
33: Open cur_old_ref_values;
34: Fetch cur_old_ref_values INTO old_references;
35: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
36: Close cur_old_ref_values;
37: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
38: IGS_GE_MSG_STACK.ADD;
39: App_Exception.Raise_Exception;
40: Return;
41: END IF;
71: IF IGS_PS_VAL_CRS.crsp_val_iud_crv_dtl(
72: new_references.course_cd,
73: new_references.version_number,
74: v_message_name) = FALSE THEN
75: FND_MESSAGE.SET_NAME('IGS',v_message_name);
76: IGS_GE_MSG_STACK.ADD;
77: APP_EXCEPTION.RAISE_EXCEPTION;
78: END IF;
79: ELSE
80: IF IGS_PS_VAL_CRS.crsp_val_iud_crv_dtl(
81: old_references.course_cd,
82: old_references.version_number,
83: v_message_name) = FALSE THEN
84: FND_MESSAGE.SET_NAME('IGS',v_message_name);
85: IGS_GE_MSG_STACK.ADD;
86: APP_EXCEPTION.RAISE_EXCEPTION;
87: END IF;
88: END IF;
96: new_references.s_rule_call_cd,
97: 'COURSE',
98: new_references.rul_sequence_number,
99: v_message_name) = FALSE THEN
100: FND_MESSAGE.SET_NAME('IGS',v_message_name);
101: IGS_GE_MSG_STACK.ADD;
102: APP_EXCEPTION.RAISE_EXCEPTION;
103: END IF;
104: END IF;
123: IF upper(column_name)= 'COURSE_CD' OR
124: column_name is null THEN
125: IF new_references.course_cd <> UPPER(new_references.course_cd)
126: THEN
127: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
128: IGS_GE_MSG_STACK.ADD;
129: App_Exception.Raise_Exception;
130: END IF;
131: END IF;
132: IF upper(column_name)= 'S_RULE_CALL_CD' OR
133: column_name is null THEN
134: IF new_references.s_rule_call_cd <> UPPER(new_references.s_rule_call_cd)
135: THEN
136: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
137: IGS_GE_MSG_STACK.ADD;
138: App_Exception.Raise_Exception;
139: END IF;
140: END IF;
142: column_name is null THEN
143: IF new_references.rul_sequence_number < 1 OR
144: new_references.rul_sequence_number > 999999
145: THEN
146: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
147: IGS_GE_MSG_STACK.ADD;
148: App_Exception.Raise_Exception;
149: END IF;
150: END IF;
162: IF NOT IGS_PS_VER_PKG.Get_PK_For_Validation (
163: new_references.course_cd,
164: new_references.version_number
165: )THEN
166: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
167: IGS_GE_MSG_STACK.ADD;
168: App_Exception.Raise_Exception;
169: END IF;
170: END IF;
175: ELSE
176: IF NOT IGS_RU_RULE_PKG.Get_PK_For_Validation (
177: new_references.rul_sequence_number
178: )THEN
179: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
180: IGS_GE_MSG_STACK.ADD;
181: App_Exception.Raise_Exception;
182: END IF;
183: END IF;
188: ELSE
189: IF NOT IGS_RU_CALL_PKG.Get_PK_For_Validation (
190: new_references.s_rule_call_cd
191: )THEN
192: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
193: IGS_GE_MSG_STACK.ADD;
194: App_Exception.Raise_Exception;
195: END IF;
196: END IF;
244: Open cur_rowid;
245: Fetch cur_rowid INTO lv_rowid;
246: IF (cur_rowid%FOUND) THEN
247: Close cur_rowid;
248: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CVR_CRV_FK');
249: IGS_GE_MSG_STACK.ADD;
250: App_Exception.Raise_Exception;
251: Return;
252: END IF;
270: Open cur_rowid;
271: Fetch cur_rowid INTO lv_rowid;
272: IF (cur_rowid%FOUND) THEN
273: Close cur_rowid;
274: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CVR_RUL_FK');
275: IGS_GE_MSG_STACK.ADD;
276: App_Exception.Raise_Exception;
277: Return;
278: END IF;
296: Open cur_rowid;
297: Fetch cur_rowid INTO lv_rowid;
298: IF (cur_rowid%FOUND) THEN
299: Close cur_rowid;
300: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CVR_SRC_FK');
301: IGS_GE_MSG_STACK.ADD;
302: App_Exception.Raise_Exception;
303: Return;
304: END IF;
342: new_references.course_cd ,
343: new_references.version_number,
344: new_references.s_rule_call_cd
345: ) THEN
346: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
347: IGS_GE_MSG_STACK.ADD;
348: App_Exception.Raise_Exception;
349: END IF;
350: Check_Constraints;
362: new_references.course_cd ,
363: new_references.version_number,
364: new_references.s_rule_call_cd
365: ) THEN
366: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
367: IGS_GE_MSG_STACK.ADD;
368: App_Exception.Raise_Exception;
369: END IF;
370: Check_Constraints;
415: if X_LAST_UPDATE_LOGIN is NULL then
416: X_LAST_UPDATE_LOGIN := -1;
417: end if;
418: else
419: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
420: IGS_GE_MSG_STACK.ADD;
421: app_exception.raise_exception;
422: end if;
423:
487: open c1;
488: fetch c1 into tlinfo;
489: if (c1%notfound) then
490: close c1;
491: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
492: IGS_GE_MSG_STACK.ADD;
493: app_exception.raise_exception;
494: return;
495: end if;
498: if ( (tlinfo.RUL_SEQUENCE_NUMBER = X_RUL_SEQUENCE_NUMBER)
499: ) then
500: null;
501: else
502: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
503: IGS_GE_MSG_STACK.ADD;
504: app_exception.raise_exception;
505: end if;
506: return;
531: if X_LAST_UPDATE_LOGIN is NULL then
532: X_LAST_UPDATE_LOGIN := -1;
533: end if;
534: else
535: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
536: IGS_GE_MSG_STACK.ADD;
537: app_exception.raise_exception;
538: end if;
539: Before_DML(