[Home] [Help]
57: Open cur_old_ref_values;
58: Fetch cur_old_ref_values INTO old_references;
59: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
60: Close cur_old_ref_values;
61: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
62: IGS_GE_MSG_STACK.ADD;
63: App_Exception.Raise_Exception;
64: Return;
65: END IF;
147: -- The following code checks for check constraints on the Columns.
148: IF Upper(Column_Name) = 'CLOSED_IND' OR
149: Column_Name IS NULL THEN
150: IF NOT (new_references.closed_ind IN ('Y','N')) THEN
151: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
152: IGS_GE_MSG_STACK.ADD;
153: App_Exception.Raise_Exception;
154: END IF;
155: END IF;
157: -- The following code checks for check constraints on the Columns.
158: IF Upper(Column_Name) = 'PERCENTILE_YEAR_RANK_IND' OR
159: Column_Name IS NULL THEN
160: IF NOT (new_references.percentile_year_rank_ind IN ('Y','N')) THEN
161: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
162: IGS_GE_MSG_STACK.ADD;
163: App_Exception.Raise_Exception;
164: END IF;
165: END IF;
167: -- The following code checks for check constraints on the Columns.
168: IF Upper(Column_Name) = 'PERCENTILE_IND' OR
169: Column_Name IS NULL THEN
170: IF NOT (new_references.percentile_ind IN ('Y','N')) THEN
171: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
172: IGS_GE_MSG_STACK.ADD;
173: App_Exception.Raise_Exception;
174: END IF;
175: END IF;
177: -- The following code checks for check constraints on the Columns.
178: IF Upper(Column_Name) = 'SCORE_BAND_LOWER_IND' OR
179: Column_Name IS NULL THEN
180: IF NOT (new_references.score_band_lower_ind IN ('Y','N')) THEN
181: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
182: IGS_GE_MSG_STACK.ADD;
183: App_Exception.Raise_Exception;
184: END IF;
185: END IF;
187: -- The following code checks for check constraints on the Columns.
188: IF Upper(Column_Name) = 'MIN_SCORE' OR
189: Column_Name IS NULL THEN
190: IF NOT (new_references.min_score >= 0) THEN
191: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
192: IGS_GE_MSG_STACK.ADD;
193: App_Exception.Raise_Exception;
194: END IF;
195: END IF;
197: -- The following code checks for check constraints on the Columns.
198: IF Upper(Column_Name) = 'INCLUDE_IN_COMP_SCORE' OR
199: Column_Name IS NULL THEN
200: IF NOT (new_references.include_in_comp_score IN ('Y','N')) THEN
201: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
202: IGS_GE_MSG_STACK.ADD;
203: App_Exception.Raise_Exception;
204: END IF;
205: END IF;
207: -- The following code checks for check constraints on the Columns.
208: IF Upper(Column_Name) = 'STATE_PERCENTILE_IND' OR
209: Column_Name IS NULL THEN
210: IF NOT (new_references.state_percentile_ind IN ('Y','N')) THEN
211: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
212: IGS_GE_MSG_STACK.ADD;
213: App_Exception.Raise_Exception;
214: END IF;
215: END IF;
217: -- The following code checks for check constraints on the Columns.
218: IF Upper(Column_Name) = 'IRREGULARITY_CODE_IND' OR
219: Column_Name IS NULL THEN
220: IF NOT (new_references.irregularity_code_ind IN ('Y','N')) THEN
221: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
222: IGS_GE_MSG_STACK.ADD;
223: App_Exception.Raise_Exception;
224: END IF;
225: END IF;
227: -- The following code checks for check constraints on the Columns.
228: IF Upper(Column_Name) = 'SCORE_IND' OR
229: Column_Name IS NULL THEN
230: IF NOT (new_references.score_ind IN ('Y','N')) THEN
231: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
232: IGS_GE_MSG_STACK.ADD;
233: App_Exception.Raise_Exception;
234: END IF;
235: END IF;
237: -- The following code checks for check constraints on the Columns.
238: IF Upper(Column_Name) = 'MAX_SCORE' OR
239: Column_Name IS NULL THEN
240: IF NOT (new_references.max_score >=0 and new_references.max_score > new_references.min_score) THEN
241: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
242: IGS_GE_MSG_STACK.ADD;
243: App_Exception.Raise_Exception;
244: END IF;
245: END IF;
247: -- The following code checks for check constraints on the Columns.
248: IF Upper(Column_Name) = 'NATIONAL_PERCENTILE_IND' OR
249: Column_Name IS NULL THEN
250: IF NOT (new_references.national_percentile_ind IN ('Y','N')) THEN
251: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
252: IGS_GE_MSG_STACK.ADD;
253: App_Exception.Raise_Exception;
254: END IF;
255: END IF;
257: -- The following code checks for check constraints on the Columns.
258: IF Upper(Column_Name) = 'SCORE_BAND_UPPER_IND' OR
259: Column_Name IS NULL THEN
260: IF NOT (new_references.score_band_upper_ind IN ('Y','N')) THEN
261: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
262: IGS_GE_MSG_STACK.ADD;
263: App_Exception.Raise_Exception;
264: END IF;
265: END IF;
283: IF Get_Uk_For_Validation (
284: new_references.admission_test_type
285: ,new_references.test_segment_name
286: ) THEN
287: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
288: IGS_GE_MSG_STACK.ADD;
289: app_exception.raise_exception;
290:
291: END IF;
294: IF Get_UK2_For_Validation (
295: new_references.admission_test_type,
296: new_references.segment_group
297: ) THEN
298: FND_MESSAGE.SET_NAME ('IGS', 'IGS_AD_UNIQUE_SEG_GRP');
299: IGS_GE_MSG_STACK.ADD;
300: app_exception.raise_exception;
301: END IF;
302: END IF;
355: Open cur_rowid;
356: Fetch cur_rowid INTO lv_rowid;
357: IF (cur_rowid%FOUND) THEN
358: Close cur_rowid;
359: Fnd_Message.Set_Name ('IGS', 'IGS_AD_ADTT_ADTS_FK');
360: IGS_GE_MSG_STACK.ADD;
361: App_Exception.Raise_Exception;
362: Return;
363: END IF;
555: -- Call all the procedures related to Before Insert.
556: Null;
557: IF Get_Pk_For_Validation(
558: new_references.test_segment_id) THEN
559: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
560: IGS_GE_MSG_STACK.ADD;
561: App_Exception.Raise_Exception;
562: END IF;
563: Check_Uniqueness;
574: ELSIF (p_action = 'VALIDATE_INSERT') THEN
575: -- Call all the procedures related to Before Insert.
576: IF Get_PK_For_Validation (
577: new_references.test_segment_id) THEN
578: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
579: IGS_GE_MSG_STACK.ADD;
580: App_Exception.Raise_Exception;
581: END IF;
582: Check_Uniqueness;
683: if X_LAST_UPDATE_LOGIN is NULL then
684: X_LAST_UPDATE_LOGIN := -1;
685: end if;
686: else
687: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
688: IGS_GE_MSG_STACK.ADD;
689: app_exception.raise_exception;
690: end if;
691:
791:
792: EXCEPTION
793: WHEN OTHERS THEN
794: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
795: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
796: fnd_message.set_token ('ERR_CD', SQLCODE);
797: igs_ge_msg_stack.add;
798: igs_sc_gen_001.unset_ctx('R');
799: app_exception.raise_exception;
792: EXCEPTION
793: WHEN OTHERS THEN
794: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
795: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
796: fnd_message.set_token ('ERR_CD', SQLCODE);
797: igs_ge_msg_stack.add;
798: igs_sc_gen_001.unset_ctx('R');
799: app_exception.raise_exception;
800: ELSE
861: begin
862: open c1;
863: fetch c1 into tlinfo;
864: if (c1%notfound) then
865: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
866: IGS_GE_MSG_STACK.ADD;
867: close c1;
868: app_exception.raise_exception;
869: return;
888: AND (tlinfo.SEGMENT_GROUP = X_SEGMENT_GROUP)
889: ) then
890: null;
891: else
892: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
893: IGS_GE_MSG_STACK.ADD;
894: app_exception.raise_exception;
895: end if;
896: return;
948: if X_LAST_UPDATE_LOGIN is NULL then
949: X_LAST_UPDATE_LOGIN := -1;
950: end if;
951: else
952: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
953: IGS_GE_MSG_STACK.ADD;
954: app_exception.raise_exception;
955: end if;
956: Before_DML(
1005: SEGMENT_TYPE = X_SEGMENT_TYPE,
1006: SEGMENT_GROUP = X_SEGMENT_GROUP
1007: where ROWID = X_ROWID;
1008: if (sql%notfound) then
1009: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
1010: igs_ge_msg_stack.add;
1011: igs_sc_gen_001.unset_ctx('R');
1012: app_exception.raise_exception;
1013: end if;
1022: );
1023: EXCEPTION
1024: WHEN OTHERS THEN
1025: IF (SQLCODE = (-28115)) THEN
1026: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
1027: fnd_message.set_token ('ERR_CD', SQLCODE);
1028: igs_ge_msg_stack.add;
1029: igs_sc_gen_001.unset_ctx('R');
1030: app_exception.raise_exception;
1023: EXCEPTION
1024: WHEN OTHERS THEN
1025: IF (SQLCODE = (-28115)) THEN
1026: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
1027: fnd_message.set_token ('ERR_CD', SQLCODE);
1028: igs_ge_msg_stack.add;
1029: igs_sc_gen_001.unset_ctx('R');
1030: app_exception.raise_exception;
1031: ELSE
1149: END IF;
1150: delete from IGS_AD_TEST_SEGMENTS
1151: where ROWID = X_ROWID;
1152: if (sql%notfound) then
1153: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
1154: igs_ge_msg_stack.add;
1155: igs_sc_gen_001.unset_ctx('R');
1156: app_exception.raise_exception;
1157: end if;