[Home] [Help]
68: OPEN cur_old_ref_values;
69: FETCH cur_old_ref_values INTO old_references;
70: IF ((cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT'))) THEN
71: CLOSE cur_old_ref_values;
72: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
73: igs_ge_msg_stack.add;
74: app_exception.raise_exception;
75: RETURN;
76: END IF;
144: new_references.version_number,
145: new_references.rep_entity_id_txt
146: )
147: ) THEN
148: fnd_message.set_name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
149: igs_ge_msg_stack.add;
150: app_exception.raise_exception;
151: END IF;
152:
182: ELSIF NOT igs_ca_inst_pkg.get_pk_for_validation (
183: new_references.ci_cal_type,
184: new_references.ci_sequence_number
185: ) THEN
186: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
187: igs_ge_msg_stack.add;
188: app_exception.raise_exception;
189: END IF;
190:
196: ELSIF NOT igs_ps_ver_pkg.get_pk_for_validation (
197: new_references.course_cd,
198: new_references.version_number
199: ) THEN
200: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
201: igs_ge_msg_stack.add;
202: app_exception.raise_exception;
203: END IF;
204:
314: OPEN cur_rowid;
315: FETCH cur_rowid INTO lv_rowid;
316: IF (cur_rowid%FOUND) THEN
317: CLOSE cur_rowid;
318: fnd_message.set_name ('IGF', 'IGF_GR_PELL_CI_FK');
319: igs_ge_msg_stack.add;
320: app_exception.raise_exception;
321: RETURN;
322: END IF;
350: OPEN cur_rowid;
351: FETCH cur_rowid INTO lv_rowid;
352: IF (cur_rowid%FOUND) THEN
353: CLOSE cur_rowid;
354: fnd_message.set_name ('IGF', 'IGF_GR_PELL_PSV_FK');
355: igs_ge_msg_stack.add;
356: app_exception.raise_exception;
357: RETURN;
358: END IF;
384: OPEN cur_rowid;
385: FETCH cur_rowid INTO lv_rowid;
386: IF (cur_rowid%FOUND) THEN
387: CLOSE cur_rowid;
388: fnd_message.set_name ('IGF', 'IGF_GR_CANT_DEL_REP_PELL_ST');
389: igs_ge_msg_stack.add;
390: app_exception.raise_exception;
391: RETURN;
392: END IF;
418: OPEN cur_rowid;
419: FETCH cur_rowid INTO lv_rowid;
420: IF (cur_rowid%FOUND) THEN
421: CLOSE cur_rowid;
422: fnd_message.set_name ('IGF', 'IGF_GR_CANT_DEL_REP_ENT_ST');
423: igs_ge_msg_stack.add;
424: app_exception.raise_exception;
425: RETURN;
426: END IF;
464: FETCH cur_get_child INTO rec_get_child;
465: -- If record count is greater than one that implies child record exists.
466: -- Therfore do not allow to delete record and show error message.
467: IF rec_get_child.num_of_rec >1 THEN
468: fnd_message.set_name ('IGS', 'IGS_SS_INQ_DELETE_RECORD_INSTR');
469: igs_ge_msg_stack.add;
470: CLOSE cur_get_child;
471: app_exception.raise_exception;
472: END IF;
568: IF ( get_pk_for_validation(
569: new_references.pell_seq_id
570: )
571: ) THEN
572: fnd_message.set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
573: igs_ge_msg_stack.add;
574: app_exception.raise_exception;
575: END IF;
576: check_uniqueness;
589: IF ( get_pk_for_validation (
590: new_references.pell_seq_id
591: )
592: ) THEN
593: fnd_message.set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
594: igs_ge_msg_stack.add;
595: app_exception.raise_exception;
596: END IF;
597: check_uniqueness;
673: IF (x_last_update_login IS NULL) THEN
674: x_last_update_login := -1;
675: END IF;
676: ELSE
677: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
678: igs_ge_msg_stack.add;
679: app_exception.raise_exception;
680: END IF;
681:
881:
882: OPEN c1;
883: FETCH c1 INTO tlinfo;
884: IF (c1%notfound) THEN
885: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
886: igs_ge_msg_stack.add;
887: CLOSE c1;
888: app_exception.raise_exception;
889: RETURN;
919:
920: ) THEN
921: NULL;
922: ELSE
923: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
924: igs_ge_msg_stack.add;
925: app_exception.raise_exception;
926: END IF;
927:
992: IF (x_last_update_login IS NULL) THEN
993: x_last_update_login := -1;
994: END IF;
995: ELSE
996: fnd_message.set_name( 'FND', 'SYSTEM-INVALID ARGS');
997: igs_ge_msg_stack.add;
998: app_exception.raise_exception;
999: END IF;
1000: