[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;
91: IF IGS_PS_VAL_CRS.crsp_val_iud_crv_dtl (
92: v_course_cd,
93: v_version_number,
94: v_message_name) = FALSE THEN
95: Fnd_Message.Set_Name('IGS',v_message_name);
96: IGS_GE_MSG_STACK.ADD;
97: App_Exception.Raise_Exception;
98: END IF;
99: -- Validate field of study. Field of study is not updateable.
100: IF p_inserting THEN
101: IF IGS_PS_VAL_CFOS.crsp_val_cfos_fos (
102: new_references.field_of_study,
103: v_message_name) = FALSE THEN
104: Fnd_Message.Set_Name('IGS',v_message_name);
105: IGS_GE_MSG_STACK.ADD;
106: App_Exception.Raise_Exception;
107: END IF;
108: END IF;
176: IF NOT IGS_PS_VER_PKG.Get_PK_For_Validation (
177: new_references.course_cd,
178: new_references.version_number
179: ) THEN
180: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
181: IGS_GE_MSG_STACK.ADD;
182: App_Exception.Raise_Exception;
183: END IF;
184: END IF;
189: ELSE
190: IF NOT IGS_PS_FLD_OF_STUDY_PKG.Get_PK_For_Validation (
191: new_references.field_of_study
192: ) THEN
193: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
194: IGS_GE_MSG_STACK.ADD;
195: App_Exception.Raise_Exception;
196: END IF;
197: END IF;
246: Open cur_rowid;
247: Fetch cur_rowid INTO lv_rowid;
248: IF (cur_rowid%FOUND) THEN
249: Close cur_rowid;
250: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CFOS_CRV_FK');
251: IGS_GE_MSG_STACK.ADD;
252: App_Exception.Raise_Exception;
253: Return;
254: END IF;
293: IF Get_PK_For_Validation (
294: new_references.course_cd ,
295: new_references.version_number ,
296: new_references.field_of_study) THEN
297: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
298: IGS_GE_MSG_STACK.ADD;
299: App_Exception.Raise_Exception;
300: END IF;
301: Check_Constraints;
312: IF Get_PK_For_Validation (
313: new_references.course_cd ,
314: new_references.version_number ,
315: new_references.field_of_study) THEN
316: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
317: IGS_GE_MSG_STACK.ADD;
318: App_Exception.Raise_Exception;
319: END IF;
320: Check_Constraints;
364: if X_LAST_UPDATE_LOGIN is NULL then
365: X_LAST_UPDATE_LOGIN := -1;
366: end if;
367: else
368: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
369: IGS_GE_MSG_STACK.ADD;
370: app_exception.raise_exception;
371: end if;
372: Before_DML (
441: open c1;
442: fetch c1 into tlinfo;
443: if (c1%notfound) then
444: close c1;
445: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
446: IGS_GE_MSG_STACK.ADD;
447: app_exception.raise_exception;
448: return;
449: end if;
453: AND(tlinfo.PERCENTAGE IS NULL OR tlinfo.PERCENTAGE = X_PERCENTAGE)
454: ) then
455: null;
456: else
457: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
458: IGS_GE_MSG_STACK.ADD;
459: app_exception.raise_exception;
460: end if;
461: return;
487: if X_LAST_UPDATE_LOGIN is NULL then
488: X_LAST_UPDATE_LOGIN := -1;
489: end if;
490: else
491: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
492: IGS_GE_MSG_STACK.ADD;
493: app_exception.raise_exception;
494: end if;
495: Before_DML (