[Home] [Help]
122:
123: IF irec.status = 'R' THEN
124: -- If the Data is required.
125: lv_complete := FALSE;
126: igf_sl_edit.insert_edit(p_loan_number, 'V', lv_err_type, lv_data_reqd, p_field_name, p_field_value);
127:
128: ELSIF irec.status = 'S' THEN
129: -- If the Data is strongly recommended.
130: igf_sl_edit.insert_edit(p_loan_number, 'V', lv_err_type, lv_data_recomm, p_field_name, p_field_value);
126: igf_sl_edit.insert_edit(p_loan_number, 'V', lv_err_type, lv_data_reqd, p_field_name, p_field_value);
127:
128: ELSIF irec.status = 'S' THEN
129: -- If the Data is strongly recommended.
130: igf_sl_edit.insert_edit(p_loan_number, 'V', lv_err_type, lv_data_recomm, p_field_name, p_field_value);
131:
132: END IF;
133:
134: END LOOP;
546: END IF;
547: lv_complete := TRUE;
548:
549: -- Delete records from Edit Report table, with type="V" (VALIDATION) for this Loan#
550: igf_sl_edit.delete_edit(orec.loan_number, 'V');
551:
552: lv_s_depncy_status := NULL;
553: lv_s_citizenship_status := NULL;
554: FOR isir_rec IN cur_isir(orec.base_id) LOOP
576:
577: -- If the Student is in Default, then do not originate
578: IF orec.s_default_status = 'Y' THEN
579: set_complete_status(FALSE);
580: igf_sl_edit.insert_edit(orec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'IS_DEFAULTER', 'S_DEFAULT_STATUS', NULL);
581: END IF;
582:
583: ELSIF p_loan_catg = 'DL_PLUS' THEN
584: lv_loan_catg := p_loan_catg;
605:
606: -- For PLUS, If the Student/Parent is in Default, then do not originate
607: IF orec.s_default_status = 'Y' THEN
608: set_complete_status(FALSE);
609: igf_sl_edit.insert_edit(orec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'IS_DEFAULTER', 'S_DEFAULT_STATUS', NULL);
610: END IF;
611: IF orec.p_default_status = 'Y' THEN
612: set_complete_status(FALSE);
613: igf_sl_edit.insert_edit(orec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'IS_DEFAULTER', 'P_DEFAULT_STATUS', NULL);
609: igf_sl_edit.insert_edit(orec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'IS_DEFAULTER', 'S_DEFAULT_STATUS', NULL);
610: END IF;
611: IF orec.p_default_status = 'Y' THEN
612: set_complete_status(FALSE);
613: igf_sl_edit.insert_edit(orec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'IS_DEFAULTER', 'P_DEFAULT_STATUS', NULL);
614: END IF;
615:
616: END IF; -- End of "p_loan_catg" check.
617:
629:
630: IF (orec.override_grade_level_code IS NOT NULL) THEN
631: IF (orec.override_grade_level_code <> l_dl_std_code) THEN
632: set_complete_status(FALSE);
633: igf_sl_edit.insert_edit(orec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'OVER_GRD_LVL_MISMATCH', 'OVERRIDE_GRADE_LEVEL_CODE', NULL);
634: END IF;
635: ELSIF orec.grade_level_code IS NOT NULL THEN
636: IF (orec.grade_level_code <> l_dl_std_code) THEN
637: set_complete_status(FALSE);
634: END IF;
635: ELSIF orec.grade_level_code IS NOT NULL THEN
636: IF (orec.grade_level_code <> l_dl_std_code) THEN
637: set_complete_status(FALSE);
638: igf_sl_edit.insert_edit(orec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'GRD_LVL_MISMATCH', 'GRADE_LEVEL_CODE', NULL);
639: END IF;
640: END IF;
641: */
642:
652: OPEN cur_special_school(p_ci_cal_type, p_ci_sequence_number);
653: FETCH cur_special_school INTO lv_special_school;
654: IF (lv_special_school IS NOT NULL AND lv_special_school <> 'Y') THEN
655: set_complete_status(FALSE);
656: igf_sl_edit.insert_edit(orec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INVALID_DISB_INFO', NULL, NULL);
657: END IF;
658: CLOSE cur_special_school;
659: END IF;
660: CLOSE cur_get_no_of_disbursements;
675: IF lv_dummy IS NULL THEN
676: FOR irec in cur_disb(orec.award_id) LOOP
677: IF NVL(irec.disb_count,0) > 0 THEN
678: set_complete_status(FALSE);
679: igf_sl_edit.insert_edit(orec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'DISB_MORE_THAN_ZERO', NULL, NULL);
680: END IF;
681: END LOOP;
682:
683: -- Loan Amount should be greater than zero. Applicable to Stafford and PLUS
682:
683: -- Loan Amount should be greater than zero. Applicable to Stafford and PLUS
684: IF nvl(orec.accepted_amt,0) <= 0 THEN
685: set_complete_status(FALSE);
686: igf_sl_edit.insert_edit(orec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'LESS_THAN_ZERO', 'LOAN_AMT_ACCEPTED', NULL);
687: END IF;
688: END IF;
689:
690: -- Origination Fee should be greater than zero. Applicable to Stafford and PLUS
689:
690: -- Origination Fee should be greater than zero. Applicable to Stafford and PLUS
691: IF nvl(orec.orig_fee_perct,0) <= 0 THEN
692: set_complete_status(FALSE);
693: igf_sl_edit.insert_edit(orec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'LESS_THAN_ZERO', 'ORIG_FEE_PERCT', NULL);
694: END IF;
695:
696: -- Check if the Loan Begin and End Dates fall within the Academic Begin and End Dates.
697:
698: -- masehgal # 2593215 added this check - acad year not found.
699: IF (lv_acad_begin_date IS NULL OR lv_acad_end_date IS NULL) THEN
700: -- irrespective if it is called from form or job, insert a record in edit report with a new error code
701: set_complete_status(FALSE);
702: igf_sl_edit.insert_edit(orec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'ACAD_YEAR_REQD', NULL, NULL);
703: END IF ;
704:
705: IF orec.loan_per_begin_date < lv_acad_begin_date THEN
706: set_complete_status(FALSE);
703: END IF ;
704:
705: IF orec.loan_per_begin_date < lv_acad_begin_date THEN
706: set_complete_status(FALSE);
707: igf_sl_edit.insert_edit(orec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'LOAN_BEGDT_LT_ACAD_BEGDT', NULL, NULL);
708: END IF;
709: IF orec.loan_per_end_date > lv_acad_end_date THEN
710:
711: set_complete_status(FALSE);
708: END IF;
709: IF orec.loan_per_end_date > lv_acad_end_date THEN
710:
711: set_complete_status(FALSE);
712: igf_sl_edit.insert_edit(orec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'LOAN_ENDDT_GT_ACAD_ENDDT', NULL, NULL);
713: END IF;
714:
715: -- Check whether the EFC Information is available for the Student, using the ISIR's Dependency Status
716: -- If ISIR's Depncy-status is X,Y, then NO EFC is Calculated.
716: -- If ISIR's Depncy-status is X,Y, then NO EFC is Calculated.
717: -- If ISIR's Depncy-status is I,D, then alculated EFC info has been provided.
718: IF nvl(lv_s_depncy_status,'*') NOT IN ('I','D') THEN
719: set_complete_status(FALSE);
720: igf_sl_edit.insert_edit(orec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'DEPNCY_NO_EFC_CALC', 'S_DEPNCY_STATUS', lv_s_depncy_status);
721: END IF;
722:
723: -- museshad (Bug 4116399) - Stafford loan limit validation for DLS, DLU
724: IF p_loan_catg = 'DL_STAFFORD' THEN
751: ELSIF lv_msg_name = 'IGF_AW_LOAN_LMT_NOT_FND' THEN
752: lv_lookup_code := 'LOAN_LMT_SETUP_CHK';
753: END IF;
754:
755: igf_sl_edit.insert_edit(orec.loan_number, 'V', 'IGF_SL_ERR_CODES', lv_lookup_code, NULL, NULL);
756:
757: -- Log
758: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
759: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.dl_lar_validate.debug','Stafford loan limit validation for award_id ' ||orec.award_id|| ' FAILED with message: ' ||lv_msg_name);
814: -- Display reject details on the Concurrent Manager Log File.
815: DECLARE
816: lv_log_mesg VARCHAR2(1000);
817: CURSOR c_reject IS
818: SELECT rpad(field_desc,50)||sl_error_desc reject_desc FROM igf_sl_edit_report_v
819: WHERE loan_number = orec.loan_number
820: AND orig_chg_code = 'V';
821: BEGIN
822:
967: FETCH cur_isir_info INTO isir_info_rec;
968: CLOSE cur_isir_info;
969:
970: -- Delete records from Edit Report table, with type="V" (VALIDATION) for this Loan#
971: igf_sl_edit.delete_edit(p_loan_rec.loan_number, 'V');
972: --
973: -- Get academic calendar details
974: --
975: --akomurav FA162 This code will pick the values from the lor_all table
1049:
1050: -- If the Student is in Default, then do not originate
1051: IF p_loan_rec.s_default_status = 'Y' THEN
1052: set_complete_status(FALSE);
1053: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'IS_DEFAULTER', 'S_DEFAULT_STATUS', NULL);
1054: END IF;
1055:
1056: ELSIF p_loan_rec.fed_fund_code = 'DLP' THEN
1057:
1096:
1097: -- For PLUS, If the Student/Parent is in Default, then do not originate
1098: IF p_loan_rec.s_default_status = 'Y' THEN
1099: set_complete_status(FALSE);
1100: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'IS_DEFAULTER', 'S_DEFAULT_STATUS', NULL);
1101: END IF;
1102: IF p_loan_rec.p_default_status = 'Y' THEN
1103: set_complete_status(FALSE);
1104: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'IS_DEFAULTER', 'P_DEFAULT_STATUS', NULL);
1100: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'IS_DEFAULTER', 'S_DEFAULT_STATUS', NULL);
1101: END IF;
1102: IF p_loan_rec.p_default_status = 'Y' THEN
1103: set_complete_status(FALSE);
1104: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'IS_DEFAULTER', 'P_DEFAULT_STATUS', NULL);
1105: END IF;
1106: END IF; -- End of "p_loan_catg" check.
1107:
1108: -- Check if number of disbursements is one or not. If one, it must be Special School. FA 149.
1117: OPEN cur_special_school(p_loan_rec.ci_cal_type, p_loan_rec.ci_sequence_number);
1118: FETCH cur_special_school INTO lv_special_school;
1119: IF (lv_special_school IS NOT NULL AND lv_special_school <> 'Y') THEN
1120: set_complete_status(FALSE);
1121: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INVALID_DISB_INFO', NULL, NULL);
1122: END IF;
1123: CLOSE cur_special_school;
1124: END IF;
1125:
1138: IF lv_dummy IS NULL THEN
1139: FOR irec IN cur_disb(p_loan_rec.award_id) LOOP
1140: IF NVL(irec.disb_count,0) > 0 THEN
1141: set_complete_status(FALSE);
1142: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'DISB_MORE_THAN_ZERO', NULL, NULL);
1143: END IF;
1144: END LOOP;
1145:
1146: -- Loan Amount should be greater than zero. Applicable to Stafford and PLUS
1145:
1146: -- Loan Amount should be greater than zero. Applicable to Stafford and PLUS
1147: IF NVL(p_loan_rec.accepted_amt,0) <= 0 THEN
1148: set_complete_status(FALSE);
1149: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'LESS_THAN_ZERO', 'LOAN_AMT_ACCEPTED', p_loan_rec.accepted_amt);
1150: END IF;
1151: END IF;
1152:
1153: -- Origination Fee should be greater than zero. Applicable to Stafford and PLUS
1152:
1153: -- Origination Fee should be greater than zero. Applicable to Stafford and PLUS
1154: IF NVL(p_loan_rec.orig_fee_perct,0) <= 0 THEN
1155: set_complete_status(FALSE);
1156: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'LESS_THAN_ZERO', 'ORIG_FEE_PERCT', p_loan_rec.orig_fee_perct);
1157: END IF;
1158:
1159: -- Payment ISIR missing
1160: IF isir_info_rec.payment_isir IS NULL THEN
1158:
1159: -- Payment ISIR missing
1160: IF isir_info_rec.payment_isir IS NULL THEN
1161: set_complete_status(FALSE);
1162: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'NO_PYMNT_ISIR', NULL, NULL);
1163: END IF;
1164:
1165: -- Payment ISIR mismatch
1166: IF TO_NUMBER(isir_info_rec.transaction_num) <> TO_NUMBER(p_loan_rec.cps_trans_num) THEN
1165: -- Payment ISIR mismatch
1166: IF TO_NUMBER(isir_info_rec.transaction_num) <> TO_NUMBER(p_loan_rec.cps_trans_num) THEN
1167: --MN 11/29/2004 16:23 - As the Transaction Number is numeric data stored in VarChar2, added To_Number
1168: set_complete_status(FALSE);
1169: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'PYMNT_ISIR_MISMATCH', NULL, NULL);
1170: END IF;
1171:
1172: IF (lv_acad_begin_date IS NULL OR lv_acad_end_date IS NULL) THEN
1173: set_complete_status(FALSE);
1170: END IF;
1171:
1172: IF (lv_acad_begin_date IS NULL OR lv_acad_end_date IS NULL) THEN
1173: set_complete_status(FALSE);
1174: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'ACAD_YEAR_REQD', NULL, NULL);
1175: END IF ;
1176:
1177: IF p_loan_rec.loan_per_begin_date < lv_acad_begin_date THEN
1178: set_complete_status(FALSE);
1175: END IF ;
1176:
1177: IF p_loan_rec.loan_per_begin_date < lv_acad_begin_date THEN
1178: set_complete_status(FALSE);
1179: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'LOAN_BEGDT_LT_ACAD_BEGDT', NULL, NULL);
1180: END IF;
1181:
1182: IF p_loan_rec.loan_per_end_date > lv_acad_end_date THEN
1183: set_complete_status(FALSE);
1180: END IF;
1181:
1182: IF p_loan_rec.loan_per_end_date > lv_acad_end_date THEN
1183: set_complete_status(FALSE);
1184: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'LOAN_ENDDT_GT_ACAD_ENDDT', NULL, NULL);
1185: END IF;
1186:
1187: -- Check whether the EFC Information is available for the Student, using the ISIR's Dependency Status
1188: -- If ISIR's Depncy-status is X,Y, then NO EFC is Calculated.
1188: -- If ISIR's Depncy-status is X,Y, then NO EFC is Calculated.
1189: -- If ISIR's Depncy-status is I,D, then alculated EFC info has been provided.
1190: IF NVL(lv_s_depncy_status,'*') NOT IN ('I','D') THEN
1191: set_complete_status(FALSE);
1192: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'DEPNCY_NO_EFC_CALC', 'S_DEPNCY_STATUS', lv_s_depncy_status);
1193: END IF;
1194:
1195: -- The following validation introduced in as part of IGS.L.6R bug 4346421.
1196: -- But due to Cust bug 4568942, this validation is removed. (Reverting back 4346421)
1204:
1205: IF (p_loan_rec.override_grade_level_code IS NOT NULL) THEN
1206: IF (p_loan_rec.override_grade_level_code <> l_dl_std_code) THEN
1207: set_complete_status(FALSE);
1208: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'OVER_GRD_LVL_MISMATCH', 'OVERRIDE_GRADE_LEVEL_CODE', NULL);
1209: END IF;
1210: ELSIF p_loan_rec.grade_level_code IS NOT NULL THEN
1211: IF (p_loan_rec.grade_level_code <> l_dl_std_code) THEN
1212: set_complete_status(FALSE);
1209: END IF;
1210: ELSIF p_loan_rec.grade_level_code IS NOT NULL THEN
1211: IF (p_loan_rec.grade_level_code <> l_dl_std_code) THEN
1212: set_complete_status(FALSE);
1213: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'GRD_LVL_MISMATCH', 'GRADE_LEVEL_CODE', NULL);
1214: END IF;
1215: END IF;
1216: */
1217:
1221:
1222: -- Check if the isir information is same as sws information
1223: IF p_loan_rec.grade_level_code NOT IN ('0','1','2','3','4','5','6','7') THEN
1224: lv_complete := FALSE;
1225: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_GRD_LEVEL', 'GRADE_LEVEL_CODE',p_loan_rec.grade_level_code);
1226: END IF;
1227: IF p_loan_rec.disclosure_print_ind IS NULL OR p_loan_rec.disclosure_print_ind NOT IN ('S','R','Y') THEN
1228: lv_complete := FALSE;
1229: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_DISC_IND', 'DISC_PRINT_IND',p_loan_rec.disclosure_print_ind);
1225: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_GRD_LEVEL', 'GRADE_LEVEL_CODE',p_loan_rec.grade_level_code);
1226: END IF;
1227: IF p_loan_rec.disclosure_print_ind IS NULL OR p_loan_rec.disclosure_print_ind NOT IN ('S','R','Y') THEN
1228: lv_complete := FALSE;
1229: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_DISC_IND', 'DISC_PRINT_IND',p_loan_rec.disclosure_print_ind);
1230: END IF;
1231: IF p_loan_rec.pnote_print_ind IS NULL OR p_loan_rec.pnote_print_ind NOT IN ('S','R','Z','V','O') THEN
1232: lv_complete := FALSE;
1233: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_PNOTE_IND', 'PNOTE_PRINT_IND',p_loan_rec.pnote_print_ind);
1229: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_DISC_IND', 'DISC_PRINT_IND',p_loan_rec.disclosure_print_ind);
1230: END IF;
1231: IF p_loan_rec.pnote_print_ind IS NULL OR p_loan_rec.pnote_print_ind NOT IN ('S','R','Z','V','O') THEN
1232: lv_complete := FALSE;
1233: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_PNOTE_IND', 'PNOTE_PRINT_IND',p_loan_rec.pnote_print_ind);
1234: END IF;
1235:
1236: /* Not inserting this edit ---
1237: IF isir_info_rec.date_of_birth <> student_dtl_rec.p_date_of_birth OR
1240:
1241:
1242:
1243: --lv_complete := FALSE;
1244: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'S_ISIR_INFO_CHG', NULL,NULL);
1245: END IF;
1246:
1247: */
1248:
1251: IF ( (student_dtl_rec.p_date_of_birth < TO_DATE('01011905', 'DDMMYYYY')) OR
1252: (student_dtl_rec.p_date_of_birth > TO_DATE('31121996', 'DDMMYYYY')) )
1253: THEN
1254: lv_complete := FALSE;
1255: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'S_INVALID_DOB0405', 'S_DATE_OF_BIRTH', student_dtl_rec.p_date_of_birth);
1256: END IF;
1257: END IF;
1258: IF p_dl_version = '2005-2006' THEN
1259: -- 1. validating student's date of birth
1260: IF ( (student_dtl_rec.p_date_of_birth < TO_DATE('01011906', 'DDMMYYYY')) OR
1261: (student_dtl_rec.p_date_of_birth > TO_DATE('31121997', 'DDMMYYYY')) )
1262: THEN
1263: lv_complete := FALSE;
1264: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'S_INVALID_DOB0506', 'S_DATE_OF_BIRTH', student_dtl_rec.p_date_of_birth);
1265: END IF;
1266: END IF;
1267: IF p_dl_version = '2006-2007' THEN
1268: -- 1. validating student's date of birth
1269: IF ( (student_dtl_rec.p_date_of_birth < TO_DATE('01011907', 'DDMMYYYY')) OR
1270: (student_dtl_rec.p_date_of_birth > TO_DATE('31121998', 'DDMMYYYY')) )
1271: THEN
1272: lv_complete := FALSE;
1273: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'S_INVALID_DOB0607', 'S_DATE_OF_BIRTH', student_dtl_rec.p_date_of_birth);
1274: END IF;
1275: END IF;
1276: -- validating student's SSN
1277: IF ( (student_dtl_rec.p_ssn < '001010001') OR (student_dtl_rec.p_ssn > '999999998') ) THEN
1275: END IF;
1276: -- validating student's SSN
1277: IF ( (student_dtl_rec.p_ssn < '001010001') OR (student_dtl_rec.p_ssn > '999999998') ) THEN
1278: lv_complete := FALSE;
1279: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'S_INVALID_SSN', 'S_SSN', student_dtl_rec.p_ssn);
1280: END IF;
1281:
1282: -- validating student's first name
1283: IF ( LENGTH(student_dtl_rec.p_first_name) > 12) THEN
1281:
1282: -- validating student's first name
1283: IF ( LENGTH(student_dtl_rec.p_first_name) > 12) THEN
1284: lv_complete := FALSE;
1285: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'S_INV_FIRST_NAME', 'S_FIRST_NAME', student_dtl_rec.p_first_name);
1286: END IF;
1287:
1288: -- validating student's last name
1289: IF ( LENGTH(student_dtl_rec.p_last_name) > 35) THEN
1287:
1288: -- validating student's last name
1289: IF ( LENGTH(student_dtl_rec.p_last_name) > 35) THEN
1290: lv_complete := FALSE;
1291: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'S_INV_LAST_NAME', 'S_LAST_NAME', student_dtl_rec.p_last_name);
1292: END IF;
1293:
1294: -- validating student's address line 1
1295: IF ( (LENGTH(student_dtl_rec.p_permt_addr1) < 1) OR
1294: -- validating student's address line 1
1295: IF ( (LENGTH(student_dtl_rec.p_permt_addr1) < 1) OR
1296: (LENGTH(student_dtl_rec.p_permt_addr1) > 40) ) THEN
1297: lv_complete := FALSE;
1298: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'S_INV_ADDR_LINE', 'S_PERMT_ADDR1', student_dtl_rec.p_permt_addr1);
1299: END IF;
1300:
1301: -- validating student's address line 2
1302: IF ( (LENGTH(student_dtl_rec.p_permt_addr2) < 1) OR (LENGTH(student_dtl_rec.p_permt_addr2) > 40) ) THEN
1300:
1301: -- validating student's address line 2
1302: IF ( (LENGTH(student_dtl_rec.p_permt_addr2) < 1) OR (LENGTH(student_dtl_rec.p_permt_addr2) > 40) ) THEN
1303: lv_complete := FALSE;
1304: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'S_INV_ADDR_LINE', 'S_PERMT_ADDR2', student_dtl_rec.p_permt_addr2);
1305: END IF;
1306:
1307: -- validating student's city
1308: IF ( LENGTH(student_dtl_rec.p_permt_city) > 24) THEN
1306:
1307: -- validating student's city
1308: IF ( LENGTH(student_dtl_rec.p_permt_city) > 24) THEN
1309: lv_complete := FALSE;
1310: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'S_INV_CITY', 'S_PERMT_CITY', student_dtl_rec.p_permt_city);
1311: END IF;
1312:
1313: -- validating student's E-MAIL
1314: IF ( LENGTH(student_dtl_rec.p_email_addr) > 128) THEN
1312:
1313: -- validating student's E-MAIL
1314: IF ( LENGTH(student_dtl_rec.p_email_addr) > 128) THEN
1315: lv_complete := FALSE;
1316: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'S_INV_EMAIL', 'S_EMAIL_ADDR', student_dtl_rec.p_email_addr);
1317: END IF;
1318:
1319: -- validating student's Phone Number sl03b.pls
1320: l_s_phone := igf_sl_gen.get_person_phone(igf_gr_gen.get_person_id(p_loan_rec.base_id));
1323: --This has being changed to NULL(akomurav)
1324: ELSE
1325: IF NOT validate_id(l_s_phone) THEN
1326: lv_complete := FALSE;
1327: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'S_INV_PHONE_NUM_D', 'S_PERMT_PHONE', l_s_phone);
1328: ELSE
1329: p_s_phone := l_s_phone;
1330: END IF;
1331: IF LENGTH(l_s_phone) > 17 OR LENGTH(l_s_phone) < 10 THEN
1329: p_s_phone := l_s_phone;
1330: END IF;
1331: IF LENGTH(l_s_phone) > 17 OR LENGTH(l_s_phone) < 10 THEN
1332: lv_complete := FALSE;
1333: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'S_INV_PHONE_NUM', 'S_PERMT_PHONE', l_s_phone);
1334: END IF;
1335: END IF;
1336:
1337: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1341:
1342: -- validating student's Zip Code
1343: IF ( (LENGTH(student_dtl_rec.p_permt_zip) < 5) OR (LENGTH(student_dtl_rec.p_permt_zip) > 13) ) THEN
1344: lv_complete := FALSE;
1345: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'S_INV_ZIP_CODE', 'S_PERMT_ZIP', student_dtl_rec.p_permt_zip);
1346: END IF;
1347:
1348: -- validating student's State Code
1349: IF ( (LENGTH(student_dtl_rec.p_permt_state) < 2) OR (LENGTH(student_dtl_rec.p_permt_state) > 3) ) THEN
1347:
1348: -- validating student's State Code
1349: IF ( (LENGTH(student_dtl_rec.p_permt_state) < 2) OR (LENGTH(student_dtl_rec.p_permt_state) > 3) ) THEN
1350: lv_complete := FALSE;
1351: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'S_INV_STATE_CODE', 'S_PERMT_STATE', student_dtl_rec.p_permt_state);
1352: END IF;
1353:
1354: -- validating student's driver licencse number
1355: IF ( LENGTH(student_dtl_rec.p_license_num) > 20) THEN
1353:
1354: -- validating student's driver licencse number
1355: IF ( LENGTH(student_dtl_rec.p_license_num) > 20) THEN
1356: lv_complete := FALSE;
1357: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'S_INV_DRIV_LIC_NUM', 'S_LICENSE_NUM', student_dtl_rec.p_license_num);
1358: END IF;
1359:
1360: IF student_dtl_rec.p_license_num IS NOT NULL AND student_dtl_rec.p_license_state IS NULL THEN
1361: lv_complete := FALSE;
1358: END IF;
1359:
1360: IF student_dtl_rec.p_license_num IS NOT NULL AND student_dtl_rec.p_license_state IS NULL THEN
1361: lv_complete := FALSE;
1362: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_DRIV_LIC_NUM_STATE', 'P_LICENSE_NUM', NULL);
1363: END IF;
1364:
1365: IF student_dtl_rec.p_license_state IS NOT NULL AND student_dtl_rec.p_license_num IS NULL THEN
1366: lv_complete := FALSE;
1363: END IF;
1364:
1365: IF student_dtl_rec.p_license_state IS NOT NULL AND student_dtl_rec.p_license_num IS NULL THEN
1366: lv_complete := FALSE;
1367: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_DRIV_LIC_STATE_NUM', 'P_LICENSE_ST', NULL);
1368: END IF;
1369:
1370: -- validating student's citizenship status code
1371: IF ( LENGTH(student_dtl_rec.p_citizenship_status) > 1) THEN
1369:
1370: -- validating student's citizenship status code
1371: IF ( LENGTH(student_dtl_rec.p_citizenship_status) > 1) THEN
1372: lv_complete := FALSE;
1373: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'S_INV_CIT_STATUS', 'S_CITIZENSHIP_STATUS', student_dtl_rec.p_citizenship_status);
1374: END IF;
1375:
1376: -- validating transaction number
1377: IF ( (to_number(p_loan_rec.cps_trans_num) < 1) OR (to_number(p_loan_rec.cps_trans_num) > 99) ) THEN
1375:
1376: -- validating transaction number
1377: IF ( (to_number(p_loan_rec.cps_trans_num) < 1) OR (to_number(p_loan_rec.cps_trans_num) > 99) ) THEN
1378: lv_complete := FALSE;
1379: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INVALID_TRANS_NUM', 'CPS_TRANS_NUM', p_loan_rec.cps_trans_num);
1380: END IF;
1381:
1382: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1383: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug','CPS Tran Number Check');
1387: IF p_dl_version = '2004-2005' THEN
1388: IF p_loan_rec.loan_per_begin_date < TO_DATE('02072003', 'DDMMYYYY') OR
1389: p_loan_rec.loan_per_begin_date > TO_DATE('30062005', 'DDMMYYYY') THEN
1390: lv_complete := FALSE;
1391: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_LOAN_PER_STARTDT0405', 'LOAN_PER_BEGIN', p_loan_rec.loan_per_begin_date );
1392: END IF;
1393: END IF;
1394: -- validating loan_per_end_date
1395: IF p_dl_version = '2004-2005' THEN
1395: IF p_dl_version = '2004-2005' THEN
1396: IF p_loan_rec.loan_per_end_date < TO_DATE('01072004', 'DDMMYYYY') OR
1397: p_loan_rec.loan_per_end_date > TO_DATE('29062006', 'DDMMYYYY') THEN
1398: lv_complete := FALSE;
1399: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_LOAN_PER_ENDDT0405', 'LOAN_PER_END_DATE', p_loan_rec.loan_per_end_date);
1400: END IF;
1401: END IF;
1402: -- validating loan_per_begin_date
1403: IF p_dl_version = '2005-2006' THEN
1403: IF p_dl_version = '2005-2006' THEN
1404: IF p_loan_rec.loan_per_begin_date < TO_DATE('02072004', 'DDMMYYYY') OR
1405: p_loan_rec.loan_per_begin_date > TO_DATE('30062006', 'DDMMYYYY') THEN
1406: lv_complete := FALSE;
1407: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_LOAN_PER_STARTDT0506', 'LOAN_PER_BEGIN', p_loan_rec.loan_per_begin_date );
1408: END IF;
1409: END IF;
1410: -- validating loan_per_end_date
1411: IF p_dl_version = '2005-2006' THEN
1411: IF p_dl_version = '2005-2006' THEN
1412: IF p_loan_rec.loan_per_end_date < TO_DATE('01072005', 'DDMMYYYY') OR
1413: p_loan_rec.loan_per_end_date > TO_DATE('29062007', 'DDMMYYYY') THEN
1414: lv_complete := FALSE;
1415: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_LOAN_PER_ENDDT0506', 'LOAN_PER_END_DATE', p_loan_rec.loan_per_end_date);
1416: END IF;
1417: END IF;
1418: -- validating loan_per_begin_date
1419: IF p_dl_version = '2006-2007' THEN
1419: IF p_dl_version = '2006-2007' THEN
1420: IF p_loan_rec.loan_per_begin_date < TO_DATE('02072005', 'DDMMYYYY') OR
1421: p_loan_rec.loan_per_begin_date > TO_DATE('30062007', 'DDMMYYYY') THEN
1422: lv_complete := FALSE;
1423: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_LOAN_PER_STARTDT0607', 'LOAN_PER_BEGIN', p_loan_rec.loan_per_begin_date );
1424: END IF;
1425: END IF;
1426: -- validating loan_per_end_date
1427: IF p_dl_version = '2006-2007' THEN
1427: IF p_dl_version = '2006-2007' THEN
1428: IF p_loan_rec.loan_per_end_date < TO_DATE('01072006', 'DDMMYYYY') OR
1429: p_loan_rec.loan_per_end_date > TO_DATE('29062008', 'DDMMYYYY') THEN
1430: lv_complete := FALSE;
1431: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_LOAN_PER_ENDDT0607', 'LOAN_PER_END_DATE', p_loan_rec.loan_per_end_date);
1432: END IF;
1433: END IF;
1434:
1435: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1443: IF lv_acad_begin_date IS NULL OR
1444: lv_acad_begin_date < TO_DATE('02072003', 'DDMMYYYY') OR
1445: lv_acad_begin_date > TO_DATE('30062005', 'DDMMYYYY') THEN
1446: lv_complete := FALSE;
1447: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_ACAD_PER_STARTDT0405', 'ACAD_PER_BEGIN_DATE', lv_acad_begin_date);
1448: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1449: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug','lv_acad_begin_date '|| lv_acad_begin_date);
1450: END IF;
1451:
1454: IF lv_acad_end_date IS NULL OR
1455: lv_acad_end_date < TO_DATE('01072004', 'DDMMYYYY') OR
1456: lv_acad_end_date > TO_DATE('29062006', 'DDMMYYYY') THEN
1457: lv_complete := FALSE;
1458: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_ACAD_PER_ENDDT0405', 'ACAD_PER_END_DATE', lv_acad_end_date);
1459: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1460: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug','lv_acad_end_date '|| lv_acad_end_date);
1461: END IF;
1462:
1466: IF lv_acad_begin_date IS NULL OR
1467: lv_acad_begin_date < TO_DATE('02072004', 'DDMMYYYY') OR
1468: lv_acad_begin_date > TO_DATE('30062006', 'DDMMYYYY') THEN
1469: lv_complete := FALSE;
1470: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_ACAD_PER_STARTDT0506', 'ACAD_PER_BEGIN_DATE', lv_acad_begin_date);
1471: END IF;
1472: -- validating academic end date
1473: IF lv_acad_end_date IS NULL OR
1474: lv_acad_end_date < TO_DATE('01072005', 'DDMMYYYY') OR
1473: IF lv_acad_end_date IS NULL OR
1474: lv_acad_end_date < TO_DATE('01072005', 'DDMMYYYY') OR
1475: lv_acad_end_date > TO_DATE('29062007', 'DDMMYYYY') THEN
1476: lv_complete := FALSE;
1477: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_ACAD_PER_ENDDT0506', 'ACAD_PER_END_DATE', lv_acad_end_date);
1478: END IF;
1479: END IF;
1480: IF p_dl_version = '2006-2007' THEN
1481: IF lv_acad_begin_date IS NULL OR
1481: IF lv_acad_begin_date IS NULL OR
1482: lv_acad_begin_date < TO_DATE('02072005', 'DDMMYYYY') OR
1483: lv_acad_begin_date > TO_DATE('30062007', 'DDMMYYYY') THEN
1484: lv_complete := FALSE;
1485: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_ACAD_PER_STARTDT0607', 'ACAD_PER_BEGIN_DATE', lv_acad_begin_date);
1486: END IF;
1487: -- validating academic end date
1488: IF lv_acad_end_date IS NULL OR
1489: lv_acad_end_date < TO_DATE('01072006', 'DDMMYYYY') OR
1488: IF lv_acad_end_date IS NULL OR
1489: lv_acad_end_date < TO_DATE('01072006', 'DDMMYYYY') OR
1490: lv_acad_end_date > TO_DATE('29062008', 'DDMMYYYY') THEN
1491: lv_complete := FALSE;
1492: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_ACAD_PER_ENDDT0607', 'ACAD_PER_END_DATE', lv_acad_end_date);
1493: END IF;
1494: END IF;
1495: END IF;
1496: -- validating note message
1495: END IF;
1496: -- validating note message
1497: IF ( LENGTH(p_loan_rec.note_message) > 20) THEN
1498: lv_complete := FALSE;
1499: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_NOTE_MSG', 'NOTE_MESSAGE', p_loan_rec.note_message);
1500: END IF;
1501:
1502: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1503: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug','Note Message Check Over');
1505:
1506: -- validating orig_fee_perct
1507: IF ( p_loan_rec.orig_fee_perct >= 100) THEN
1508: lv_complete := FALSE;
1509: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_ORIG_FEE_PCT', 'ORIG_FEE_PCT_NUM', p_loan_rec.orig_fee_perct);
1510: END IF;
1511: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1512: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug',' ORIG_FEE_PCT_NUM Check Over');
1513: END IF;
1514:
1515: -- validating int_reb_pct
1516: IF p_loan_rec.interest_rebate_percent_num >= 100 OR p_loan_rec.interest_rebate_percent_num < 0 THEN
1517: lv_complete := FALSE;
1518: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_INT_REB_PCT', 'INT_REB_PCT_NUM', p_loan_rec.interest_rebate_percent_num);
1519: END IF;
1520:
1521: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1522: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug',' INT_REB_PCT_NUM Check Over');
1523: END IF;
1524:
1525: IF p_loan_rec.accepted_amt >= 999999999.99 OR p_loan_rec.accepted_amt < 0 THEN
1526: lv_complete := FALSE;
1527: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_AWD_AMT', 'LOAN_AMT_ACCEPTED', p_loan_rec.accepted_amt);
1528: END IF;
1529: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1530: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug',' LOAN_AMT_ACCEPTED Check Over');
1531: END IF;
1534: FOR rec_disb_chg_dtls IN cur_disb_chg_dtls(p_loan_rec.award_id) LOOP
1535: -- validating disbursement gross amount
1536: IF rec_disb_chg_dtls.disb_accepted_amt >= 999999999.99 OR rec_disb_chg_dtls.disb_accepted_amt < 0 THEN
1537: lv_complete := FALSE;
1538: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_DISB_AMT', 'DISB_GROSS_AMT', rec_disb_chg_dtls.disb_accepted_amt);
1539: END IF;
1540: IF rec_disb_chg_dtls.disb_net_amt >= 999999999.99 OR rec_disb_chg_dtls.disb_net_amt < 0 THEN
1541: lv_complete := FALSE;
1542: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_DISB_AMT', 'DISB_NET_AMT', rec_disb_chg_dtls.disb_net_amt);
1538: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_DISB_AMT', 'DISB_GROSS_AMT', rec_disb_chg_dtls.disb_accepted_amt);
1539: END IF;
1540: IF rec_disb_chg_dtls.disb_net_amt >= 999999999.99 OR rec_disb_chg_dtls.disb_net_amt < 0 THEN
1541: lv_complete := FALSE;
1542: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_DISB_AMT', 'DISB_NET_AMT', rec_disb_chg_dtls.disb_net_amt);
1543: END IF;
1544: IF rec_disb_chg_dtls.orig_fee_amt >= 999999999.99 OR rec_disb_chg_dtls.orig_fee_amt < 0 THEN
1545: lv_complete := FALSE;
1546: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_DISB_AMT', 'ORIG_FEE_AMT ', rec_disb_chg_dtls.orig_fee_amt);
1542: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_DISB_AMT', 'DISB_NET_AMT', rec_disb_chg_dtls.disb_net_amt);
1543: END IF;
1544: IF rec_disb_chg_dtls.orig_fee_amt >= 999999999.99 OR rec_disb_chg_dtls.orig_fee_amt < 0 THEN
1545: lv_complete := FALSE;
1546: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_DISB_AMT', 'ORIG_FEE_AMT ', rec_disb_chg_dtls.orig_fee_amt);
1547: END IF;
1548: IF rec_disb_chg_dtls.disb_net_amt >= 999999999.99 OR rec_disb_chg_dtls.interest_rebate_amt < 0 THEN
1549: lv_complete := FALSE;
1550: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_DISB_AMT', 'INTEREST_REBATE_AMT', rec_disb_chg_dtls.interest_rebate_amt);
1546: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_DISB_AMT', 'ORIG_FEE_AMT ', rec_disb_chg_dtls.orig_fee_amt);
1547: END IF;
1548: IF rec_disb_chg_dtls.disb_net_amt >= 999999999.99 OR rec_disb_chg_dtls.interest_rebate_amt < 0 THEN
1549: lv_complete := FALSE;
1550: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_DISB_AMT', 'INTEREST_REBATE_AMT', rec_disb_chg_dtls.interest_rebate_amt);
1551: END IF;
1552:
1553: -- validating disbursement number
1554: IF ( rec_disb_chg_dtls.disb_num >= 21) THEN
1552:
1553: -- validating disbursement number
1554: IF ( rec_disb_chg_dtls.disb_num >= 21) THEN
1555: lv_complete := FALSE;
1556: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_DISB_NUM', 'DISB_NUM', rec_disb_chg_dtls.disb_num);
1557: END IF;
1558: -- validating disbursement sequence number
1559: IF ( rec_disb_chg_dtls.disb_seq_num >= 66) THEN
1560: lv_complete := FALSE;
1557: END IF;
1558: -- validating disbursement sequence number
1559: IF ( rec_disb_chg_dtls.disb_seq_num >= 66) THEN
1560: lv_complete := FALSE;
1561: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_DISB_SEQ_NUM', 'DISB_SEQ_NUM', rec_disb_chg_dtls.disb_seq_num);
1562: END IF;
1563: -- validating disbursement date
1564: IF p_dl_version = '2004-2005' THEN
1565: IF rec_disb_chg_dtls.disb_date < TO_DATE('22062003', 'DDMMYYYY') OR
1564: IF p_dl_version = '2004-2005' THEN
1565: IF rec_disb_chg_dtls.disb_date < TO_DATE('22062003', 'DDMMYYYY') OR
1566: rec_disb_chg_dtls.disb_date > TO_DATE('27102006', 'DDMMYYYY') THEN
1567: lv_complete := FALSE;
1568: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_DISB_DATE0405', 'DISB_DATE', rec_disb_chg_dtls.disb_date);
1569: END IF;
1570: END IF;
1571: IF p_dl_version = '2005-2006' THEN
1572: IF rec_disb_chg_dtls.disb_date < TO_DATE('22062004', 'DDMMYYYY') OR
1571: IF p_dl_version = '2005-2006' THEN
1572: IF rec_disb_chg_dtls.disb_date < TO_DATE('22062004', 'DDMMYYYY') OR
1573: rec_disb_chg_dtls.disb_date > TO_DATE('27102007', 'DDMMYYYY') THEN
1574: lv_complete := FALSE;
1575: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_DISB_DATE0506', 'DISB_DATE', rec_disb_chg_dtls.disb_date);
1576: END IF;
1577: END IF;
1578: IF p_dl_version = '2006-2007' THEN
1579: IF rec_disb_chg_dtls.disb_date < TO_DATE('22062005', 'DDMMYYYY') OR
1578: IF p_dl_version = '2006-2007' THEN
1579: IF rec_disb_chg_dtls.disb_date < TO_DATE('22062005', 'DDMMYYYY') OR
1580: rec_disb_chg_dtls.disb_date > TO_DATE('27102008', 'DDMMYYYY') THEN
1581: lv_complete := FALSE;
1582: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'INV_DISB_DATE0607', 'DISB_DATE', rec_disb_chg_dtls.disb_date);
1583: END IF;
1584: END IF;
1585: END LOOP;
1586: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1590: -- entity id validations
1591: --
1592: IF NOT validate_id(p_loan_rec.atd_entity_id_txt) THEN
1593: lv_complete := FALSE;
1594: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'ATD_SCHL_ID_NUM', 'ATD_ENTITY_ID_TXT', p_loan_rec.atd_entity_id_txt);
1595: ELSE
1596: IF p_loan_rec.atd_entity_id_txt > 99999999 THEN
1597: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1598: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug',' p_loan_rec.atd_entity_id_txt ' ||p_loan_rec.atd_entity_id_txt );
1597: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1598: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug',' p_loan_rec.atd_entity_id_txt ' ||p_loan_rec.atd_entity_id_txt );
1599: END IF;
1600: lv_complete := FALSE;
1601: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'ATD_SCHL_ID_MAX', 'ATD_ENTITY_ID_TXT', p_loan_rec.atd_entity_id_txt);
1602: END IF;
1603: END IF;
1604:
1605: IF NOT validate_id(p_loan_rec.rep_entity_id_txt)THEN
1603: END IF;
1604:
1605: IF NOT validate_id(p_loan_rec.rep_entity_id_txt)THEN
1606: lv_complete := FALSE;
1607: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'REP_SCHL_ID_NUM', 'REP_ENTITY_ID_TXT', p_loan_rec.rep_entity_id_txt);
1608: ELSE
1609: IF p_loan_rec.rep_entity_id_txt > 99999999 THEN
1610: lv_complete := FALSE;
1611: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'REP_SCHL_ID_MAX', 'REP_ENTITY_ID_TXT', p_loan_rec.rep_entity_id_txt);
1607: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'REP_SCHL_ID_NUM', 'REP_ENTITY_ID_TXT', p_loan_rec.rep_entity_id_txt);
1608: ELSE
1609: IF p_loan_rec.rep_entity_id_txt > 99999999 THEN
1610: lv_complete := FALSE;
1611: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'REP_SCHL_ID_MAX', 'REP_ENTITY_ID_TXT', p_loan_rec.rep_entity_id_txt);
1612: END IF;
1613: END IF;
1614: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1615: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug',' Entity ID Check Over');
1621: -- validating borrower's date of birth
1622: IF parent_dtl_rec.p_date_of_birth < TO_DATE('01011905', 'DDMMYYYY') OR
1623: parent_dtl_rec.p_date_of_birth > TO_DATE('31121996', 'DDMMYYYY') THEN
1624: lv_complete := FALSE;
1625: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_INVALID_DOB0405', 'P_DATE_OF_BIRTH', parent_dtl_rec.p_date_of_birth);
1626: END IF;
1627: END IF;
1628: IF p_dl_version = '2005-2006' THEN
1629: -- validating borrower's date of birth
1629: -- validating borrower's date of birth
1630: IF parent_dtl_rec.p_date_of_birth < TO_DATE('01011906', 'DDMMYYYY') OR
1631: parent_dtl_rec.p_date_of_birth > TO_DATE('31121997', 'DDMMYYYY') THEN
1632: lv_complete := FALSE;
1633: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_INVALID_DOB0506', 'P_DATE_OF_BIRTH', parent_dtl_rec.p_date_of_birth);
1634: END IF;
1635: END IF;
1636: IF p_dl_version = '2006-2007' THEN
1637: -- validating borrower's date of birth
1637: -- validating borrower's date of birth
1638: IF parent_dtl_rec.p_date_of_birth < TO_DATE('01011907', 'DDMMYYYY') OR
1639: parent_dtl_rec.p_date_of_birth > TO_DATE('31121998', 'DDMMYYYY') THEN
1640: lv_complete := FALSE;
1641: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_INVALID_DOB0607', 'P_DATE_OF_BIRTH', parent_dtl_rec.p_date_of_birth);
1642: END IF;
1643: END IF;
1644: -- validating borrower's SSN
1645: IF ( (parent_dtl_rec.p_ssn < '001010001') OR (parent_dtl_rec.p_ssn > '999999998') ) THEN
1643: END IF;
1644: -- validating borrower's SSN
1645: IF ( (parent_dtl_rec.p_ssn < '001010001') OR (parent_dtl_rec.p_ssn > '999999998') ) THEN
1646: lv_complete := FALSE;
1647: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_INVALID_SSN', 'P_SSN', parent_dtl_rec.p_ssn);
1648: END IF;
1649:
1650: -- validating borrower's first name
1651: IF ( LENGTH(parent_dtl_rec.p_first_name) > 12) THEN
1649:
1650: -- validating borrower's first name
1651: IF ( LENGTH(parent_dtl_rec.p_first_name) > 12) THEN
1652: lv_complete := FALSE;
1653: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_INV_FIRST_NAME', 'P_FIRST_NAME', parent_dtl_rec.p_first_name);
1654: END IF;
1655:
1656: -- validating borrower's last name
1657: IF ( LENGTH(parent_dtl_rec.p_last_name) > 35) THEN
1655:
1656: -- validating borrower's last name
1657: IF ( LENGTH(parent_dtl_rec.p_last_name) > 35) THEN
1658: lv_complete := FALSE;
1659: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_INV_LAST_NAME', 'P_LAST_NAME', parent_dtl_rec.p_last_name);
1660: END IF;
1661:
1662: -- validating borrower's address line 1
1663: IF ( (LENGTH(parent_dtl_rec.p_permt_addr1) < 1) OR (LENGTH(parent_dtl_rec.p_permt_addr1) > 40) ) THEN
1661:
1662: -- validating borrower's address line 1
1663: IF ( (LENGTH(parent_dtl_rec.p_permt_addr1) < 1) OR (LENGTH(parent_dtl_rec.p_permt_addr1) > 40) ) THEN
1664: lv_complete := FALSE;
1665: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_INV_ADDR_LINE', 'P_PERMT_ADDR1', parent_dtl_rec.p_permt_addr1);
1666: END IF;
1667:
1668: -- validating borrower's address line 2
1669: IF ( (LENGTH(parent_dtl_rec.p_permt_addr2) < 1) OR (LENGTH(parent_dtl_rec.p_permt_addr2) > 40) ) THEN
1667:
1668: -- validating borrower's address line 2
1669: IF ( (LENGTH(parent_dtl_rec.p_permt_addr2) < 1) OR (LENGTH(parent_dtl_rec.p_permt_addr2) > 40) ) THEN
1670: lv_complete := FALSE;
1671: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_INV_ADDR_LINE', 'P_PERMT_ADDR2', parent_dtl_rec.p_permt_addr2);
1672: END IF;
1673:
1674: -- validating borrower's city
1675: IF ( LENGTH(parent_dtl_rec.p_permt_city) > 24) THEN
1673:
1674: -- validating borrower's city
1675: IF ( LENGTH(parent_dtl_rec.p_permt_city) > 24) THEN
1676: lv_complete := FALSE;
1677: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_INV_CITY', 'P_PERMT_CITY', parent_dtl_rec.p_permt_city);
1678: END IF;
1679:
1680: -- validating borrower's E-MAIL
1681: IF ( LENGTH(parent_dtl_rec.p_email_addr) > 128) THEN
1679:
1680: -- validating borrower's E-MAIL
1681: IF ( LENGTH(parent_dtl_rec.p_email_addr) > 128) THEN
1682: lv_complete := FALSE;
1683: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_INV_EMAIL', 'P_EMAIL_ADDR', parent_dtl_rec.p_email_addr);
1684: END IF;
1685:
1686: -- validating borrower's Phone Number
1687: l_p_phone := igf_sl_gen.get_person_phone(p_loan_rec.p_person_id);
1690: --This has being changed to NULL(akomurav)
1691: ELSE
1692: IF NOT validate_id(l_p_phone) THEN
1693: lv_complete := FALSE;
1694: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_INV_PHONE_NUM_D', 'P_PERMT_PHONE', l_p_phone);
1695: ELSE
1696: p_p_phone := l_p_phone;
1697: END IF;
1698: IF LENGTH(l_p_phone) > 17 OR LENGTH(l_p_phone) < 10 THEN
1696: p_p_phone := l_p_phone;
1697: END IF;
1698: IF LENGTH(l_p_phone) > 17 OR LENGTH(l_p_phone) < 10 THEN
1699: lv_complete := FALSE;
1700: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_INV_PHONE_NUM', 'P_PERMT_PHONE', l_p_phone);
1701: END IF;
1702: END IF;
1703: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1704: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug','l_p_phone '|| l_p_phone);
1711:
1712: -- validating borrower's Zip Code
1713: IF ( (LENGTH(parent_dtl_rec.p_permt_zip) < 5) OR (LENGTH(parent_dtl_rec.p_permt_zip) > 13) ) THEN
1714: lv_complete := FALSE;
1715: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_INV_ZIP_CODE', 'P_PERMT_ZIP', parent_dtl_rec.p_permt_zip);
1716: END IF;
1717:
1718: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1719: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug','parent_dtl_rec.p_permt_zip '|| parent_dtl_rec.p_permt_zip);
1721:
1722: -- validating borrower's State Code
1723: IF ( (LENGTH(parent_dtl_rec.p_permt_state) < 2) OR (LENGTH(parent_dtl_rec.p_permt_state) > 3) ) THEN
1724: lv_complete := FALSE;
1725: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_INV_STATE_CODE', 'P_PERMT_STATE', parent_dtl_rec.p_permt_state);
1726: END IF;
1727:
1728: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1729: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug','parent_dtl_rec.p_permt_state '|| parent_dtl_rec.p_permt_state);
1731:
1732: -- validating borrower's driver licencse number
1733: IF ( LENGTH(parent_dtl_rec.p_license_num) > 20) THEN
1734: lv_complete := FALSE;
1735: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_INV_DRIV_LIC_NUM', 'P_LICENSE_NUM', parent_dtl_rec.p_license_num);
1736: END IF;
1737:
1738: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1739: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug','parent_dtl_rec.p_license_num '|| parent_dtl_rec.p_license_num);
1740: END IF;
1741:
1742: IF parent_dtl_rec.p_license_num IS NOT NULL AND parent_dtl_rec.p_license_state IS NULL THEN
1743: lv_complete := FALSE;
1744: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_DRIV_LIC_NUM_STATE', 'P_LICENSE_NUM', NULL);
1745: END IF;
1746:
1747: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1748: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug','parent_dtl_rec.p_license_state '|| parent_dtl_rec.p_license_state);
1749: END IF;
1750:
1751: IF parent_dtl_rec.p_license_state IS NOT NULL AND parent_dtl_rec.p_license_num IS NULL THEN
1752: lv_complete := FALSE;
1753: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_DRIV_LIC_STATE_NUM', 'P_LICENSE_ST', NULL);
1754: END IF;
1755:
1756: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1757: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug','parent_dtl_rec.p_license_num '|| parent_dtl_rec.p_license_num);
1759:
1760: -- validating borrower's citizenship status code
1761: IF ( LENGTH(parent_dtl_rec.p_citizenship_status) > 1) THEN
1762: lv_complete := FALSE;
1763: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_INV_CIT_STATUS', 'P_CITIZENSHIP_STATUS', parent_dtl_rec.p_citizenship_status);
1764: END IF;
1765:
1766: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1767: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug','parent_dtl_rec.p_citizenship_status '|| parent_dtl_rec.p_citizenship_status);
1796: ELSIF lv_message = 'IGF_AW_LOAN_LMT_NOT_FND' THEN
1797: lv_lookup_code := 'LOAN_LMT_SETUP_CHK';
1798: END IF;
1799:
1800: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', lv_lookup_code, NULL, NULL);
1801:
1802: -- Log
1803: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1804: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug','Stafford loan limit validation for award_id ' ||p_loan_rec.award_id|| ' FAILED with message: ' ||lv_message);
1816: -- Display reject details on the Concurrent Manager Log File.
1817: DECLARE
1818: lv_log_mesg VARCHAR2(1000);
1819: CURSOR c_reject IS
1820: SELECT rpad(field_desc,50)||sl_error_desc reject_desc FROM igf_sl_edit_report_v
1821: WHERE loan_number = p_loan_rec.loan_number
1822: AND orig_chg_code = 'V';
1823: BEGIN
1824: fnd_file.put_line(fnd_file.log, '');