[Home] [Help]
804: OPEN cur_old_ref_values;
805: FETCH cur_old_ref_values INTO old_references;
806: IF ((cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT'))) THEN
807: CLOSE cur_old_ref_values;
808: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
809: igs_ge_msg_stack.add;
810: app_exception.raise_exception;
811: RETURN;
812: END IF;
946: fnd_log.string( fnd_log.level_statement, 'igf.plsql.igf_aw_awd_disb_pkg.BeforeRowInsertUpdateDelete1 ', 'l_v_fed_fund_code : '||l_v_fed_fund_code );
947: fnd_log.string( fnd_log.level_statement, 'igf.plsql.igf_aw_awd_disb_pkg.BeforeRowInsertUpdateDelete1 ', 'g_v_called_from : '||g_v_called_from );
948: END IF;
949: IF l_v_message_name IS NOT NULL THEN
950: fnd_message.set_name ('IGS',l_v_message_name);
951: igs_ge_msg_stack.add;
952: app_exception.raise_exception;
953: END IF;
954: IF g_v_called_from NOT IN ('IGFSL27B','IGFAW038') THEN
1071: fnd_log.string( fnd_log.level_statement, 'igf.plsql.igf_aw_awd_disb_pkg.AfterRowInsertUpdateDelete1 ', ' fund code = '||l_v_fed_fund_code );
1072: fnd_log.string( fnd_log.level_statement, 'igf.plsql.igf_aw_awd_disb_pkg.AfterRowInsertUpdateDelete1 ', ' called from = '||g_v_called_from );
1073: END IF;
1074: IF l_v_message_name IS NOT NULL THEN
1075: fnd_message.set_name ('IGS',l_v_message_name);
1076: igs_ge_msg_stack.add;
1077: app_exception.raise_exception;
1078: END IF;
1079: IF g_v_called_from NOT IN ('IGFSL27B','IGFAW038','IGFAW016') THEN
1103: -- in the calling form
1104: IF (NOT (l_b_return_status) AND l_v_message_name IS NOT NULL )THEN
1105: -- substring of the out bound parameter l_v_message_name is carried
1106: -- out since it can expect either IGS OR IGF message
1107: fnd_message.set_name(SUBSTR(l_v_message_name,1,3),l_v_message_name);
1108: igf_sl_cl_chg_prc.parse_tokens(
1109: p_t_message_tokens => igf_sl_cl_chg_prc.g_message_tokens);
1110: /*
1111: FOR token_counter IN igf_sl_cl_chg_prc.g_message_tokens.FIRST..igf_sl_cl_chg_prc.g_message_tokens.LAST LOOP
1108: igf_sl_cl_chg_prc.parse_tokens(
1109: p_t_message_tokens => igf_sl_cl_chg_prc.g_message_tokens);
1110: /*
1111: FOR token_counter IN igf_sl_cl_chg_prc.g_message_tokens.FIRST..igf_sl_cl_chg_prc.g_message_tokens.LAST LOOP
1112: fnd_message.set_token(igf_sl_cl_chg_prc.g_message_tokens(token_counter).token_name, igf_sl_cl_chg_prc.g_message_tokens(token_counter).token_value);
1113: END LOOP;
1114: */
1115: igs_ge_msg_stack.add;
1116: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1213: -- out since it can expect either IGS OR IGF message
1214: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1215: fnd_log.string( fnd_log.level_statement, 'igf.plsql.igf_aw_awd_disb_pkg.AfterRowInsertUpdateDelete1 ', ' validation of the Change record failed for Change send id: ' ||rec_c_sl_clchsn_dtls.clchgsnd_id);
1216: END IF;
1217: fnd_message.set_name(SUBSTR(l_v_message_name,1,3),l_v_message_name);
1218: igf_sl_cl_chg_prc.parse_tokens(
1219: p_t_message_tokens => l_d_message_tokens);
1220: /*
1221: FOR token_counter IN l_d_message_tokens.FIRST..l_d_message_tokens.LAST LOOP
1218: igf_sl_cl_chg_prc.parse_tokens(
1219: p_t_message_tokens => l_d_message_tokens);
1220: /*
1221: FOR token_counter IN l_d_message_tokens.FIRST..l_d_message_tokens.LAST LOOP
1222: fnd_message.set_token(l_d_message_tokens(token_counter).token_name, l_d_message_tokens(token_counter).token_value);
1223: END LOOP;
1224: */
1225: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1226: fnd_log.string( fnd_log.level_statement, 'igf.plsql.igf_aw_awd_disb_pkg.AfterRowInsertUpdateDelete1 ', ' Invoking igf_sl_clchsn_dtls_pkg.update_row to update the status to Not Ready to Send ');
1263: x_prev_with_disb_return_date => rec_c_sl_clchsn_dtls.prev_with_disb_return_date ,
1264: x_school_use_txt => rec_c_sl_clchsn_dtls.school_use_txt ,
1265: x_lender_use_txt => rec_c_sl_clchsn_dtls.lender_use_txt ,
1266: x_guarantor_use_txt => rec_c_sl_clchsn_dtls.guarantor_use_txt ,
1267: x_validation_edit_txt => fnd_message.get ,
1268: x_send_record_txt => rec_c_sl_clchsn_dtls.send_record_txt
1269: );
1270: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1271: fnd_log.string( fnd_log.level_statement, 'igf.plsql.igf_aw_awd_disb_pkg.AfterRowInsertUpdateDelete1 ', ' updated the status to Not Ready to Send for Change send id: ' ||rec_c_sl_clchsn_dtls.clchgsnd_id);
1354: p_v_message_name => l_v_message_name,
1355: p_t_message_tokens => l_d_message_tokens
1356: );
1357: IF NOT(l_b_return_status) THEN
1358: fnd_message.set_name(SUBSTR(l_v_message_name,1,3),l_v_message_name);
1359: igf_sl_cl_chg_prc.parse_tokens(
1360: p_t_message_tokens => l_d_message_tokens);
1361: /*
1362: FOR token_counter IN l_d_message_tokens.FIRST..l_d_message_tokens.LAST LOOP
1359: igf_sl_cl_chg_prc.parse_tokens(
1360: p_t_message_tokens => l_d_message_tokens);
1361: /*
1362: FOR token_counter IN l_d_message_tokens.FIRST..l_d_message_tokens.LAST LOOP
1363: fnd_message.set_token(l_d_message_tokens(token_counter).token_name, l_d_message_tokens(token_counter).token_value);
1364: END LOOP;
1365: */
1366: igs_ge_msg_stack.add;
1367: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1417: IF igf_aw_gen.lookup_desc('IGF_DB_TRANS_TYPE',new_references.trans_type) IS NULL THEN
1418: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1419: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_awd_disb_pkg.check_constraints.debug','TBH: Check Constraints Fail: Value ' || new_references.trans_type || ' for TRANS_TYPE is invalid ');
1420: END IF;
1421: fnd_message.set_name('IGS','IGS_GE_INVALID_VALUE');
1422: igs_ge_msg_stack.add;
1423: app_exception.raise_exception;
1424: END IF;
1425: END IF;
1430:
1431: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1432: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_awd_disb_pkg.check_constraints.debug','TBH: Check Constraints Fail: Value ' || new_references.elig_status || ' for ELIG_STAUS is invalid');
1433: END IF;
1434: fnd_message.set_name('IGS','IGS_GE_INVALID_VALUE');
1435: igs_ge_msg_stack.add;
1436: app_exception.raise_exception;
1437: END IF;
1438: END IF;
1443: IF igf_aw_gen.lookup_desc('IGF_AP_YES_NO',new_references.affirm_flag) IS NULL THEN
1444: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1445: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_awd_disb_pkg.check_constraints.debug','TBH: Check Constraints Fail: Value ' || new_references.affirm_flag || ' for AFFIRM_FLAG is invalid ');
1446: END IF;
1447: fnd_message.set_name('IGS','IGS_GE_INVALID_VALUE');
1448: igs_ge_msg_stack.add;
1449: app_exception.raise_exception;
1450: END IF;
1451: END IF;
1459: IF igf_aw_gen.lookup_desc('IGF_SL_CL_HOLD_REL_IND_TF',new_references.hold_rel_ind) IS NULL THEN
1460: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1461: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_awd_disb_pkg.check_constraints.debug','TBH: Check Constraints Fail: Value ' || new_references.hold_rel_ind || ' for HOLD_REL_IND is invalid ');
1462: END IF;
1463: fnd_message.set_name('IGS','IGS_GE_INVALID_VALUE');
1464: igs_ge_msg_stack.add;
1465: app_exception.raise_exception;
1466: END IF;
1467: END IF;
1472: IF igf_aw_gen.lookup_desc('IGF_SL_CL_DB_FUND_DISB_METH',new_references.fund_dist_mthd) IS NULL THEN
1473: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1474: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_awd_disb_pkg.check_constraints.debug','TBH: Check Constraints Fail: Value ' || new_references.fund_dist_mthd || ' for FUND_DIST_MTHD is invalid ');
1475: END IF;
1476: fnd_message.set_name('IGS','IGS_GE_INVALID_VALUE');
1477: igs_ge_msg_stack.add;
1478: app_exception.raise_exception;
1479: END IF;
1480: END IF;
1485: IF igf_aw_gen.lookup_desc('IGF_AP_YES_NO',new_references.prev_reported_ind) IS NULL THEN
1486: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1487: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_awd_disb_pkg.check_constraints.debug','TBH: Check Constraints Fail: Value ' || new_references.prev_reported_ind || ' for PREV_REPORTED_IND is invalid ');
1488: END IF;
1489: fnd_message.set_name('IGS','IGS_GE_INVALID_VALUE');
1490: igs_ge_msg_stack.add;
1491: app_exception.raise_exception;
1492: END IF;
1493: END IF;
1498: IF igf_aw_gen.lookup_desc('IGF_SL_CL_DB_FUND_STATUS',new_references.fund_status) IS NULL THEN
1499: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1500: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_awd_disb_pkg.check_constraints.debug','TBH: Check Constraints Fail: Value ' || new_references.fund_status || ' for FUND_STATUS is invalid ');
1501: END IF;
1502: fnd_message.set_name('IGS','IGS_GE_INVALID_VALUE');
1503: igs_ge_msg_stack.add;
1504: app_exception.raise_exception;
1505: END IF;
1506: END IF;
1514: IF NOT (new_references.manual_hold_ind IN ('N','Y')) THEN
1515: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1516: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_awd_disb_pkg.check_constraints.debug','TBH: Check Constraints Fail: Value ' || new_references.manual_hold_ind || ' for MANUAL_HOLD_IND is invalid ');
1517: END IF;
1518: fnd_message.set_name('IGS','IGS_GE_INVALID_VALUE');
1519: igs_ge_msg_stack.add;
1520: app_exception.raise_exception;
1521: END IF;
1522: END IF;
1525: IF NOT (new_references.late_disb_ind IN ('Y', 'N')) THEN
1526: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1527: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_awd_disb_pkg.check_constraints.debug','TBH: Check Constraints Fail: Value ' || new_references.late_disb_ind || ' for LATE_DISB_IND is invalid ');
1528: END IF;
1529: fnd_message.set_name('IGS','IGS_GE_INVALID_VALUE');
1530: igs_ge_msg_stack.add;
1531: app_exception.raise_exception;
1532: END IF;
1533: END IF;
1536: IF NOT (new_references.direct_to_borr_flag IN ('Y', 'N')) THEN
1537: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1538: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_awd_disb_pkg.check_constraints.debug','TBH: Check Constraints Fail: Value ' || new_references.direct_to_borr_flag || ' for DIRECT_TO_BORR_FLAG is invalid ');
1539: END IF;
1540: fnd_message.set_name('IGS','IGS_GE_INVALID_VALUE');
1541: igs_ge_msg_stack.add;
1542: app_exception.raise_exception;
1543: END IF;
1544: END IF;
1563: NULL;
1564: ELSIF NOT igf_aw_award_pkg.get_pk_for_validation (
1565: new_references.award_id
1566: ) THEN
1567: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
1568: igs_ge_msg_stack.add;
1569: app_exception.raise_exception;
1570: END IF;
1571:
1574: NULL;
1575: ELSIF NOT igf_aw_awd_rvsn_rsn_pkg.get_pk_for_validation (
1576: new_references.rvsn_id
1577: ) THEN
1578: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
1579: igs_ge_msg_stack.add;
1580: app_exception.raise_exception;
1581: END IF;
1582:
1588: ELSIF NOT igs_ca_inst_pkg.get_pk_for_validation (
1589: new_references.tp_cal_type,
1590: new_references.tp_sequence_number
1591: ) THEN
1592: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
1593: igs_ge_msg_stack.add;
1594: app_exception.raise_exception;
1595: END IF;
1596:
1602: ELSIF NOT igs_ca_inst_pkg.get_pk_for_validation (
1603: new_references.ld_cal_type,
1604: new_references.ld_sequence_number
1605: ) THEN
1606: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
1607: igs_ge_msg_stack.add;
1608: app_exception.raise_exception;
1609: END IF;
1610:
1708: OPEN cur_rowid;
1709: FETCH cur_rowid INTO lv_rowid;
1710: IF (cur_rowid%FOUND) THEN
1711: CLOSE cur_rowid;
1712: fnd_message.set_name ('IGF', 'IGF_AW_ADISB_AWD_FK');
1713: igs_ge_msg_stack.add;
1714: app_exception.raise_exception;
1715: RETURN;
1716: END IF;
1742: OPEN cur_rowid;
1743: FETCH cur_rowid INTO lv_rowid;
1744: IF (cur_rowid%FOUND) THEN
1745: CLOSE cur_rowid;
1746: fnd_message.set_name ('IGF', 'IGF_AW_ADISB_RVSN_FK');
1747: igs_ge_msg_stack.add;
1748: app_exception.raise_exception;
1749: RETURN;
1750: END IF;
1781: OPEN cur_rowid;
1782: FETCH cur_rowid INTO lv_rowid;
1783: IF (cur_rowid%FOUND) THEN
1784: CLOSE cur_rowid;
1785: fnd_message.set_name ('IGF', 'IGF_AW_ADISB_CI_FK');
1786: igs_ge_msg_stack.add;
1787: app_exception.raise_exception;
1788: RETURN;
1789: END IF;
1815: OPEN cur_rowid;
1816: FETCH cur_rowid INTO lv_rowid;
1817: IF (cur_rowid%FOUND) THEN
1818: CLOSE cur_rowid;
1819: fnd_message.set_name ('IGF', 'IGF_AW_ADISB_LKUP_FK');
1820: igs_ge_msg_stack.add;
1821: app_exception.raise_exception;
1822: RETURN;
1823: END IF;
1957: new_references.award_id,
1958: new_references.disb_num
1959: )
1960: ) THEN
1961: fnd_message.set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
1962: igs_ge_msg_stack.add;
1963: app_exception.raise_exception;
1964: END IF;
1965: check_constraints;
1975: new_references.award_id,
1976: new_references.disb_num
1977: )
1978: ) THEN
1979: fnd_message.set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
1980: igs_ge_msg_stack.add;
1981: app_exception.raise_exception;
1982: END IF;
1983: check_constraints;
2101: ELSE
2102: x_program_update_date := SYSDATE;
2103: END IF;
2104: ELSE
2105: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
2106: igs_ge_msg_stack.add;
2107: app_exception.raise_exception;
2108: END IF;
2109:
2426:
2427: OPEN c1;
2428: FETCH c1 INTO tlinfo;
2429: IF (c1%notfound) THEN
2430: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
2431: igs_ge_msg_stack.add;
2432: CLOSE c1;
2433: app_exception.raise_exception;
2434: RETURN;
2480: AND ((tlinfo.direct_to_borr_flag = x_direct_to_borr_flag) OR ((tlinfo.direct_to_borr_flag IS NULL) AND (x_direct_to_borr_flag IS NULL)))
2481: ) THEN
2482: NULL;
2483: ELSE
2484: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
2485: igs_ge_msg_stack.add;
2486: app_exception.raise_exception;
2487: END IF;
2488:
2577: IF (x_last_update_login IS NULL) THEN
2578: x_last_update_login := -1;
2579: END IF;
2580: ELSE
2581: fnd_message.set_name( 'FND', 'SYSTEM-INVALID ARGS');
2582: igs_ge_msg_stack.add;
2583: app_exception.raise_exception;
2584: END IF;
2585: