46: IF ((cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT'))) THEN
47: CLOSE cur_old_ref_values;
48: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
49: igs_ge_msg_stack.add;
50: app_exception.raise_exception;
51: RETURN;
52: END IF;
53: CLOSE cur_old_ref_values;
54:
166: )
167: ) THEN
168: fnd_message.set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
169: igs_ge_msg_stack.add;
170: app_exception.raise_exception;
171: END IF;
172: ELSIF (p_action = 'VALIDATE_INSERT') THEN
173: -- Call all the procedures related to Before Insert.
174: IF ( get_pk_for_validation (
178: )
179: ) THEN
180: fnd_message.set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
181: igs_ge_msg_stack.add;
182: app_exception.raise_exception;
183: END IF;
184: END IF;
185:
186: END before_dml;
227: END IF;
228: ELSE
229: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
230: igs_ge_msg_stack.add;
231: app_exception.raise_exception;
232: END IF;
233:
234: before_dml(
235: p_action => 'INSERT',
287: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
288: fnd_message.set_token ('ERR_CD', SQLCODE);
289: igs_ge_msg_stack.add;
290: igs_sc_gen_001.unset_ctx('R');
291: app_exception.raise_exception;
292: ELSE
293: igs_sc_gen_001.unset_ctx('R');
294: RAISE;
295: END IF;
332: IF (c1%notfound) THEN
333: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
334: igs_ge_msg_stack.add;
335: CLOSE c1;
336: app_exception.raise_exception;
337: RETURN;
338: END IF;
339: CLOSE c1;
340:
346: NULL;
347: ELSE
348: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
349: igs_ge_msg_stack.add;
350: app_exception.raise_exception;
351: END IF;
352:
353: RETURN;
354:
395: END IF;
396: ELSE
397: fnd_message.set_name( 'FND', 'SYSTEM-INVALID ARGS');
398: igs_ge_msg_stack.add;
399: app_exception.raise_exception;
400: END IF;
401:
402: before_dml(
403: p_action => 'UPDATE',
431: IF (SQL%NOTFOUND) THEN
432: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
433: igs_ge_msg_stack.add;
434: igs_sc_gen_001.unset_ctx('R');
435: app_exception.raise_exception;
436: END IF;
437: IF (x_mode = 'S') THEN
438: igs_sc_gen_001.unset_ctx('R');
439: END IF;
446: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
447: fnd_message.set_token ('ERR_CD', SQLCODE);
448: igs_ge_msg_stack.add;
449: igs_sc_gen_001.unset_ctx('R');
450: app_exception.raise_exception;
451: ELSE
452: igs_sc_gen_001.unset_ctx('R');
453: RAISE;
454: END IF;
545: IF (SQL%NOTFOUND) THEN
546: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
547: igs_ge_msg_stack.add;
548: igs_sc_gen_001.unset_ctx('R');
549: app_exception.raise_exception;
550: END IF;
551: IF (x_mode = 'S') THEN
552: igs_sc_gen_001.unset_ctx('R');
553: END IF;