[Home] [Help]
40: -- Populate Old Values.
41: Open cur_old_ref_values;
42: Fetch cur_old_ref_values INTO old_references;
43: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
44: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
45: IGS_GE_MSG_STACK.ADD;
46: App_Exception.Raise_Exception;
47: Close cur_old_ref_values;
48: Return;
162: v_s_admission_process_type,
163: v_pref_limit,
164: v_message_name) = FALSE THEN
165: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
166: FND_MESSAGE.SET_NAME('IGS',v_message_name);
167: IGS_GE_MSG_STACK.ADD;
168: APP_EXCEPTION.RAISE_EXCEPTION;
169: END IF;
170: -- Validate the nominated IGS_PS_COURSE code.
184: v_message_name,
185: v_return_type) = FALSE THEN
186: IF NVL(v_return_type, '-1') = cst_error THEN
187: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
188: FND_MESSAGE.SET_NAME('IGS',v_message_name);
189: IGS_GE_MSG_STACK.ADD;
190: APP_EXCEPTION.RAISE_EXCEPTION;
191: END IF;
192: END IF;
204: v_message_name,
205: v_return_type) = FALSE THEN
206: IF NVL(v_return_type, '-1') = cst_error THEN
207: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
208: FND_MESSAGE.SET_NAME('IGS',v_message_name);
209: IGS_GE_MSG_STACK.ADD;
210: APP_EXCEPTION.RAISE_EXCEPTION;
211: END IF;
212: END IF;
227: v_message_name,
228: v_return_type) = FALSE THEN
229: IF NVL(v_return_type, '-1') = cst_error THEN
230: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
231: FND_MESSAGE.SET_NAME('IGS',v_message_name);
232: IGS_GE_MSG_STACK.ADD;
233: APP_EXCEPTION.RAISE_EXCEPTION;
234: END IF;
235: END IF;
248: v_message_name,
249: v_return_type) = FALSE THEN
250: IF NVL(v_return_type, '-1') = cst_error THEN
251: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
252: FND_MESSAGE.SET_NAME('IGS',v_message_name);
253: IGS_GE_MSG_STACK.ADD;
254: APP_EXCEPTION.RAISE_EXCEPTION;
255: END IF;
256: END IF;
261: --
262: IF (NVL(old_references.transfer_course_cd, '-1') <>
263: NVL(new_references.transfer_course_cd, '-1')) THEN
264: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(3161));
265: FND_MESSAGE.SET_NAME('IGS','IGS_AD_UPD_TRNSFRCD_NOT_ALLOW');
266: IGS_GE_MSG_STACK.ADD;
267: APP_EXCEPTION.RAISE_EXCEPTION;
268: END IF;
269: --
286: v_adm_cal_type,
287: v_adm_ci_sequence_number,
288: v_message_name,
289: v_return_type) = FALSE THEN
290: FND_MESSAGE.SET_NAME('IGS',v_message_name);
291: IGS_GE_MSG_STACK.ADD;
292: APP_EXCEPTION.RAISE_EXCEPTION;
293: END IF;
294: END IF;
302: IF IGS_AD_VAL_ACA.admp_val_bfa_closed (
303: new_references.basis_for_admission_type,
304: v_message_name) = FALSE THEN
305: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
306: FND_MESSAGE.SET_NAME('IGS',v_message_name);
307: IGS_GE_MSG_STACK.ADD;
308: APP_EXCEPTION.RAISE_EXCEPTION;
309: END IF;
310: END IF;
316: IF IGS_AD_VAL_ACA.admp_val_aco_closed (
317: new_references.admission_cd,
318: v_message_name) = FALSE THEN
319: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
320: FND_MESSAGE.SET_NAME('IGS',v_message_name);
321: IGS_GE_MSG_STACK.ADD;
322: APP_EXCEPTION.RAISE_EXCEPTION;
323: END IF;
324: END IF;
330: new_references.req_for_reconsideration_ind,
331: v_req_reconsider_allowed_ind,
332: v_message_name) = FALSE THEN
333: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
334: FND_MESSAGE.SET_NAME('IGS',v_message_name);
335: IGS_GE_MSG_STACK.ADD;
336: APP_EXCEPTION.RAISE_EXCEPTION;
337: END IF;
338: END IF;
344: new_references.req_for_adv_standing_ind,
345: v_req_adv_standing_allowed_ind,
346: v_message_name) = FALSE THEN
347: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
348: FND_MESSAGE.SET_NAME('IGS',v_message_name);
349: IGS_GE_MSG_STACK.ADD;
350: APP_EXCEPTION.RAISE_EXCEPTION;
351: END IF;
352: END IF;
449: old_references.admission_appl_number,
450: old_references.nominated_course_cd,
451: v_message_name) = FALSE THEN
452: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
453: FND_MESSAGE.SET_NAME('IGS',v_message_name);
454: IGS_GE_MSG_STACK.ADD;
455: APP_EXCEPTION.RAISE_EXCEPTION;
456: END IF;
457: END IF;
477: IF NOT IGS_AD_APPL_PKG.Get_PK_For_Validation (
478: new_references.person_id,
479: new_references.admission_appl_number
480: ) THEN
481: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND');
482: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_APPL'));
483: IGS_GE_MSG_STACK.ADD;
484: APP_EXCEPTION.RAISE_EXCEPTION;
485: END IF;
478: new_references.person_id,
479: new_references.admission_appl_number
480: ) THEN
481: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND');
482: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_APPL'));
483: IGS_GE_MSG_STACK.ADD;
484: APP_EXCEPTION.RAISE_EXCEPTION;
485: END IF;
486: END IF;
491: ELSE
492: IF NOT IGS_AD_CD_PKG.Get_PK_For_Validation (
493: new_references.admission_cd , 'N'
494: )THEN
495: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND_CLOSED');
496: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_ADM_CD'));
497: IGS_GE_MSG_STACK.ADD;
498: APP_EXCEPTION.RAISE_EXCEPTION;
499: END IF;
492: IF NOT IGS_AD_CD_PKG.Get_PK_For_Validation (
493: new_references.admission_cd , 'N'
494: )THEN
495: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND_CLOSED');
496: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_ADM_CD'));
497: IGS_GE_MSG_STACK.ADD;
498: APP_EXCEPTION.RAISE_EXCEPTION;
499: END IF;
500: END IF;
505: ELSE
506: IF NOT IGS_AD_BASIS_FOR_AD_PKG.Get_PK_For_Validation (
507: new_references.basis_for_admission_type , 'N'
508: )THEN
509: FND_MESSAGE.SET_NAME('IGS','IGS_AD_BASIS_ADM_TYPE_CLOSED');
510: IGS_GE_MSG_STACK.ADD;
511: APP_EXCEPTION.RAISE_EXCEPTION;
512: END IF;
513: END IF;
527: IF NOT IGS_EN_STDNT_PS_ATT_PKG.Get_PK_For_Validation (
528: new_references.person_id,
529: new_references.transfer_course_cd
530: )THEN
531: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND');
532: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_PERSON_TRANSFER_CD'));
533: IGS_GE_MSG_STACK.ADD;
534: APP_EXCEPTION.RAISE_EXCEPTION;
535: END IF;
528: new_references.person_id,
529: new_references.transfer_course_cd
530: )THEN
531: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND');
532: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_PERSON_TRANSFER_CD'));
533: IGS_GE_MSG_STACK.ADD;
534: APP_EXCEPTION.RAISE_EXCEPTION;
535: END IF;
536: END IF;
598: Open cur_rowid;
599: Fetch cur_rowid INTO lv_rowid;
600: IF (cur_rowid%FOUND) THEN
601: Close cur_rowid;
602: Fnd_Message.Set_Name ('IGS', 'IGS_AD_ACA_AA_FK');
603: IGS_GE_MSG_STACK.ADD;
604: App_Exception.Raise_Exception;
605: Return;
606: END IF;
624: Open cur_rowid;
625: Fetch cur_rowid INTO lv_rowid;
626: IF (cur_rowid%FOUND) THEN
627: Close cur_rowid;
628: Fnd_Message.Set_Name ('IGS', 'IGS_AD_ACA_ACO_FK');
629: IGS_GE_MSG_STACK.ADD;
630: App_Exception.Raise_Exception;
631: Return;
632: END IF;
650: Open cur_rowid;
651: Fetch cur_rowid INTO lv_rowid;
652: IF (cur_rowid%FOUND) THEN
653: Close cur_rowid;
654: Fnd_Message.Set_Name ('IGS', 'IGS_AD_ACA_BFA_FK');
655: IGS_GE_MSG_STACK.ADD;
656: App_Exception.Raise_Exception;
657: Return;
658: END IF;
676: Open cur_rowid;
677: Fetch cur_rowid INTO lv_rowid;
678: IF (cur_rowid%FOUND) THEN
679: Close cur_rowid;
680: Fnd_Message.Set_Name ('IGS', 'IGS_AD_ACA_CRS_FK');
681: IGS_GE_MSG_STACK.ADD;
682: App_Exception.Raise_Exception;
683: Return;
684: END IF;
704: Open cur_rowid;
705: Fetch cur_rowid INTO lv_rowid;
706: IF (cur_rowid%FOUND) THEN
707: Close cur_rowid;
708: Fnd_Message.Set_Name ('IGS', 'IGS_AD_ACA_SCA_FK');
709: IGS_GE_MSG_STACK.ADD;
710: App_Exception.Raise_Exception;
711: Return;
712: END IF;
741: END IF;
742:
743: IF upper(column_name) = 'COURSE_RANK_SCHEDULE' OR column_name IS NULL THEN
744: IF new_references.course_rank_schedule <> UPPER(new_references.course_rank_schedule) THEN
745: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
746: IGS_GE_MSG_STACK.ADD;
747: APP_EXCEPTION.RAISE_EXCEPTION;
748: END IF;
749: END IF;
748: END IF;
749: END IF;
750: IF upper(column_name) = 'COURSE_RANK_SET' OR column_name IS NULL THEN
751: IF new_references.course_rank_set <> UPPER(new_references.course_rank_set) THEN
752: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
753: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_COURSE_RANK_DTLS'));
754: IGS_GE_MSG_STACK.ADD;
755: APP_EXCEPTION.RAISE_EXCEPTION;
756: END IF;
749: END IF;
750: IF upper(column_name) = 'COURSE_RANK_SET' OR column_name IS NULL THEN
751: IF new_references.course_rank_set <> UPPER(new_references.course_rank_set) THEN
752: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
753: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_COURSE_RANK_DTLS'));
754: IGS_GE_MSG_STACK.ADD;
755: APP_EXCEPTION.RAISE_EXCEPTION;
756: END IF;
757: END IF;
756: END IF;
757: END IF;
758: IF upper(column_name) = 'NOMINATED_COURSE_CD' OR column_name IS NULL THEN
759: IF new_references.nominated_course_cd <> UPPER(new_references.nominated_course_cd) THEN
760: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
761: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_PROGRAM'));
762: IGS_GE_MSG_STACK.ADD;
763: APP_EXCEPTION.RAISE_EXCEPTION;
764: END IF;
757: END IF;
758: IF upper(column_name) = 'NOMINATED_COURSE_CD' OR column_name IS NULL THEN
759: IF new_references.nominated_course_cd <> UPPER(new_references.nominated_course_cd) THEN
760: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
761: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_PROGRAM'));
762: IGS_GE_MSG_STACK.ADD;
763: APP_EXCEPTION.RAISE_EXCEPTION;
764: END IF;
765: END IF;
764: END IF;
765: END IF;
766: IF upper(column_name) = 'REQ_FOR_ADV_STANDING_IND' OR column_name IS NULL THEN
767: IF new_references.req_for_adv_standing_ind <> UPPER(new_references.req_for_adv_standing_ind) THEN
768: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
769: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_REQ_ADV_STD_IND'));
770: IGS_GE_MSG_STACK.ADD;
771: APP_EXCEPTION.RAISE_EXCEPTION;
772: END IF;
765: END IF;
766: IF upper(column_name) = 'REQ_FOR_ADV_STANDING_IND' OR column_name IS NULL THEN
767: IF new_references.req_for_adv_standing_ind <> UPPER(new_references.req_for_adv_standing_ind) THEN
768: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
769: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_REQ_ADV_STD_IND'));
770: IGS_GE_MSG_STACK.ADD;
771: APP_EXCEPTION.RAISE_EXCEPTION;
772: END IF;
773: END IF;
772: END IF;
773: END IF;
774: IF upper(column_name) = 'REQ_FOR_RECONSIDERATION_IND' OR column_name IS NULL THEN
775: IF new_references.req_for_reconsideration_ind <> UPPER(new_references.req_for_reconsideration_ind) THEN
776: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
777: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_REQ_RECONS_IND'));
778: IGS_GE_MSG_STACK.ADD;
779: APP_EXCEPTION.RAISE_EXCEPTION;
780: END IF;
773: END IF;
774: IF upper(column_name) = 'REQ_FOR_RECONSIDERATION_IND' OR column_name IS NULL THEN
775: IF new_references.req_for_reconsideration_ind <> UPPER(new_references.req_for_reconsideration_ind) THEN
776: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
777: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_REQ_RECONS_IND'));
778: IGS_GE_MSG_STACK.ADD;
779: APP_EXCEPTION.RAISE_EXCEPTION;
780: END IF;
781: END IF;
780: END IF;
781: END IF;
782: IF upper(column_name) = 'TRANSFER_COURSE_CD' OR column_name IS NULL THEN
783: IF new_references.transfer_course_cd <> UPPER(new_references.transfer_course_cd) THEN
784: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
785: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_TRANSFER_CD'));
786: IGS_GE_MSG_STACK.ADD;
787: APP_EXCEPTION.RAISE_EXCEPTION;
788: END IF;
781: END IF;
782: IF upper(column_name) = 'TRANSFER_COURSE_CD' OR column_name IS NULL THEN
783: IF new_references.transfer_course_cd <> UPPER(new_references.transfer_course_cd) THEN
784: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
785: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_TRANSFER_CD'));
786: IGS_GE_MSG_STACK.ADD;
787: APP_EXCEPTION.RAISE_EXCEPTION;
788: END IF;
789: END IF;
840: new_references.person_id,
841: new_references.admission_appl_number,
842: new_references.nominated_course_cd
843: )THEN
844: FND_MESSAGE.SET_NAME('IGS','IGS_GE_MULTI_ORG_DUP_REC');
845: IGS_GE_MSG_STACK.ADD;
846: APP_EXCEPTION.RAISE_EXCEPTION;
847: END IF;
848: Check_Constraints;
862: new_references.person_id,
863: new_references.admission_appl_number,
864: new_references.nominated_course_cd
865: )THEN
866: FND_MESSAGE.SET_NAME('IGS','IGS_GE_MULTI_ORG_DUP_REC');
867: IGS_GE_MSG_STACK.ADD;
868: APP_EXCEPTION.RAISE_EXCEPTION;
869: END IF;
870: Check_Constraints;
945: else
946: X_PROGRAM_UPDATE_DATE := SYSDATE;
947: end if;
948: else
949: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
950: IGS_GE_MSG_STACK.ADD;
951: app_exception.raise_exception;
952: end if;
953:
1046: -- 1) ORA-28115 (policy with check option violation) which is raised when Policy predicate was evaluated to FALSE with the updated values.
1047: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
1048: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
1049: -- that the ownerof policy function does not have privilege to access.
1050: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_EXCEPTION');
1051: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
1052: IGS_GE_MSG_STACK.ADD;
1053: app_exception.raise_exception;
1054: ELSE
1047: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
1048: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
1049: -- that the ownerof policy function does not have privilege to access.
1050: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_EXCEPTION');
1051: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
1052: IGS_GE_MSG_STACK.ADD;
1053: app_exception.raise_exception;
1054: ELSE
1055: RAISE;
1085: begin
1086: open c1;
1087: fetch c1 into tlinfo;
1088: if (c1%notfound) then
1089: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
1090: IGS_GE_MSG_STACK.ADD;
1091: app_exception.raise_exception;
1092: close c1;
1093: return;
1113: AND (tlinfo.REQ_FOR_ADV_STANDING_IND = X_REQ_FOR_ADV_STANDING_IND)
1114: ) then
1115: null;
1116: else
1117: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
1118: IGS_GE_MSG_STACK.ADD;
1119: app_exception.raise_exception;
1120: end if;
1121: return;
1156: if X_LAST_UPDATE_LOGIN is NULL then
1157: X_LAST_UPDATE_LOGIN := -1;
1158: end if;
1159: else
1160: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
1161: IGS_GE_MSG_STACK.ADD;
1162: app_exception.raise_exception;
1163: end if;
1164:
1215: PROGRAM_UPDATE_DATE = X_PROGRAM_UPDATE_DATE
1216: where ROWID = X_ROWID
1217: ;
1218: if (sql%notfound) then
1219: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
1220: igs_ge_msg_stack.add;
1221: IF (x_mode = 'S') THEN
1222: igs_sc_gen_001.unset_ctx('R');
1223: END IF;
1243: -- 1) ORA-28115 (policy with check option violation) which is raised when Policy predicate was evaluated to FALSE with the updated values.
1244: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
1245: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
1246: -- that the ownerof policy function does not have privilege to access.
1247: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
1248: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
1249: IGS_GE_MSG_STACK.ADD;
1250: app_exception.raise_exception;
1251: ELSE
1244: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
1245: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
1246: -- that the ownerof policy function does not have privilege to access.
1247: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
1248: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
1249: IGS_GE_MSG_STACK.ADD;
1250: app_exception.raise_exception;
1251: ELSE
1252: RAISE;
1326: END IF;
1327: delete from IGS_AD_PS_APPL_ALL
1328: where ROWID = X_ROWID;
1329: if (sql%notfound) then
1330: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
1331: igs_ge_msg_stack.add;
1332: IF (x_mode = 'S') THEN
1333: igs_sc_gen_001.unset_ctx('R');
1334: END IF;
1354: -- 1) ORA-28115 (policy with check option violation) which is raised when Policy predicate was evaluated to FALSE with the updated values.
1355: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
1356: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
1357: -- that the ownerof policy function does not have privilege to access.
1358: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_EXCEPTION');
1359: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
1360: IGS_GE_MSG_STACK.ADD;
1361: app_exception.raise_exception;
1362: ELSE
1355: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
1356: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
1357: -- that the ownerof policy function does not have privilege to access.
1358: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_EXCEPTION');
1359: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
1360: IGS_GE_MSG_STACK.ADD;
1361: app_exception.raise_exception;
1362: ELSE
1363: RAISE;