[Home] [Help]
68: Open cur_old_ref_values;
69: Fetch cur_old_ref_values INTO old_references;
70: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
71: Close cur_old_ref_values;
72: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
73: IGS_GE_MSG_STACK.ADD;
74: App_Exception.Raise_Exception;
75: Return;
76: END IF;
193: -- the offer response status is 'Defferal' with deferment status as 'Confirmed' , the fee related information cannot be inserted.
194: /* removed the following validation for bug 3374937
195: IF l_appl_status = 'WITHDRAWN' OR
196: ( l_appl_status = 'COMPLETED' AND NOT igs_ad_gen_002.valid_ofr_resp_status(new_references.person_id,new_references.admission_appl_number)) THEN
197: fnd_message.set_name('IGS','IGS_AD_CANNOT_CHG_APPL_DTL');
198: igs_ge_msg_stack.add;
199: app_exception.raise_exception;
200: -- ADDED following check for Bug# 3017800
201: ELS*/
199: app_exception.raise_exception;
200: -- ADDED following check for Bug# 3017800
201: ELS*/
202: IF ( l_appl_status = 'COMPLETED' AND igs_ad_gen_002.valid_ofr_resp_status(new_references.person_id,new_references.admission_appl_number) AND l_fee_type <> 'ENROLL_DEPOSIT' ) THEN
203: fnd_message.set_name('IGS','IGS_AD_ENRDPT_UPD_CMP_APPL'); -- IGS_AD_ENRDPT_UPD_CMP_APPL: For a completed application only Enrollment Deposit fee records can be manupulated.
204: igs_ge_msg_stack.add;
205: app_exception.raise_exception;
206: END IF;
207:
217: IF (l_manage_acc = 'STUDENT_FINANCE') THEN
218: -- DO NOT Allow Manual creation of Enrollment Deposit record with Application Fee Status mapped to system status of Partial or Paid.
219: IF NVL(p_inserting,FALSE) AND l_fee_type = 'ENROLL_DEPOSIT' AND l_fee_status IN ('PAID','PARTIAL') THEN
220: -- Manual creation of Enrollment Deposit record with Application Fee Status mapped to system status of Partial or Paid is not allowed.
221: fnd_message.set_name('IGS','IGS_AD_ENR_DPT_STATUS');
222: igs_ge_msg_stack.add;
223: app_exception.raise_exception;
224: END IF;
225:
224: END IF;
225:
226: IF NVL(p_updating,FALSE) AND l_fee_type = 'ENROLL_DEPOSIT' AND l_fee_status IN ('PAID','PARTIAL') THEN
227: -- Update of an Enrollment Deposit record with Application Fee Status mapped to system status of Partial or Paid is not allowed.
228: fnd_message.set_name('IGS','IGS_AD_ENRDPT_UPD_NT_ALWD');
229: igs_ge_msg_stack.add;
230: app_exception.raise_exception;
231: END IF;
232: -- If manage_accounts is NULL or OTHER
235: NULL;
236: END IF;
237: ELSE
238: IF l_fee_type = 'ENROLL_DEPOSIT' THEN
239: fnd_message.set_name('IGS','IGS_AD_ENR_DPT_CNT_PAY');
240: igs_ge_msg_stack.add;
241: app_exception.raise_exception;
242: END IF;
243: END IF;
248:
249: -- the fee date cannot be earlier than the application date
250: /* relaxed this validation as per bug 4027871
251: IF new_references.fee_date < l_appl_dt THEN
252: fnd_message.set_name('IGS','IGS_AD_APPL_DATE_ERROR');
253: fnd_message.set_token ('NAME',fnd_message.get_string('IGS','IGS_AD_FEE_DATE'));
254: igs_ge_msg_stack.add;
255: app_exception.raise_exception;
256: END IF;
249: -- the fee date cannot be earlier than the application date
250: /* relaxed this validation as per bug 4027871
251: IF new_references.fee_date < l_appl_dt THEN
252: fnd_message.set_name('IGS','IGS_AD_APPL_DATE_ERROR');
253: fnd_message.set_token ('NAME',fnd_message.get_string('IGS','IGS_AD_FEE_DATE'));
254: igs_ge_msg_stack.add;
255: app_exception.raise_exception;
256: END IF;
257: */
256: END IF;
257: */
258: -- the fee date cannot be later than the system date
259: IF new_references.fee_date > SYSDATE THEN
260: fnd_message.set_name('IGS','IGS_AD_DATE_SYSDATE');
261: fnd_message.set_token ('NAME',fnd_message.get_string('IGS','IGS_AD_FEE_DATE'));
262: igs_ge_msg_stack.add;
263: app_exception.raise_exception;
264: END IF;
257: */
258: -- the fee date cannot be later than the system date
259: IF new_references.fee_date > SYSDATE THEN
260: fnd_message.set_name('IGS','IGS_AD_DATE_SYSDATE');
261: fnd_message.set_token ('NAME',fnd_message.get_string('IGS','IGS_AD_FEE_DATE'));
262: igs_ge_msg_stack.add;
263: app_exception.raise_exception;
264: END IF;
265: END IF; -- p_updating, p_inserting
295: IF Upper(Column_Name) = 'FEE_AMOUNT' OR
296: Column_Name IS NULL THEN
297: IF NOT (new_references.fee_amount >= 0
298: OR new_references.fee_amount IS NULL) THEN
299: Fnd_Message.Set_Name('IGS','IGS_AD_FEE_AMT_NON_NEGATIVE');
300: IGS_GE_MSG_STACK.ADD;
301: App_Exception.Raise_Exception;
302: END IF;
303: END IF;
329: new_references.fee_payment_method ,
330: 'SYS_FEE_PAY_METHOD',
331: 'N'
332: ) THEN
333: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND_CLOSED');
334: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_FEE_PAY_METHOD'));
335: IGS_GE_MSG_STACK.ADD;
336: App_Exception.Raise_Exception;
337: END IF;
330: 'SYS_FEE_PAY_METHOD',
331: 'N'
332: ) THEN
333: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND_CLOSED');
334: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_FEE_PAY_METHOD'));
335: IGS_GE_MSG_STACK.ADD;
336: App_Exception.Raise_Exception;
337: END IF;
338:
344: ELSIF NOT Igs_Ad_Appl_Pkg.Get_PK_For_Validation (
345: new_references.person_id,
346: new_references.admission_appl_number
347: ) THEN
348: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND');
349: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_APPL'));
350: IGS_GE_MSG_STACK.ADD;
351: App_Exception.Raise_Exception;
352: END IF;
345: new_references.person_id,
346: new_references.admission_appl_number
347: ) THEN
348: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND');
349: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_APPL'));
350: IGS_GE_MSG_STACK.ADD;
351: App_Exception.Raise_Exception;
352: END IF;
353:
358: new_references.applicant_fee_status ,
359: 'SYS_FEE_STATUS',
360: 'N'
361: ) THEN
362: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND_CLOSED');
363: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_APPLICANT_FEE_STAT'));
364: IGS_GE_MSG_STACK.ADD;
365: App_Exception.Raise_Exception;
366: END IF;
359: 'SYS_FEE_STATUS',
360: 'N'
361: ) THEN
362: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND_CLOSED');
363: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_APPLICANT_FEE_STAT'));
364: IGS_GE_MSG_STACK.ADD;
365: App_Exception.Raise_Exception;
366: END IF;
367:
372: new_references.applicant_fee_type ,
373: 'SYS_FEE_TYPE',
374: 'N'
375: ) THEN
376: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND_CLOSED');
377: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_APPLICANT_FEE_TYPE'));
378: IGS_GE_MSG_STACK.ADD;
379: App_Exception.Raise_Exception;
380: END IF;
373: 'SYS_FEE_TYPE',
374: 'N'
375: ) THEN
376: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND_CLOSED');
377: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_APPLICANT_FEE_TYPE'));
378: IGS_GE_MSG_STACK.ADD;
379: App_Exception.Raise_Exception;
380: END IF;
381:
385: ELSE
386: IF NOT igs_fi_acc_pkg.get_pk_for_validation (
387: new_references.rev_account_cd
388: ) THEN
389: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND_CLOSED');
390: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_REV_ACCT'));
391: IGS_GE_MSG_STACK.ADD;
392: App_Exception.Raise_Exception;
393: END IF;
386: IF NOT igs_fi_acc_pkg.get_pk_for_validation (
387: new_references.rev_account_cd
388: ) THEN
389: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND_CLOSED');
390: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_REV_ACCT'));
391: IGS_GE_MSG_STACK.ADD;
392: App_Exception.Raise_Exception;
393: END IF;
394: END IF;
399: ELSE
400: IF NOT igs_fi_acc_pkg.get_pk_for_validation (
401: new_references.cash_account_cd
402: ) THEN
403: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND_CLOSED');
404: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_CASH_ACCT'));
405: IGS_GE_MSG_STACK.ADD;
406: App_Exception.Raise_Exception;
407: END IF;
400: IF NOT igs_fi_acc_pkg.get_pk_for_validation (
401: new_references.cash_account_cd
402: ) THEN
403: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND_CLOSED');
404: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_CASH_ACCT'));
405: IGS_GE_MSG_STACK.ADD;
406: App_Exception.Raise_Exception;
407: END IF;
408: END IF;
475: Open cur_rowid;
476: Fetch cur_rowid INTO lv_rowid;
477: IF (cur_rowid%FOUND) THEN
478: Close cur_rowid;
479: Fnd_Message.Set_Name ('IGS', 'IGS_AD_AAR_AA_FK');
480: IGS_GE_MSG_STACK.ADD;
481: App_Exception.Raise_Exception;
482: Return;
483: END IF;
527: Open cur_rowid;
528: Fetch cur_rowid INTO lv_rowid;
529: IF (cur_rowid%FOUND) THEN
530: Close cur_rowid;
531: Fnd_Message.Set_Name ('IGS', 'IGS_AD_AAR_ACDC_FK3');
532: IGS_GE_MSG_STACK.ADD;
533: App_Exception.Raise_Exception;
534: Return;
535: END IF;
538: Open cur_rowid2;
539: Fetch cur_rowid2 INTO lv_rowid2;
540: IF (cur_rowid2%FOUND) THEN
541: Close cur_rowid2;
542: Fnd_Message.Set_Name ('IGS', 'IGS_AD_AAR_ACADC_FK1');
543: IGS_GE_MSG_STACK.ADD;
544: App_Exception.Raise_Exception;
545: Return;
546: END IF;
549: Open cur_rowid3;
550: Fetch cur_rowid3 INTO lv_rowid3;
551: IF (cur_rowid3%FOUND) THEN
552: Close cur_rowid3;
553: Fnd_Message.Set_Name ('IGS', 'IGS_AD_AAR_ACDC_FK2');
554: IGS_GE_MSG_STACK.ADD;
555: App_Exception.Raise_Exception;
556: Return;
557: END IF;
654: -- Call all the procedures related to Before Insert.
655: Null;
656: IF Get_Pk_For_Validation(
657: new_references.app_req_id) THEN
658: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
659: IGS_GE_MSG_STACK.ADD;
660: App_Exception.Raise_Exception;
661: END IF;
662: beforerowinsertupdate1( p_inserting => TRUE , p_updating => FALSE, p_deleting=> FALSE);
673: ELSIF (p_action = 'VALIDATE_INSERT') THEN
674: -- Call all the procedures related to Before Insert.
675: IF Get_PK_For_Validation (
676: new_references.app_req_id) THEN
677: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
678: IGS_GE_MSG_STACK.ADD;
679: App_Exception.Raise_Exception;
680: END IF;
681: beforerowinsertupdate1( p_inserting => TRUE , p_updating => FALSE, p_deleting=> FALSE);
805: if X_LAST_UPDATE_LOGIN is NULL then
806: X_LAST_UPDATE_LOGIN := -1;
807: end if;
808: else
809: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
810: IGS_GE_MSG_STACK.ADD;
811: app_exception.raise_exception;
812: end if;
813:
940: -- 1) ORA-28115 (policy with check option violation) which is raised when Policy predicate was evaluated to FALSE with the updated values.
941: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
942: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
943: -- that the ownerof policy function does not have privilege to access.
944: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_EXCEPTION');
945: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
946: IGS_GE_MSG_STACK.ADD;
947: app_exception.raise_exception;
948: ELSE
941: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
942: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
943: -- that the ownerof policy function does not have privilege to access.
944: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_EXCEPTION');
945: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
946: IGS_GE_MSG_STACK.ADD;
947: app_exception.raise_exception;
948: ELSE
949: RAISE;
1022: begin
1023: open c1;
1024: fetch c1 into tlinfo;
1025: if (c1%notfound) then
1026: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
1027: IGS_GE_MSG_STACK.ADD;
1028: close c1;
1029: app_exception.raise_exception;
1030: return;
1056: AND ((tlinfo.credit_card_status_code = x_credit_card_status_code) OR ((tlinfo.credit_card_status_code IS NULL) AND (x_credit_card_status_code IS NULL)))
1057: ) THEN
1058: NULL;
1059: ELSE
1060: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
1061: igs_ge_msg_stack.add;
1062: app_exception.raise_exception;
1063: END IF;
1064: RETURN;
1124: if X_LAST_UPDATE_LOGIN is NULL then
1125: X_LAST_UPDATE_LOGIN := -1;
1126: end if;
1127: else
1128: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
1129: IGS_GE_MSG_STACK.ADD;
1130: app_exception.raise_exception;
1131: end if;
1132: Before_DML(
1191: credit_card_payee_cd = new_references.credit_card_payee_cd,
1192: credit_card_status_code = new_references.credit_card_status_code
1193: WHERE rowid = x_rowid;
1194: IF (SQL%NOTFOUND) THEN
1195: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
1196: igs_ge_msg_stack.add;
1197: IF (x_mode = 'S') THEN
1198: igs_sc_gen_001.unset_ctx('R');
1199: END IF;
1218: -- 1) ORA-28115 (policy with check option violation) which is raised when Policy predicate was evaluated to FALSE with the updated values.
1219: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
1220: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
1221: -- that the ownerof policy function does not have privilege to access.
1222: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
1223: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
1224: IGS_GE_MSG_STACK.ADD;
1225: app_exception.raise_exception;
1226: ELSE
1219: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
1220: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
1221: -- that the ownerof policy function does not have privilege to access.
1222: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
1223: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
1224: IGS_GE_MSG_STACK.ADD;
1225: app_exception.raise_exception;
1226: ELSE
1227: RAISE;
1365: END IF;
1366: DELETE FROM IGS_AD_APP_REQ
1367: WHERE rowid = x_rowid;
1368: IF (SQL%NOTFOUND) THEN
1369: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
1370: igs_ge_msg_stack.add;
1371: IF (x_mode = 'S') THEN
1372: igs_sc_gen_001.set_ctx('R');
1373: END IF;
1391: -- 1) ORA-28115 (policy with check option violation) which is raised when Policy predicate was evaluated to FALSE with the updated values.
1392: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
1393: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
1394: -- that the ownerof policy function does not have privilege to access.
1395: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_EXCEPTION');
1396: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
1397: IGS_GE_MSG_STACK.ADD;
1398: app_exception.raise_exception;
1399: ELSE
1392: -- 2) ORA-28113 (policy predicate has error) which is raised when Policy function generates invalid predicate.
1393: -- 3) ORA-28111 (insufficient privilege to evaluate policy predicate) which is raised when Predicate has a subquery which contains objects
1394: -- that the ownerof policy function does not have privilege to access.
1395: FND_MESSAGE.SET_NAME ('IGS', 'IGS_SC_POLICY_EXCEPTION');
1396: FND_MESSAGE.SET_TOKEN('ERR_CD',SQLCODE);
1397: IGS_GE_MSG_STACK.ADD;
1398: app_exception.raise_exception;
1399: ELSE
1400: RAISE;