[Home] [Help]
51: -- Populate Old Values.
52: Open cur_old_ref_values;
53: Fetch cur_old_ref_values INTO old_references;
54: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
55: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
56: IGS_GE_MSG_STACK.ADD;
57: Close cur_old_ref_values;
58: APP_EXCEPTION.RAISE_EXCEPTION;
59:
126: new_references.ci_sequence_number,
127: new_references.exam_cal_type,
128: new_references.exam_ci_sequence_number,
129: v_message_name) = FALSE THEN
130: FND_MESSAGE.SET_NAME('IGS',v_message_name);
131: IGS_GE_MSG_STACK.ADD;
132: APP_EXCEPTION.RAISE_EXCEPTION;
133: END IF;
134:
166: new_references.ass_id,
167: new_references.venue_cd,
168: v_message_name,
169: new_references.uoo_id) = FALSE THEN
170: FND_MESSAGE.SET_NAME('IGS',v_message_name);
171: IGS_GE_MSG_STACK.ADD;
172: END IF;
173: v_rowid_saved := TRUE;
174: END IF;
196: x_course_cd =>new_references.course_cd,
197: x_creation_dt =>new_references.creation_dt ,
198: x_uoo_id =>new_references.uoo_id) THEN
199:
200: FND_MESSAGE.SET_NAME('IGS','IGS_GE_MULTI_ORG_DUP_REC');
201: IGS_GE_MSG_STACK.ADD;
202: APP_EXCEPTION.RAISE_EXCEPTION;
203: END IF;
204:
233: new_references.start_time,
234: new_references.end_time,
235: new_references.venue_cd
236: ) THEN
237: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
238: IGS_GE_MSG_STACK.ADD;
239: APP_EXCEPTION.RAISE_EXCEPTION;
240:
241: END IF;
245: NULL;
246: ELSIF NOT IGS_AS_EXAM_SESSION_PKG.Get_UK_For_Validation (
247: new_references.ese_id
248: ) THEN
249: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
250: IGS_GE_MSG_STACK.ADD;
251: APP_EXCEPTION.RAISE_EXCEPTION;
252:
253: END IF;
269: new_references.ass_id,
270: new_references.creation_dt,
271: new_references.uoo_id
272: ) THEN
273: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
274: IGS_GE_MSG_STACK.ADD;
275: APP_EXCEPTION.RAISE_EXCEPTION;
276:
277: END IF;
383:
384: Open cur_rowid;
385: Fetch cur_rowid INTO lv_rowid;
386: IF (cur_rowid%FOUND) THEN
387: Fnd_Message.Set_Name ('IGS', 'IGS_AS_SEI_EI_FK');
388: IGS_GE_MSG_STACK.ADD;
389: Close cur_rowid;
390: APP_EXCEPTION.RAISE_EXCEPTION;
391:
410:
411: Open cur_rowid;
412: Fetch cur_rowid INTO lv_rowid;
413: IF (cur_rowid%FOUND) THEN
414: Fnd_Message.Set_Name ('IGS', 'IGS_AS_SEI_ESE_UFK');
415: IGS_GE_MSG_STACK.ADD;
416: Close cur_rowid;
417: APP_EXCEPTION.RAISE_EXCEPTION;
418:
445:
446: Open cur_rowid;
447: Fetch cur_rowid INTO lv_rowid;
448: IF (cur_rowid%FOUND) THEN
449: Fnd_Message.Set_Name ('IGS', 'IGS_AS_SEI_SUAAI_FK');
450: IGS_GE_MSG_STACK.ADD;
451: Close cur_rowid;
452: APP_EXCEPTION.RAISE_EXCEPTION;
453:
527: BeforeRowInsert1 ( p_inserting => TRUE );
528: IF Get_PK_For_Validation (
529: NEW_REFERENCES.std_exm_instn_id
530: ) THEN
531: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
532: IGS_GE_MSG_STACK.ADD;
533: APP_EXCEPTION.RAISE_EXCEPTION;
534: END IF;
535:
547:
548: ELSIF (p_action = 'VALIDATE_INSERT') THEN
549: IF Get_PK_For_Validation (
550: NEW_REFERENCES.std_exm_instn_id) THEN
551: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
552: IGS_GE_MSG_STACK.ADD;
553: APP_EXCEPTION.RAISE_EXCEPTION;
554: END IF;
555:
636: if X_LAST_UPDATE_LOGIN is NULL then
637: X_LAST_UPDATE_LOGIN := -1;
638: end if;
639: else
640: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
641: IGS_GE_MSG_STACK.ADD;
642: APP_EXCEPTION.RAISE_EXCEPTION;
643: end if;
644:
758:
759: EXCEPTION
760: WHEN OTHERS THEN
761: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
762: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
763: fnd_message.set_token ('ERR_CD', SQLCODE);
764: igs_ge_msg_stack.add;
765: igs_sc_gen_001.unset_ctx('R');
766: app_exception.raise_exception;
759: EXCEPTION
760: WHEN OTHERS THEN
761: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
762: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
763: fnd_message.set_token ('ERR_CD', SQLCODE);
764: igs_ge_msg_stack.add;
765: igs_sc_gen_001.unset_ctx('R');
766: app_exception.raise_exception;
767: ELSE
808: begin
809: open c1;
810: fetch c1 into tlinfo;
811: if (c1%notfound) then
812: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
813: IGS_GE_MSG_STACK.ADD;
814: APP_EXCEPTION.RAISE_EXCEPTION;
815: close c1;
816: return;
831: AND (tlinfo.ATTENDANCE_IND = X_ATTENDANCE_IND)
832: ) then
833: null;
834: else
835: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
836: IGS_GE_MSG_STACK.ADD;
837: APP_EXCEPTION.RAISE_EXCEPTION;
838: end if;
839: return;
881: if X_LAST_UPDATE_LOGIN is NULL then
882: X_LAST_UPDATE_LOGIN := -1;
883: end if;
884: else
885: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
886: IGS_GE_MSG_STACK.ADD;
887: APP_EXCEPTION.RAISE_EXCEPTION;
888: end if;
889: Before_DML(
930: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
931: where ROWID = X_ROWID
932: ;
933: if (sql%notfound) then
934: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
935: igs_ge_msg_stack.add;
936: igs_sc_gen_001.unset_ctx('R');
937: app_exception.raise_exception;
938: end if;
946: );
947: EXCEPTION
948: WHEN OTHERS THEN
949: IF (SQLCODE = (-28115)) THEN
950: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
951: fnd_message.set_token ('ERR_CD', SQLCODE);
952: igs_ge_msg_stack.add;
953: igs_sc_gen_001.unset_ctx('R');
954: app_exception.raise_exception;
947: EXCEPTION
948: WHEN OTHERS THEN
949: IF (SQLCODE = (-28115)) THEN
950: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
951: fnd_message.set_token ('ERR_CD', SQLCODE);
952: igs_ge_msg_stack.add;
953: igs_sc_gen_001.unset_ctx('R');
954: app_exception.raise_exception;
955: ELSE
1064: END IF;
1065: delete from IGS_AS_STD_EXM_INSTN_ALL
1066: where ROWID = X_ROWID;
1067: if (sql%notfound) then
1068: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
1069: igs_ge_msg_stack.add;
1070: igs_sc_gen_001.unset_ctx('R');
1071: app_exception.raise_exception;
1072: end if;
1116:
1117: IF upper(column_name) = 'ATTENDANCE_IND' OR
1118: column_name is null Then
1119: IF new_references.ATTENDANCE_IND NOT IN ('Y','N') Then
1120: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
1121: IGS_GE_MSG_STACK.ADD;
1122: APP_EXCEPTION.RAISE_EXCEPTION;
1123: END IF;
1124: END IF;
1125:
1126: IF upper(column_name) = 'ESE_ID' OR
1127: column_name is null Then
1128: IF new_references.ESE_ID < 1 OR new_references.ESE_ID > 999999 Then
1129: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
1130: IGS_GE_MSG_STACK.ADD;
1131: APP_EXCEPTION.RAISE_EXCEPTION;
1132: END IF;
1133: END IF;
1135:
1136: IF upper(column_name) = 'DAI_SEQUENCE_NUMBER' OR
1137: column_name is null Then
1138: IF new_references.DAI_SEQUENCE_NUMBER < 1 OR new_references.DAI_SEQUENCE_NUMBER > 999999 Then
1139: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
1140: IGS_GE_MSG_STACK.ADD;
1141: APP_EXCEPTION.RAISE_EXCEPTION;
1142: END IF;
1143: END IF;
1145:
1146: IF upper(column_name) = 'EXAM_CI_SEQUENCE_NUMBER' OR
1147: column_name is null Then
1148: IF new_references.EXAM_CI_SEQUENCE_NUMBER < 1 OR new_references.EXAM_CI_SEQUENCE_NUMBER> 999999 Then
1149: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
1150: IGS_GE_MSG_STACK.ADD;
1151: APP_EXCEPTION.RAISE_EXCEPTION;
1152: END IF;
1153: END IF;
1154:
1155: IF upper(column_name) = 'ATTENDANCE_IND' OR
1156: column_name is null Then
1157: IF new_references.ATTENDANCE_IND <> UPPER(new_references.ATTENDANCE_IND) Then
1158: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
1159: IGS_GE_MSG_STACK.ADD;
1160: APP_EXCEPTION.RAISE_EXCEPTION;
1161: END IF;
1162: END IF;
1162: END IF;
1163: IF upper(column_name) = 'CAL_TYPE' OR
1164: column_name is null Then
1165: IF new_references.CAL_TYPE <> UPPER(new_references.CAL_TYPE) Then
1166: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
1167: IGS_GE_MSG_STACK.ADD;
1168: APP_EXCEPTION.RAISE_EXCEPTION;
1169: END IF;
1170: END IF;
1170: END IF;
1171: IF upper(column_name) = 'COURSE_CD' OR
1172: column_name is null Then
1173: IF new_references.COURSE_CD <> UPPER(new_references.COURSE_CD) Then
1174: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
1175: IGS_GE_MSG_STACK.ADD;
1176: APP_EXCEPTION.RAISE_EXCEPTION;
1177: END IF;
1178: END IF;
1178: END IF;
1179: IF upper(column_name) = 'DT_ALIAS' OR
1180: column_name is null Then
1181: IF new_references.DT_ALIAS <> UPPER(new_references.DT_ALIAS) Then
1182: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
1183: IGS_GE_MSG_STACK.ADD;
1184: APP_EXCEPTION.RAISE_EXCEPTION;
1185: END IF;
1186: END IF;
1186: END IF;
1187: IF upper(column_name) = 'EXAM_CAL_TYPE' OR
1188: column_name is null Then
1189: IF new_references.EXAM_CAL_TYPE <> UPPER(new_references.EXAM_CAL_TYPE) Then
1190: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
1191: IGS_GE_MSG_STACK.ADD;
1192: APP_EXCEPTION.RAISE_EXCEPTION;
1193: END IF;
1194: END IF;
1194: END IF;
1195: IF upper(column_name) = 'UNIT_CD' OR
1196: column_name is null Then
1197: IF new_references.UNIT_CD <> UPPER(new_references.UNIT_CD) Then
1198: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
1199: IGS_GE_MSG_STACK.ADD;
1200: APP_EXCEPTION.RAISE_EXCEPTION;
1201: END IF;
1202: END IF;
1202: END IF;
1203: IF upper(column_name) = 'VENUE_CD' OR
1204: column_name is null Then
1205: IF new_references.VENUE_CD <> UPPER(new_references.VENUE_CD) Then
1206: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
1207: IGS_GE_MSG_STACK.ADD;
1208: APP_EXCEPTION.RAISE_EXCEPTION;
1209: END IF;
1210: END IF;
1211:
1212: IF upper(column_name) = 'SEAT_NUMBER' OR
1213: column_name is null Then
1214: IF new_references.SEAT_NUMBER < 0 OR new_references.SEAT_NUMBER > 9999 Then
1215: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
1216: IGS_GE_MSG_STACK.ADD;
1217: APP_EXCEPTION.RAISE_EXCEPTION;
1218: END IF;
1219: END IF;