[Home] [Help]
37: Open cur_old_ref_values;
38: Fetch cur_old_ref_values INTO old_references;
39: IF (cur_old_ref_values%NOTFOUND) AND (p_action not in ('INSERT','VALIDATE_INSERT')) THEN
40: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
41: IGS_GE_MSG_STACK.ADD;
42: Close cur_old_ref_values;
43: App_Exception.Raise_Exception;
44:
45: Return;
79: new_references.prg_cal_type,
80: new_references.prg_ci_sequence_number
81: )THEN
82: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
83: IGS_GE_MSG_STACK.ADD;
84: App_Exception.Raise_Exception;
85:
86: END IF;
87:
97: new_references.person_id,
98: new_references.course_cd
99: )THEN
100: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
101: IGS_GE_MSG_STACK.ADD;
102: App_Exception.Raise_Exception;
103:
104: END IF;
105:
113: 'PRG_MEASURE_TYPE',
114: new_references.s_prg_measure_type
115: )THEN
116: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
117: IGS_GE_MSG_STACK.ADD;
118: App_Exception.Raise_Exception;
119:
120: END IF;
121:
176: Open cur_rowid;
177: Fetch cur_rowid INTO lv_rowid;
178: IF (cur_rowid%FOUND) THEN
179: Fnd_Message.Set_Name ('IGS', 'IGS_PR_SCPM_CI_FK');
180: IGS_GE_MSG_STACK.ADD;
181: Close cur_rowid;
182: App_Exception.Raise_Exception;
183:
184: Return;
205: Open cur_rowid;
206: Fetch cur_rowid INTO lv_rowid;
207: IF (cur_rowid%FOUND) THEN
208: Fnd_Message.Set_Name ('IGS', 'IGS_PR_SCPM_SCA_FK');
209: IGS_GE_MSG_STACK.ADD;
210: Close cur_rowid;
211: App_Exception.Raise_Exception;
212:
213: Return;
232: Open cur_rowid;
233: Fetch cur_rowid INTO lv_rowid;
234: IF (cur_rowid%FOUND) THEN
235: Fnd_Message.Set_Name ('IGS', 'IGS_PR_SCPM_SPMT_FK');
236: IGS_GE_MSG_STACK.ADD;
237: Close cur_rowid;
238: App_Exception.Raise_Exception;
239:
240: Return;
288: new_references.prg_ci_sequence_number,
289: new_references.s_prg_measure_type,
290: new_references.calculation_dt) THEN
291: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
292: IGS_GE_MSG_STACK.ADD;
293: App_Exception.Raise_Exception;
294: END IF;
295: CHECK_CONSTRAINTS;
296:
307: new_references.prg_ci_sequence_number,
308: new_references.s_prg_measure_type,
309: new_references.calculation_dt) THEN
310: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
311: IGS_GE_MSG_STACK.ADD;
312: App_Exception.Raise_Exception;
313: END IF;
314: CHECK_CONSTRAINTS;
315: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
354: X_LAST_UPDATE_LOGIN := -1;
355: end if;
356: else
357: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
358: IGS_GE_MSG_STACK.ADD;
359: app_exception.raise_exception;
360: end if;
361:
362: Before_DML (
433: open c1;
434: fetch c1 into tlinfo;
435: if (c1%notfound) then
436: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
437: IGS_GE_MSG_STACK.ADD;
438: close c1;
439: app_exception.raise_exception;
440:
441: return;
446: ) then
447: null;
448: else
449: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
450: IGS_GE_MSG_STACK.ADD;
451: app_exception.raise_exception;
452: end if;
453: return;
454: end LOCK_ROW;
482: X_LAST_UPDATE_LOGIN := -1;
483: end if;
484: else
485: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
486: IGS_GE_MSG_STACK.ADD;
487: app_exception.raise_exception;
488: end if;
489:
490: Before_DML (
596:
597: IF upper(Column_name) = 'VALUE' OR COLUMN_NAME IS NULL THEN
598: IF new_references.VALUE < 0 or new_references.VALUE > 999.999 then
599: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
600: IGS_GE_MSG_STACK.ADD;
601: App_Exception.Raise_Exception ;
602: END IF;
603:
604: END IF ;
605:
606: IF upper(Column_name) = 'PRG_CI_SEQUENCE_NUMBER' OR COLUMN_NAME IS NULL THEN
607: IF new_references.PRG_CI_SEQUENCE_NUMBER < 1 or new_references.PRG_CI_SEQUENCE_NUMBER > 999999 then
608: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
609: IGS_GE_MSG_STACK.ADD;
610: App_Exception.Raise_Exception ;
611: END IF;
612:
613: END IF ;