[Home] [Help]
41: -- Populate Old Values.
42: Open cur_old_ref_values;
43: Fetch cur_old_ref_values INTO old_references;
44: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
45: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
46: IGS_GE_MSG_STACK.ADD;
47: App_Exception.Raise_Exception;
48: Close cur_old_ref_values;
49: Return;
138: END IF;
139:
140: IF upper(column_name) = 'ADMISSION_CD' OR column_name IS NULL THEN
141: IF new_references.admission_cd <> UPPER(new_references.admission_cd) THEN
142: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
143: IGS_GE_MSG_STACK.ADD;
144: APP_EXCEPTION.RAISE_EXCEPTION;
145: END IF;
146: END IF;
145: END IF;
146: END IF;
147: IF upper(column_name) = 'BASIS_FOR_ADMISSION_TYPE' OR column_name IS NULL THEN
148: IF new_references.basis_for_admission_type <> UPPER(new_references.basis_for_admission_type) THEN
149: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
150: IGS_GE_MSG_STACK.ADD;
151: APP_EXCEPTION.RAISE_EXCEPTION;
152: END IF;
153: END IF;
152: END IF;
153: END IF;
154: IF upper(column_name) = 'COURSE_RANK_SCHEDULE' OR column_name IS NULL THEN
155: IF new_references.course_rank_schedule <> UPPER(new_references.course_rank_schedule) THEN
156: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
157: IGS_GE_MSG_STACK.ADD;
158: APP_EXCEPTION.RAISE_EXCEPTION;
159: END IF;
160: END IF;
159: END IF;
160: END IF;
161: IF upper(column_name) = 'COURSE_RANK_SET' OR column_name IS NULL THEN
162: IF new_references.course_rank_set <> UPPER(new_references.course_rank_set) THEN
163: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
164: IGS_GE_MSG_STACK.ADD;
165: APP_EXCEPTION.RAISE_EXCEPTION;
166: END IF;
167: END IF;
166: END IF;
167: END IF;
168: IF upper(column_name) = 'NOMINATED_COURSE_CD' OR column_name IS NULL THEN
169: IF new_references.nominated_course_cd <> UPPER(new_references.nominated_course_cd) THEN
170: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
171: IGS_GE_MSG_STACK.ADD;
172: APP_EXCEPTION.RAISE_EXCEPTION;
173: END IF;
174: END IF;
173: END IF;
174: END IF;
175: IF upper(column_name) = 'REQ_FOR_ADV_STANDING_IND' OR column_name IS NULL THEN
176: IF new_references.req_for_adv_standing_ind <> UPPER(new_references.req_for_adv_standing_ind) THEN
177: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
178: IGS_GE_MSG_STACK.ADD;
179: APP_EXCEPTION.RAISE_EXCEPTION;
180: END IF;
181: END IF;
180: END IF;
181: END IF;
182: IF upper(column_name) = 'REQ_FOR_RECONSIDERATION_IND' OR column_name IS NULL THEN
183: IF new_references.req_for_reconsideration_ind <> UPPER(new_references.req_for_reconsideration_ind) THEN
184: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
185: IGS_GE_MSG_STACK.ADD;
186: APP_EXCEPTION.RAISE_EXCEPTION;
187: END IF;
188: END IF;
187: END IF;
188: END IF;
189: IF upper(column_name) = 'TRANSFER_COURSE_CD' OR column_name IS NULL THEN
190: IF new_references.transfer_course_cd <> UPPER(new_references.transfer_course_cd) 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;
253: new_references.admission_appl_number,
254: new_references.nominated_course_cd,
255: new_references.hist_start_dt
256: )THEN
257: FND_MESSAGE.SET_NAME('IGS','IGS_GE_MULTI_ORG_DUP_REC');
258: IGS_GE_MSG_STACK.ADD;
259: APP_EXCEPTION.RAISE_EXCEPTION;
260: END IF;
261: Check_constraints;
272: new_references.admission_appl_number,
273: new_references.nominated_course_cd,
274: new_references.hist_start_dt
275: )THEN
276: FND_MESSAGE.SET_NAME('IGS','IGS_GE_MULTI_ORG_DUP_REC');
277: IGS_GE_MSG_STACK.ADD;
278: APP_EXCEPTION.RAISE_EXCEPTION;
279: END IF;
280: Check_constraints;
338: if X_LAST_UPDATE_LOGIN is NULL then
339: X_LAST_UPDATE_LOGIN := -1;
340: end if;
341: else
342: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
343: IGS_GE_MSG_STACK.ADD;
344: app_exception.raise_exception;
345: end if;
346:
429: -- 1) ORA-28115 (policy with check option violation) which is raised when Policy predicate was evaluated to FALSE with the updated values.
430: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
431: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
432: -- that the ownerof policy function does not have privilege to access.
433: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_EXCEPTION');
434: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
435: IGS_GE_MSG_STACK.ADD;
436: app_exception.raise_exception;
437: ELSE
430: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
431: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
432: -- that the ownerof policy function does not have privilege to access.
433: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_EXCEPTION');
434: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
435: IGS_GE_MSG_STACK.ADD;
436: app_exception.raise_exception;
437: ELSE
438: RAISE;
473: begin
474: open c1;
475: fetch c1 into tlinfo;
476: if (c1%notfound) then
477: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
478: IGS_GE_MSG_STACK.ADD;
479: app_exception.raise_exception;
480: close c1;
481: return;
507: AND (X_REQ_FOR_ADV_STANDING_IND is null)))
508: ) then
509: null;
510: else
511: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
512: IGS_GE_MSG_STACK.ADD;
513: app_exception.raise_exception;
514: end if;
515: return;
549: if X_LAST_UPDATE_LOGIN is NULL then
550: X_LAST_UPDATE_LOGIN := -1;
551: end if;
552: else
553: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
554: IGS_GE_MSG_STACK.ADD;
555: app_exception.raise_exception;
556: end if;
557:
592: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
593: where ROWID = X_ROWID
594: ;
595: if (sql%notfound) then
596: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
597: IGS_GE_MSG_STACK.ADD;
598: app_exception.raise_exception;
599: end if;
600:
610: -- 1) ORA-28115 (policy with check option violation) which is raised when Policy predicate was evaluated to FALSE with the updated values.
611: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
612: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
613: -- that the ownerof policy function does not have privilege to access.
614: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_EXCEPTION');
615: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
616: IGS_GE_MSG_STACK.ADD;
617: app_exception.raise_exception;
618: ELSE
611: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
612: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
613: -- that the ownerof policy function does not have privilege to access.
614: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_EXCEPTION');
615: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
616: IGS_GE_MSG_STACK.ADD;
617: app_exception.raise_exception;
618: ELSE
619: RAISE;
701:
702: delete from IGS_AD_PS_APPL_HIST_ALL
703: where ROWID = X_ROWID;
704: if (sql%notfound) then
705: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
706: IGS_GE_MSG_STACK.ADD;
707: app_exception.raise_exception;
708: end if;
709:
719: -- 1) ORA-28115 (policy with check option violation) which is raised when Policy predicate was evaluated to FALSE with the updated values.
720: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
721: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
722: -- that the ownerof policy function does not have privilege to access.
723: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_EXCEPTION');
724: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
725: IGS_GE_MSG_STACK.ADD;
726: app_exception.raise_exception;
727: ELSE
720: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
721: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
722: -- that the ownerof policy function does not have privilege to access.
723: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_EXCEPTION');
724: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
725: IGS_GE_MSG_STACK.ADD;
726: app_exception.raise_exception;
727: ELSE
728: RAISE;