85: OPEN cur_old_ref_values;
86: FETCH cur_old_ref_values INTO old_references;
87: IF ((cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT'))) THEN
88: CLOSE cur_old_ref_values;
89: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
90: igs_ge_msg_stack.add;
91: app_exception.raise_exception;
92: RETURN;
93: END IF;
182:
183: /*IF Upper(Column_Name) = 'TRANSCRIPT_REQUIRED' OR
184: Column_Name IS NULL THEN
185: IF NOT (new_references.transcript_required in ('Y','N')) THEN
186: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
187: IGS_GE_MSG_STACK.ADD;
188: App_Exception.Raise_Exception;
189: END IF;
190: END IF;*/
215: ELSE
216: Open cur_rowid;
217: Fetch cur_rowid INTO lv_rowid;
218: IF (cur_rowid%NOTFOUND) THEN
219: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
220: IGS_GE_MSG_STACK.ADD;
221: App_Exception.Raise_Exception;
222: END IF;
223: Close cur_rowid;
286: OPEN cur_rowid;
287: FETCH cur_rowid INTO lv_rowid;
288: IF (cur_rowid%FOUND) THEN
289: CLOSE cur_rowid;
290: fnd_message.set_name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
291: igs_ge_msg_stack.add;
292: app_exception.raise_exception;
293: RETURN;
294: END IF;
424: IF ( get_pk_for_validation(
425: new_references.hz_acad_hist_id
426: )
427: ) THEN
428: fnd_message.set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
429: igs_ge_msg_stack.add;
430: app_exception.raise_exception;
431: END IF;
432: Check_Constraints;
444: IF ( get_pk_for_validation (
445: new_references.hz_acad_hist_id
446: )
447: ) THEN
448: fnd_message.set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
449: igs_ge_msg_stack.add;
450: app_exception.raise_exception;
451: END IF;
452: Check_Constraints;
556: ELSE
557: x_program_update_date:=SYSDATE;
558: END IF;
559: ELSE
560: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
561: igs_ge_msg_stack.add;
562: app_exception.raise_exception;
563: END IF;
564:
746:
747: EXCEPTION
748: WHEN OTHERS THEN
749: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
750: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
751: fnd_message.set_token ('ERR_CD', SQLCODE);
752: igs_ge_msg_stack.add;
753: igs_sc_gen_001.unset_ctx('R');
754: app_exception.raise_exception;
747: EXCEPTION
748: WHEN OTHERS THEN
749: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
750: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
751: fnd_message.set_token ('ERR_CD', SQLCODE);
752: igs_ge_msg_stack.add;
753: igs_sc_gen_001.unset_ctx('R');
754: app_exception.raise_exception;
755: ELSE
874:
875: OPEN c1;
876: FETCH c1 INTO tlinfo;
877: IF (c1%notfound) THEN
878: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
879: igs_ge_msg_stack.add;
880: CLOSE c1;
881: app_exception.raise_exception;
882: RETURN;
930: AND ((tlinfo.transcript_required = x_transcript_required) OR ((tlinfo.transcript_required IS NULL) AND (X_transcript_required IS NULL)))
931: ) THEN
932: NULL;
933: ELSE
934: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
935: igs_ge_msg_stack.add;
936: app_exception.raise_exception;
937: END IF;
938:
1037: ELSE
1038: x_program_update_date:=SYSDATE;
1039: END IF;
1040: ELSE
1041: fnd_message.set_name( 'FND', 'SYSTEM-INVALID ARGS');
1042: igs_ge_msg_stack.add;
1043: app_exception.raise_exception;
1044: END IF;
1045:
1155: program_id = x_program_id
1156: WHERE rowid = x_rowid;
1157:
1158: IF (SQL%NOTFOUND) THEN
1159: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
1160: igs_ge_msg_stack.add;
1161: igs_sc_gen_001.unset_ctx('R');
1162: app_exception.raise_exception;
1163: END IF;
1169:
1170: EXCEPTION
1171: WHEN OTHERS THEN
1172: IF (SQLCODE = (-28115)) THEN
1173: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
1174: fnd_message.set_token ('ERR_CD', SQLCODE);
1175: igs_ge_msg_stack.add;
1176: igs_sc_gen_001.unset_ctx('R');
1177: app_exception.raise_exception;
1170: EXCEPTION
1171: WHEN OTHERS THEN
1172: IF (SQLCODE = (-28115)) THEN
1173: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
1174: fnd_message.set_token ('ERR_CD', SQLCODE);
1175: igs_ge_msg_stack.add;
1176: igs_sc_gen_001.unset_ctx('R');
1177: app_exception.raise_exception;
1178: ELSE
1386: DELETE FROM igs_ad_hz_acad_hist
1387: WHERE rowid = x_rowid;
1388:
1389: IF (SQL%NOTFOUND) THEN
1390: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
1391: igs_ge_msg_stack.add;
1392: igs_sc_gen_001.unset_ctx('R');
1393: app_exception.raise_exception;
1394: END IF;