46: OPEN cur_old_ref_values;
47: FETCH cur_old_ref_values INTO old_references;
48: IF ((cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT'))) THEN
49: CLOSE cur_old_ref_values;
50: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
51: igs_ge_msg_stack.add;
52: app_exception.raise_exception;
53: RETURN;
54: END IF;
105: OPEN validate_cr_dt;
106: FETCH validate_cr_dt INTO l_birth_dt;
107: CLOSE validate_cr_dt;
108: IF l_birth_dt IS NOT NULL AND l_birth_dt > new_references.start_date THEN
109: FND_MESSAGE.SET_NAME('IGS','IGS_AD_STRT_DT_LESS_BIRTH_DT');
110: IGS_GE_MSG_STACK.ADD;
111: APP_EXCEPTION.RAISE_EXCEPTION;
112: END IF;
113:
111: APP_EXCEPTION.RAISE_EXCEPTION;
112: END IF;
113:
114: IF new_references.start_date IS NULL AND new_references.end_date IS NOT NULL THEN
115: FND_MESSAGE.SET_NAME('IGS','IGS_PE_CANT_SPECIFY_FROM_DATE');
116: IGS_GE_MSG_STACK.ADD;
117: APP_EXCEPTION.RAISE_EXCEPTION;
118: END IF;
119:
140: NULL;
141: ELSIF NOT igs_pe_person_pkg.get_pk_for_validation (
142: new_references.person_id
143: ) THEN
144: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
145: igs_ge_msg_stack.add;
146: app_exception.raise_exception;
147: END IF;
148:
208: OPEN cur_rowid;
209: FETCH cur_rowid INTO lv_rowid;
210: IF (cur_rowid%FOUND) THEN
211: CLOSE cur_rowid;
212: fnd_message.set_name ('IGS', 'IGS_PE_PHD_HZ_FK');
213: igs_ge_msg_stack.add;
214: app_exception.raise_exception;
215: RETURN;
216: END IF;
273: IF ( get_pk_for_validation(
274: new_references.hearing_details_id
275: )
276: ) THEN
277: fnd_message.set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
278: igs_ge_msg_stack.add;
279: app_exception.raise_exception;
280: END IF;
281: check_parent_existance;
291: IF ( get_pk_for_validation (
292: new_references.hearing_details_id
293: )
294: ) THEN
295: fnd_message.set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
296: igs_ge_msg_stack.add;
297: app_exception.raise_exception;
298: END IF;
299: END IF;
346: IF (x_last_update_login IS NULL) THEN
347: x_last_update_login := -1;
348: END IF;
349: ELSE
350: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
351: igs_ge_msg_stack.add;
352: app_exception.raise_exception;
353: END IF;
354:
422:
423: EXCEPTION
424: WHEN OTHERS THEN
425: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
426: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
427: fnd_message.set_token ('ERR_CD', SQLCODE);
428: igs_ge_msg_stack.add;
429: igs_sc_gen_001.unset_ctx('R');
430: app_exception.raise_exception;
423: EXCEPTION
424: WHEN OTHERS THEN
425: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
426: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
427: fnd_message.set_token ('ERR_CD', SQLCODE);
428: igs_ge_msg_stack.add;
429: igs_sc_gen_001.unset_ctx('R');
430: app_exception.raise_exception;
431: ELSE
474:
475: OPEN c1;
476: FETCH c1 INTO tlinfo;
477: IF (c1%notfound) THEN
478: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
479: igs_ge_msg_stack.add;
480: CLOSE c1;
481: app_exception.raise_exception;
482: RETURN;
493: AND (tlinfo.non_acad_dism_ind = x_non_acad_dism_ind)
494: ) THEN
495: NULL;
496: ELSE
497: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
498: igs_ge_msg_stack.add;
499: app_exception.raise_exception;
500: END IF;
501:
544: IF (x_last_update_login IS NULL) THEN
545: x_last_update_login := -1;
546: END IF;
547: ELSE
548: fnd_message.set_name( 'FND', 'SYSTEM-INVALID ARGS');
549: igs_ge_msg_stack.add;
550: app_exception.raise_exception;
551: END IF;
552:
585: last_update_login = x_last_update_login
586: WHERE rowid = x_rowid;
587:
588: IF (SQL%NOTFOUND) THEN
589: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
590: igs_ge_msg_stack.add;
591: igs_sc_gen_001.unset_ctx('R');
592: app_exception.raise_exception;
593: END IF;
599:
600: EXCEPTION
601: WHEN OTHERS THEN
602: IF (SQLCODE = (-28115)) THEN
603: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
604: fnd_message.set_token ('ERR_CD', SQLCODE);
605: igs_ge_msg_stack.add;
606: igs_sc_gen_001.unset_ctx('R');
607: app_exception.raise_exception;
600: EXCEPTION
601: WHEN OTHERS THEN
602: IF (SQLCODE = (-28115)) THEN
603: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
604: fnd_message.set_token ('ERR_CD', SQLCODE);
605: igs_ge_msg_stack.add;
606: igs_sc_gen_001.unset_ctx('R');
607: app_exception.raise_exception;
608: ELSE
703: DELETE FROM igs_pe_hearing_dtls
704: WHERE rowid = x_rowid;
705:
706: IF (SQL%NOTFOUND) THEN
707: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
708: igs_ge_msg_stack.add;
709: igs_sc_gen_001.unset_ctx('R');
710: app_exception.raise_exception;
711: END IF;