54: Open cur_old_ref_values;
55: Fetch cur_old_ref_values INTO old_references;
56: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
57: Close cur_old_ref_values;
58: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
59: IGS_GE_MSG_STACK.ADD;
60: App_Exception.Raise_Exception;
61: Return;
62: END IF;
119: -- The following code checks for check constraints on the Columns.
120: IF Upper(Column_Name) = 'ASSIGN_TYPE' OR
121: Column_Name IS NULL THEN
122: IF NOT (new_references.assign_type IN ('M','A')) THEN
123: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
124: IGS_GE_MSG_STACK.ADD;
125: App_Exception.Raise_Exception;
126: END IF;
127: END IF;
148: NULL;
149: ELSIF NOT Igs_Ad_Rs_Values_Pkg.Get_PK_For_Validation (
150: new_references.rating_values_id ,
151: 'N' ) THEN
152: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
153: IGS_GE_MSG_STACK.ADD;
154: App_Exception.Raise_Exception;
155: END IF;
156:
160: ELSIF NOT Igs_Ad_Code_Classes_Pkg.Get_UK2_For_Validation (
161: new_references.rating_type_id,
162: 'RATING_TYPE',
163: 'N' ) THEN
164: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
165: IGS_GE_MSG_STACK.ADD;
166: App_Exception.Raise_Exception;
167: END IF;
168:
180: new_references.admission_appl_number, -- locking issues -- rghosh )
181: new_references.nominated_course_cd,
182: new_references.sequence_number
183: ) THEN
184: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
185: IGS_GE_MSG_STACK.ADD;
186: App_Exception.Raise_Exception;
187: END IF;
188:
191: NULL;
192: ELSIF NOT Igs_Pe_Person_Pkg.Get_PK_For_Validation (
193: new_references.evaluator_id
194: ) THEN
195: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
196: IGS_GE_MSG_STACK.ADD;
197: App_Exception.Raise_Exception;
198: END IF;
199:
264: Open cur_rowid;
265: Fetch cur_rowid INTO lv_rowid;
266: IF (cur_rowid%FOUND) THEN
267: Close cur_rowid;
268: Fnd_Message.Set_Name ('IGS', 'IGS_AD_AAE_ARV_FK');
269: IGS_GE_MSG_STACK.ADD;
270: App_Exception.Raise_Exception;
271: Return;
272: END IF;
301: Open cur_rowid;
302: Fetch cur_rowid INTO lv_rowid;
303: IF (cur_rowid%FOUND) THEN
304: Close cur_rowid;
305: Fnd_Message.Set_Name ('IGS', 'IGS_AD_AAE_ACDC_FK');
306: IGS_GE_MSG_STACK.ADD;
307: App_Exception.Raise_Exception;
308: Return;
309: END IF;
344: Open cur_rowid;
345: Fetch cur_rowid INTO lv_rowid;
346: IF (cur_rowid%FOUND) THEN
347: Close cur_rowid;
348: Fnd_Message.Set_Name ('IGS', 'IGS_AD_AAE_ACAI_FK');
349: IGS_GE_MSG_STACK.ADD;
350: App_Exception.Raise_Exception;
351: Return;
352: END IF;
381: Open cur_rowid;
382: Fetch cur_rowid INTO lv_rowid;
383: IF (cur_rowid%FOUND) THEN
384: Close cur_rowid;
385: Fnd_Message.Set_Name ('IGS', 'IGS_AD_AAE_PE_FK');
386: IGS_GE_MSG_STACK.ADD;
387: App_Exception.Raise_Exception;
388: Return;
389: 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 ('IGS', 'IGS_AD_AAE_ARS_FK');
423: IGS_GE_MSG_STACK.ADD;
424: App_Exception.Raise_Exception;
425: Return;
426: END IF;
471: x_nominated_course_cd,
472: x_sequence_number );
473: FETCH c_get_outcome_status INTO c_get_outcome_status_rec;
474: IF IGS_AD_GEN_008.ADMP_GET_SAOS(c_get_outcome_status_rec.adm_outcome_status) IN ('VOIDED','WITHDRAWN','NO-QUOTA','OFFER','OFFER-FUTURE-TERM') THEN
475: Fnd_Message.Set_name('IGS','IGS_AD_NOT_INS_UPD_EVAL_OUT');
476: IGS_GE_MSG_STACK.ADD;
477: CLOSE c_get_outcome_status;
478: App_Exception.Raise_Exception;
479: ELSIF IGS_AD_GEN_008.ADMP_GET_SAOS(c_get_outcome_status_rec.adm_outcome_status) = 'REJECTED' AND c_get_outcome_status_rec.req_for_reconsideration_ind = 'N' THEN
476: IGS_GE_MSG_STACK.ADD;
477: CLOSE c_get_outcome_status;
478: App_Exception.Raise_Exception;
479: ELSIF IGS_AD_GEN_008.ADMP_GET_SAOS(c_get_outcome_status_rec.adm_outcome_status) = 'REJECTED' AND c_get_outcome_status_rec.req_for_reconsideration_ind = 'N' THEN
480: Fnd_Message.Set_name('IGS','IGS_AD_NOT_INS_UPD_EVAL_REQ');
481: IGS_GE_MSG_STACK.ADD;
482: CLOSE c_get_outcome_status;
483: App_Exception.Raise_Exception;
484: END IF;
560: -- Call all the procedures related to Before Insert.
561: Null;
562: IF Get_Pk_For_Validation(
563: new_references.appl_eval_id) THEN
564: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
565: IGS_GE_MSG_STACK.ADD;
566: App_Exception.Raise_Exception;
567: END IF;
568: Check_Constraints;
588: ELSIF (p_action = 'VALIDATE_INSERT') THEN
589: -- Call all the procedures related to Before Insert.
590: IF Get_PK_For_Validation (
591: new_references.appl_eval_id) THEN
592: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
593: IGS_GE_MSG_STACK.ADD;
594: App_Exception.Raise_Exception;
595: END IF;
596: Check_Constraints;
793:
794: IF l_person_name IS NOT NULL THEN
795:
796: FND_FILE.PUT_LINE (FND_FILE.LOG, '');
797: FND_MESSAGE.SET_NAME('IGS', 'IGS_AD_APNTF6');
798: FND_MESSAGE.SET_TOKEN ('PNAME', l_full_name);
799: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET());
800:
801: IGS_AD_ASSIGN_EVAL_AI_PKG.Wf_Inform_Evaluator_Appl (l_person_id, l_person_name,l_full_name);
794: IF l_person_name IS NOT NULL THEN
795:
796: FND_FILE.PUT_LINE (FND_FILE.LOG, '');
797: FND_MESSAGE.SET_NAME('IGS', 'IGS_AD_APNTF6');
798: FND_MESSAGE.SET_TOKEN ('PNAME', l_full_name);
799: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET());
800:
801: IGS_AD_ASSIGN_EVAL_AI_PKG.Wf_Inform_Evaluator_Appl (l_person_id, l_person_name,l_full_name);
802:
795:
796: FND_FILE.PUT_LINE (FND_FILE.LOG, '');
797: FND_MESSAGE.SET_NAME('IGS', 'IGS_AD_APNTF6');
798: FND_MESSAGE.SET_TOKEN ('PNAME', l_full_name);
799: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET());
800:
801: IGS_AD_ASSIGN_EVAL_AI_PKG.Wf_Inform_Evaluator_Appl (l_person_id, l_person_name,l_full_name);
802:
803: ELSE
800:
801: IGS_AD_ASSIGN_EVAL_AI_PKG.Wf_Inform_Evaluator_Appl (l_person_id, l_person_name,l_full_name);
802:
803: ELSE
804: FND_MESSAGE.SET_NAME('IGS', 'IGS_AD_APNTF4');
805: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET());
806:
807: END IF ; /* l_person_name */
808:
801: IGS_AD_ASSIGN_EVAL_AI_PKG.Wf_Inform_Evaluator_Appl (l_person_id, l_person_name,l_full_name);
802:
803: ELSE
804: FND_MESSAGE.SET_NAME('IGS', 'IGS_AD_APNTF4');
805: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET());
806:
807: END IF ; /* l_person_name */
808:
809: END IF; /* c_eval_num */
895: else
896: X_PROGRAM_UPDATE_DATE := SYSDATE;
897: end if;
898: else
899: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
900: IGS_GE_MSG_STACK.ADD;
901: app_exception.raise_exception;
902: end if;
903:
1003: -- 1) ORA-28115 (policy with check option violation) which is raised when Policy predicate was evaluated to FALSE with the updated values.
1004: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
1005: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
1006: -- that the ownerof policy function does not have privilege to access.
1007: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_EXCEPTION');
1008: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
1009: IGS_GE_MSG_STACK.ADD;
1010: app_exception.raise_exception;
1011: ELSE
1004: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
1005: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
1006: -- that the ownerof policy function does not have privilege to access.
1007: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_EXCEPTION');
1008: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
1009: IGS_GE_MSG_STACK.ADD;
1010: app_exception.raise_exception;
1011: ELSE
1012: RAISE;
1066:
1067: OPEN c1;
1068: FETCH c1 INTO tlinfo;
1069: IF (c1%notfound) THEN
1070: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
1071: igs_ge_msg_stack.add;
1072: CLOSE c1;
1073: app_exception.raise_exception;
1074: RETURN;
1092: AND ((tlinfo.closed_ind = x_closed_ind) OR ((tlinfo.closed_ind IS NULL) AND (X_closed_ind IS NULL)))
1093: ) THEN
1094: NULL;
1095: ELSE
1096: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
1097: igs_ge_msg_stack.add;
1098: app_exception.raise_exception;
1099: END IF;
1100:
1154: if X_LAST_UPDATE_LOGIN is NULL then
1155: X_LAST_UPDATE_LOGIN := -1;
1156: end if;
1157: else
1158: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
1159: IGS_GE_MSG_STACK.ADD;
1160: app_exception.raise_exception;
1161: end if;
1162: Before_DML(
1223: program_update_date = x_program_update_date,
1224: closed_ind = x_closed_ind
1225: WHERE rowid = x_rowid;
1226: IF (sql%NOTFOUND) THEN
1227: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
1228: igs_ge_msg_stack.add;
1229: IF (x_mode = 'S') THEN
1230: igs_sc_gen_001.unset_ctx('R');
1231: END IF;
1265: -- 1) ORA-28115 (policy with check option violation) which is raised when Policy predicate was evaluated to FALSE with the updated values.
1266: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
1267: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
1268: -- that the ownerof policy function does not have privilege to access.
1269: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
1270: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
1271: IGS_GE_MSG_STACK.ADD;
1272: app_exception.raise_exception;
1273: ELSE
1266: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
1267: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
1268: -- that the ownerof policy function does not have privilege to access.
1269: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
1270: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
1271: IGS_GE_MSG_STACK.ADD;
1272: app_exception.raise_exception;
1273: ELSE
1274: RAISE;
1518: END IF;
1519: DELETE FROM igs_ad_appl_eval
1520: WHERE rowid = x_rowid;
1521: IF (sql%NOTFOUND) THEN
1522: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
1523: igs_ge_msg_stack.add;
1524: IF (x_mode = 'S') THEN
1525: igs_sc_gen_001.unset_ctx('R');
1526: END IF;
1553: -- 1) ORA-28115 (policy with check option violation) which is raised when Policy predicate was evaluated to FALSE with the updated values.
1554: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
1555: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
1556: -- that the ownerof policy function does not have privilege to access.
1557: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_EXCEPTION');
1558: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
1559: IGS_GE_MSG_STACK.ADD;
1560: app_exception.raise_exception;
1561: ELSE
1554: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
1555: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
1556: -- that the ownerof policy function does not have privilege to access.
1557: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_EXCEPTION');
1558: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
1559: IGS_GE_MSG_STACK.ADD;
1560: app_exception.raise_exception;
1561: ELSE
1562: RAISE;