[Home] [Help]
21: IF l_col_length.column_type = 'V' AND p_param_length > l_col_length.width THEN
22: FND_MESSAGE.SET_NAME('IGS','IGS_AD_EXCEED_MAX_LENGTH');
23: FND_MESSAGE.SET_TOKEN('PARAMETER',p_param_name);
24: FND_MESSAGE.SET_TOKEN('LENGTH',l_col_length.width);
25: IGS_GE_MSG_STACK.ADD;
26: RAISE FND_API.G_EXC_ERROR;
27:
28:
29: ELSIF l_col_length.column_type ='N' AND p_param_length > (l_col_length.precision - l_col_length.scale) THEN
33: FND_MESSAGE.SET_TOKEN('LENGTH',l_col_length.precision || ',' || l_col_length.scale);
34: ELSE
35: FND_MESSAGE.SET_TOKEN('LENGTH',l_col_length.precision );
36: END IF;
37: IGS_GE_MSG_STACK.ADD;
38: RAISE FND_API.G_EXC_ERROR;
39: END IF;
40:
41:
112: -- Initialize message list if p_init_msg_list is set to TRUE.
113: IF FND_API.to_Boolean( p_init_msg_list ) THEN
114: FND_MSG_PUB.initialize;
115: END IF;
116: l_msg_index := igs_ge_msg_stack.count_msg;
117:
118: -- Validate all the parameters for their length
119: -- PERSON_ID
120: check_length('PERSON_ID', 'IGS_AD_PS_APPL_INST_ALL', length(TRUNC(p_person_id)));
146: --with s_adm_outcome_status = 'PENDING'
147: ROLLBACK TO RECORD_ACADEMIC_INDEX_pub;
148: x_return_status := FND_API.G_RET_STS_ERROR;
149: FND_MESSAGE.SET_NAME('IGS','IGS_AD_ACDX_NO_APPL');
150: IGS_GE_MSG_STACK.ADD;
151: RAISE FND_API.G_EXC_ERROR;
152: ELSIF c_acai%FOUND THEN
153: ------------------------------
154: --Intialization of varable to handle G_MISS_CHAR/NUM/DATE
318: -- FND_FILE.PUT_LINE(FND_FILE.LOG, 'C: No record found with SATISFIED STATUS');
319: -- ROLLBACK TO RECORD_ACADEMIC_INDEX_pub;
320: -- x_return_status := FND_API.G_RET_STS_ERROR;
321: -- FND_MESSAGE.SET_NAME('IGS','IGS_AD_DOC_STATUS_INCORRECT');
322: -- IGS_GE_MSG_STACK.ADD;
323: -- RAISE FND_API.G_EXC_ERROR;
324: -- END IF;--IF c_doc_status%NOTFOUND THEN
325: -- IF c_doc_status%ISOPEN THEN
326: -- CLOSE c_doc_status;
523: BEGIN
524:
525: -- Standard Start of API savepoint
526: SAVEPOINT Record_Outcome_AdmAppl_pub;
527: l_msg_index := igs_ge_msg_stack.count_msg;
528:
529: -- Initialize message list if p_init_msg_list is set to TRUE.
530: IF FND_API.to_Boolean(p_init_msg_list) THEN
531: FND_MSG_PUB.initialize;
588: CLOSE c_aplinst_cur;
589:
590: IF l_c_aplinst_cur.person_id IS NULL THEN
591: fnd_message.set_name('IGS', 'IGS_AD_DECISION_DTLS_INVALID');
592: IGS_GE_MSG_STACK.ADD;
593: RAISE FND_API.G_EXC_ERROR;
594: END IF;
595: ---------------------------------------------------------------
596: -- Start Code to Check and assign the Missing Fields/ Nullified Filelds
597: ---------------------------------------------------------------
598: IF p_adm_outcome_status = FND_API.G_MISS_CHAR OR p_adm_outcome_status IS NULL THEN
599: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
600: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_ADM_OUTCOME_STATUS'));
601: IGS_GE_MSG_STACK.ADD;
602: RAISE FND_API.G_EXC_ERROR;
603: ELSE
604: l_adm_outcome_status := p_adm_outcome_status;
605: END IF;
640:
641: IF p_reconsider_flag = FND_API.G_MISS_CHAR OR p_reconsider_flag NOT IN ('Y', 'N') THEN
642: fnd_message.set_name('IGS', 'IGS_GE_INVALID_VALUE_WITH_CTXT');
643: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_REQ_RECONS_IND'));
644: IGS_GE_MSG_STACK.ADD;
645: RAISE FND_API.G_EXC_ERROR;
646: ELSE
647: l_reconsider_flag := NVL(p_reconsider_flag, l_c_aplinst_cur.req_for_reconsideration_ind);
648: END IF;
654: END IF;
655: IF p_adm_cndtnl_offer_status = FND_API.G_MISS_CHAR THEN
656: fnd_message.set_name('IGS', 'IGS_GE_INVALID_VALUE_WITH_CTXT');
657: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_ADM_COND_OFR_STATUS'));
658: IGS_GE_MSG_STACK.ADD;
659: RAISE FND_API.G_EXC_ERROR;
660: ELSE
661: l_adm_cndtl_offer_status := p_adm_cndtnl_offer_status;
662: END IF;
671: OR p_cndtl_offer_must_stsfd_ind NOT IN ('Y', 'N') THEN
672:
673: fnd_message.set_name('IGS', 'IGS_GE_INVALID_VALUE_WITH_CTXT');
674: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_CND_OFR_STSFD_IND'));
675: IGS_GE_MSG_STACK.ADD;
676: RAISE FND_API.G_EXC_ERROR;
677: ELSE
678: l_cndtl_offer_must_stsfd_ind :=
679: NVL(p_cndtl_offer_must_stsfd_ind, l_c_aplinst_cur.cndtnl_offer_must_be_stsfd_ind);
718: IF IGS_AD_VAL_AA.admp_val_aa_update (
719: l_c_appl_cur.adm_appl_status,
720: v_message_name) = FALSE AND l_reconsider_flag = 'N' THEN
721: FND_MESSAGE.SET_NAME('IGS',v_message_name);
722: IGS_GE_MSG_STACK.ADD;
723: RAISE FND_API.G_EXC_ERROR;
724: END IF;
725:
726: */
744: l_offer_dt);
745:
746: IF l_offer_response_dt IS NULL THEN
747: fnd_message.set_name('IGS', 'IGS_AD_OFR_RESPDT_SET_ODR_ADM');
748: IGS_GE_MSG_STACK.ADD;
749: RAISE FND_API.G_EXC_ERROR;
750: END IF;
751: END IF;
752: END IF;
755: -- ==========================================
756: IF l_decision_make_id IS NULL THEN
757: IF l_s_adm_outcome_status NOT IN ('PENDING') THEN
758: fnd_message.set_name('IGS', 'IGS_AD_INVALID_DECISION_ID');
759: IGS_GE_MSG_STACK.ADD;
760: APP_EXCEPTION.RAISE_EXCEPTION;
761: END IF;
762: ELSIF l_decision_make_id = p_person_id THEN
763: fnd_message.set_name('IGS', 'IGS_AD_INVALID_DECISION_ID');
760: APP_EXCEPTION.RAISE_EXCEPTION;
761: END IF;
762: ELSIF l_decision_make_id = p_person_id THEN
763: fnd_message.set_name('IGS', 'IGS_AD_INVALID_DECISION_ID');
764: IGS_GE_MSG_STACK.ADD;
765: APP_EXCEPTION.RAISE_EXCEPTION;
766: ELSIF NOT igs_ad_val_acai.genp_val_staff_fculty_prsn
767: (l_decision_make_id, v_message_name) THEN
768: fnd_message.set_name('IGS', v_message_name);
765: APP_EXCEPTION.RAISE_EXCEPTION;
766: ELSIF NOT igs_ad_val_acai.genp_val_staff_fculty_prsn
767: (l_decision_make_id, v_message_name) THEN
768: fnd_message.set_name('IGS', v_message_name);
769: IGS_GE_MSG_STACK.ADD;
770: APP_EXCEPTION.RAISE_EXCEPTION;
771: END IF;
772: -- Validate decision Date
773: IF l_decision_date IS NULL AND l_s_adm_outcome_status NOT IN ('PENDING') THEN
771: END IF;
772: -- Validate decision Date
773: IF l_decision_date IS NULL AND l_s_adm_outcome_status NOT IN ('PENDING') THEN
774: fnd_message.set_name('IGS', 'IGS_AD_MAND_DECISION_INFO');
775: IGS_GE_MSG_STACK.ADD;
776: APP_EXCEPTION.RAISE_EXCEPTION;
777: ELSE
778: -- Decision date should be between the application date and the system date
779: IF NOT l_decision_date BETWEEN l_c_appl_cur.appl_dt AND SYSDATE THEN
777: ELSE
778: -- Decision date should be between the application date and the system date
779: IF NOT l_decision_date BETWEEN l_c_appl_cur.appl_dt AND SYSDATE THEN
780: fnd_message.set_name('IGS', 'IGS_AD_DECISION_DATE');
781: IGS_GE_MSG_STACK.ADD;
782: APP_EXCEPTION.RAISE_EXCEPTION;
783: END IF;
784: END IF;
785:
787: IF l_decision_reason_id IS NULL AND
788: l_s_adm_outcome_status NOT IN ('PENDING')
789: THEN
790: fnd_message.set_name('IGS', 'IGS_AD_DECISION_REASON_INVALID');
791: IGS_GE_MSG_STACK.ADD;
792: APP_EXCEPTION.RAISE_EXCEPTION;
793: END IF;
794:
795: -- ==============================================================
799: IF l_pending_reason_id IS NULL AND
800: l_s_adm_outcome_status IN ('PENDING') AND
801: l_c_aplinst_cur.adm_outcome_status <> l_adm_outcome_status_reason THEN
802: fnd_message.set_name('IGS', 'IGS_AD_PENDING_REASON_INVALID');
803: IGS_GE_MSG_STACK.ADD;
804: APP_EXCEPTION.RAISE_EXCEPTION;
805: END IF;
806:
807: IF l_s_adm_outcome_status IN ('OFFER', 'COND-OFFER') THEN
806:
807: IF l_s_adm_outcome_status IN ('OFFER', 'COND-OFFER') THEN
808: IF (p_pending_reason_id IS NOT NULL AND NVL(p_pending_reason_id, -1) <> FND_API.G_MISS_NUM ) THEN
809: fnd_message.set_name('IGS', 'IGS_AD_INVALID_PARAM_COMB');
810: IGS_GE_MSG_STACK.ADD;
811: RAISE FND_API.G_EXC_ERROR;
812: END IF ;
813: l_pending_reason_id := NULL;
814: ELSIF l_s_adm_outcome_status IN ('PENDING') THEN
821: (p_decision_maker_id IS NOT NULL AND NVL(p_decision_maker_id, -1 ) <> FND_API.G_MISS_NUM )
822: OR
823: (p_decision_date IS NOT NULL AND NVL( p_decision_date, TRUNC(SYSDATE) ) <> FND_API.G_MISS_DATE) THEN
824: fnd_message.set_name('IGS', 'IGS_AD_INVALID_PARAM_COMB');
825: IGS_GE_MSG_STACK.ADD;
826: RAISE FND_API.G_EXC_ERROR;
827: END IF;
828: l_offer_dt := NULL;
829: l_offer_response_dt := NULL;
839: (p_offer_response_dt IS NOT NULL AND NVL(p_offer_response_dt, TRUNC(SYSDATE) ) <> FND_API.G_MISS_DATE )
840: OR
841: (p_pending_reason_id IS NOT NULL AND NVL(p_pending_reason_id, -1) <> FND_API.G_MISS_NUM ) THEN
842: fnd_message.set_name('IGS', 'IGS_AD_INVALID_PARAM_COMB');
843: IGS_GE_MSG_STACK.ADD;
844: RAISE FND_API.G_EXC_ERROR;
845: END IF;
846: l_offer_dt := NULL;
847: l_offer_response_dt := NULL;
884: IF NVL(l_s_adm_outcome_status, 'NONE') NOT IN ('WITHDRAWN', 'VOIDED', 'COND-OFFER') THEN
885: IF p_adm_cndtnl_offer_status IS NOT NULL AND
886: igs_ad_gen_007.Admp_Get_Sacos (p_adm_cndtnl_offer_status) <> 'NOT-APPLIC' THEN
887: fnd_message.set_name('IGS', 'IGS_AD_INVALID_PARAM_COMB');
888: IGS_GE_MSG_STACK.ADD;
889: RAISE FND_API.G_EXC_ERROR;
890: END IF;
891: l_adm_cndtl_offer_status := igs_ad_gen_009.admp_get_sys_acos('NOT-APPLIC');
892: ELSIF NVL(l_s_adm_outcome_status, 'NONE') = 'COND-OFFER' AND
901:
902:
903:
904: BEGIN
905: l_msg_index := igs_ge_msg_stack.count_msg;
906:
907: -- begin apadegal adtd001 igs.m
908: OPEN c_ps_appl_cur;
909: FETCH c_ps_appl_cur INTO l_c_ps_appl_cur;
922: );
923: IF lv_return_status = 'N'
924: THEN
925: FND_MESSAGE.SET_NAME('IGS', lv_msg_nme);
926: IGS_GE_MSG_STACK.ADD;
927: APP_EXCEPTION.RAISE_EXCEPTION;
928: END IF;
929:
930: igs_ad_ps_appl_pkg.update_row(x_rowid => l_c_ps_appl_cur.row_id,
1183: 'Y', -- Confirm course indicator.
1184: 'Y', -- Perform eligibility check indicator.
1185: v_message_name) = FALSE THEN
1186: FND_MESSAGE.SET_NAME('IGS', v_message_name);
1187: IGS_GE_MSG_STACK.ADD;
1188: RAISE FND_API.G_EXC_ERROR;
1189: END IF;
1190:
1191: -- if we need to run the pre enrollment process for this application,
1205: 'N', -- Confirm course indicator.
1206: 'N', -- Perform eligibility check indicator.
1207: v_message_name) = FALSE THEN
1208: FND_MESSAGE.SET_NAME('IGS', v_message_name);
1209: IGS_GE_MSG_STACK.ADD;
1210:
1211: RAISE FND_API.G_EXC_ERROR;
1212: END IF;
1213: END IF;
1399:
1400: IF l_acaiv_rec.person_id IS NULL THEN
1401: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND');
1402: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_PROGRAM_APPL'));
1403: IGS_GE_MSG_STACK.ADD;
1404: APP_EXCEPTION.RAISE_EXCEPTION;
1405: END IF;
1406:
1407:
1412: --Validations to check if Application Processing Status is OPEN or not
1413: IF igs_ad_gen_007.admp_get_saas(l_appl_rec.adm_appl_status) IN (cst_completed, cst_withdrawn) THEN
1414: p_validation_success := 'N';
1415: fnd_message.set_name('IGS', 'IGS_AD_CANNOTUPD_STATUS_COMPL');
1416: IGS_GE_MSG_STACK.ADD;
1417: RETURN;
1418: END IF;
1419: */
1420: -- end apadegal adtd001 igs.m
1424: IF NOT IGS_AD_OFR_RESP_STAT_PKG.Get_PK_For_Validation(p_adm_offer_resp_status,'N') THEN
1425: p_validation_success := 'N';
1426: fnd_message.set_name('IGS', 'IGS_GE_PK_UK_NOT_FOUND_CLOSED');
1427: fnd_message.set_token('ATTRIBUTE', FND_MESSAGE.GET_STRING('IGS','IGS_AD_ADM_OFFER_RESP_STATUS'));
1428: IGS_GE_MSG_STACK.ADD;
1429: RETURN;
1430: END IF;
1431: --Validations on the Application Instance Outcome Status. Check if the Applicant's Outcome Status is mapped to one of the System Outcome Status of
1432: --'Make Offer of Admission' (OFFER) or 'Make Offer of Admission Subject to Condition' (COND-OFFER).
1432: --'Make Offer of Admission' (OFFER) or 'Make Offer of Admission Subject to Condition' (COND-OFFER).
1433: IF NVL(igs_ad_gen_008.admp_get_saos(l_acaiv_rec.adm_outcome_status), 'NULL') NOT IN (cst_offer, cst_cond_offer) THEN
1434: p_validation_success := 'N';
1435: fnd_message.set_name('IGS', 'IGS_AD_OFRST_NOTACCEPTED');
1436: IGS_GE_MSG_STACK.ADD;
1437: RETURN;
1438: END IF;
1439:
1440:
1442: -- Check if New Offer Response status = Production table (IGS_AD_PS_APPL_INST_ALL) Offer Response Status.
1443: IF p_adm_offer_resp_status = l_acaiv_rec.adm_offer_resp_status THEN
1444: p_validation_success := 'N';
1445: fnd_message.set_name('IGS', 'IGS_AD_RESP_SATUS_NOT_CHANGE');
1446: IGS_GE_MSG_STACK.ADD;
1447: RETURN;
1448: END IF;
1449:
1450: -- begin apadegal adtd001 igs.m
1454: -- IF Interface Offer Response Status is 'PENDING' and the corresponding status in production table is 'ACCEPTED' Then
1455: IF igs_ad_gen_008.admp_get_saors(p_adm_offer_resp_status) = cst_pending AND igs_ad_gen_008.admp_get_saors(l_acaiv_rec.adm_offer_resp_status) = cst_accepted THEN
1456: p_validation_success := 'N';
1457: fnd_message.set_name('IGS', 'IGS_AD_ADMOFR_ALREADY_RESPOND');
1458: IGS_GE_MSG_STACK.ADD;
1459: RETURN;
1460: END IF;
1461: -- IF Interface Offer Response Status is PENDING and the corresponding status in production table is REJECTED Then
1462: IF igs_ad_gen_008.admp_get_saors(p_adm_offer_resp_status) = cst_pending AND igs_ad_gen_008.admp_get_saors(l_acaiv_rec.adm_offer_resp_status) = cst_rejected THEN
1461: -- IF Interface Offer Response Status is PENDING and the corresponding status in production table is REJECTED Then
1462: IF igs_ad_gen_008.admp_get_saors(p_adm_offer_resp_status) = cst_pending AND igs_ad_gen_008.admp_get_saors(l_acaiv_rec.adm_offer_resp_status) = cst_rejected THEN
1463: p_validation_success := 'N';
1464: fnd_message.set_name('IGS', 'IGS_AD_ADMOFR_ALREADY_REJECT');
1465: IGS_GE_MSG_STACK.ADD;
1466: RETURN;
1467: END IF;
1468: -- IF Interface Offer Response Status is 'ACCEPTED' and the corresponding status in production table is 'REJECTED' Then
1469: IF igs_ad_gen_008.admp_get_saors(p_adm_offer_resp_status) = cst_accepted AND igs_ad_gen_008.admp_get_saors(l_acaiv_rec.adm_offer_resp_status) = cst_rejected THEN
1468: -- IF Interface Offer Response Status is 'ACCEPTED' and the corresponding status in production table is 'REJECTED' Then
1469: IF igs_ad_gen_008.admp_get_saors(p_adm_offer_resp_status) = cst_accepted AND igs_ad_gen_008.admp_get_saors(l_acaiv_rec.adm_offer_resp_status) = cst_rejected THEN
1470: p_validation_success := 'N';
1471: fnd_message.set_name('IGS', 'IGS_AD_ADMOFR_ALREADY_REJECT');
1472: IGS_GE_MSG_STACK.ADD;
1473: RETURN;
1474: END IF;
1475: -- IF Interface Offer Response Status is 'DEFERRAL' and the corresponding status in production table is 'REJECTED' Then
1476: IF igs_ad_gen_008.admp_get_saors(p_adm_offer_resp_status) = cst_deferral AND igs_ad_gen_008.admp_get_saors(l_acaiv_rec.adm_offer_resp_status) = cst_rejected THEN
1475: -- IF Interface Offer Response Status is 'DEFERRAL' and the corresponding status in production table is 'REJECTED' Then
1476: IF igs_ad_gen_008.admp_get_saors(p_adm_offer_resp_status) = cst_deferral AND igs_ad_gen_008.admp_get_saors(l_acaiv_rec.adm_offer_resp_status) = cst_rejected THEN
1477: p_validation_success := 'N';
1478: fnd_message.set_name('IGS', 'IGS_AD_ADMOFR_ALREADY_REJECT');
1479: IGS_GE_MSG_STACK.ADD;
1480: RETURN;
1481: END IF;
1482: */
1483:
1486: IF l_acaiv_rec.Def_term_adm_appl_num IS NOT NULL or l_acaiv_rec.def_appl_sequence_num IS NOT NULL
1487: THEN
1488: p_validation_success := 'N';
1489: fnd_message.set_name('IGS', 'IGS_AD_CANNOT_CHG_CONF_APPL');
1490: IGS_GE_MSG_STACK.ADD;
1491: RETURN ;
1492:
1493: END IF;
1494:
1499: IF igs_ad_gen_008.admp_get_saors(p_adm_offer_resp_status) <> cst_pending AND igs_ad_gen_008.admp_get_saors(l_acaiv_rec.adm_offer_resp_status) = cst_deferral THEN
1500: IF p_def_acad_cal_type IS NOT NULL OR p_def_acad_ci_sequence_number IS NOT NULL THEN
1501: p_validation_success := 'N';
1502: fnd_message.set_name('IGS', 'IDS_AD_DEFER_TO_PENDING');
1503: IGS_GE_MSG_STACK.ADD;
1504: RETURN;
1505: END IF;
1506: IF p_def_adm_cal_type IS NOT NULL OR p_def_adm_ci_sequence_number IS NOT NULL THEN
1507: p_validation_success := 'N';
1505: END IF;
1506: IF p_def_adm_cal_type IS NOT NULL OR p_def_adm_ci_sequence_number IS NOT NULL THEN
1507: p_validation_success := 'N';
1508: fnd_message.set_name('IGS', 'IDS_AD_DEFER_TO_PENDING');
1509: IGS_GE_MSG_STACK.ADD;
1510: RETURN;
1511: END IF;
1512: END IF;
1513:
1557: p_attent_other_inst_cd --arvsrini igsm
1558: ) = FALSE THEN
1559: p_validation_success := 'N';
1560: fnd_message.set_name('IGS', v_message_name);
1561: IGS_GE_MSG_STACK.ADD;
1562: RETURN;
1563: END IF;
1564:
1565:
1573: NVL(igs_ad_gen_008.admp_get_saods(l_acaiv_rec.adm_offer_dfrmnt_status), cst_not_applic) = cst_not_applic THEN
1574: IF igs_ad_gen_009.admp_get_sys_aods(cst_pending) IS NULL AND p_adm_offer_defr_status IS NULL THEN
1575: p_validation_success := 'N';
1576: fnd_message.set_name('IGS', 'IGS_AD_DEFR_STATUS_PEND_NOMAP');
1577: IGS_GE_MSG_STACK.ADD;
1578: RETURN;
1579: ELSE
1580: p_adm_offer_defr_status := NVL(p_adm_offer_defr_status , igs_ad_gen_009.admp_get_sys_aods(cst_pending));
1581: -- ADMISSION COURSE APPLICATION INSTANCE: Admission Offer Deferment Status.
1588: p_adm_offer_defr_status,
1589: v_message_name) = FALSE THEN
1590: p_validation_success := 'N';
1591: FND_MESSAGE.SET_NAME('IGS',v_message_name);
1592: IGS_GE_MSG_STACK.ADD;
1593: RETURN;
1594: END IF;
1595: -- Validate.
1596: IF igs_ad_val_acai_status.admp_val_acai_aods (
1606: l_appl_rec.s_admission_process_type,
1607: v_message_name) = FALSE THEN
1608: p_validation_success := 'N';
1609: fnd_message.set_name('IGS', v_message_name);
1610: IGS_GE_MSG_STACK.ADD;
1611: RETURN;
1612: END IF; --End of igs_ad_val_acai_status.admp_val_acai_aods
1613: END IF; ---End of the deferred calendar validations here
1614: END IF;
1615: ELSE -- Of DEFERRAL check
1616: IF igs_ad_gen_009.admp_get_sys_aods(cst_not_applic) IS NULL THEN
1617: p_validation_success := 'N';
1618: fnd_message.set_name('IGS', 'IGS_AD_DEFER_NOT_DEFSTATUS');
1619: IGS_GE_MSG_STACK.ADD;
1620: RETURN;
1621: ELSE
1622: p_adm_offer_defr_status := igs_ad_gen_009.admp_get_sys_aods(cst_not_applic);
1623: END IF;
1628: IF p_calc_actual_ofr_resp_dt > l_acaiv_rec.offer_response_dt AND TRUNC(l_acaiv_rec.offer_response_dt) < TRUNC(SYSDATE) AND
1629: igs_ad_gen_008.admp_get_saors(p_adm_offer_resp_status) = cst_accepted THEN
1630: p_validation_success := 'N';
1631: fnd_message.set_name('IGS', 'IGS_AD_RESP_DT_PASSED');
1632: IGS_GE_MSG_STACK.ADD;
1633: RETURN;
1634: END IF;*/
1635:
1636: -------------------------------------
1647: p_adm_offer_resp_status,
1648: v_message_name) = FALSE THEN
1649: p_validation_success := 'N';
1650: fnd_message.set_name('IGS', v_message_name);
1651: IGS_GE_MSG_STACK.ADD;
1652: RETURN;
1653: END IF; -- End of igs_ad_val_acai.admp_val_acpt_cndtn
1654: END IF;
1655: END IF;*/
1659: --------------------------------------------------------------------------------
1660: IF igs_ad_gen_008.admp_get_saors(p_adm_offer_resp_status) IN ('REJECTED','NOT-COMING') AND p_decline_ofr_reason IS NULL THEN
1661: p_validation_success := 'N';
1662: fnd_message.set_name('IGS','IGS_AD_ADMOFR_WITH_REAS');
1663: IGS_GE_MSG_STACK.ADD;
1664: RETURN;
1665: END IF;
1666:
1667: IF (p_decline_ofr_reason = 'OTHER-INST' AND p_attent_other_inst_cd IS NULL) THEN
1666:
1667: IF (p_decline_ofr_reason = 'OTHER-INST' AND p_attent_other_inst_cd IS NULL) THEN
1668: p_validation_success := 'N';
1669: fnd_message.set_name('IGS','IGS_AD_NO_OTH_INST');
1670: IGS_GE_MSG_STACK.ADD;
1671: RETURN;
1672: END IF;
1673: -- Validations Ends
1674:
1758: -- Initialize message list if p_init_msg_list is set to TRUE.
1759: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1760: FND_MSG_PUB.initialize;
1761: END IF;
1762: l_msg_index := igs_ge_msg_stack.count_msg;
1763: --Assign all defaul values
1764:
1765: -- Validate all the parameters for their length
1766: check_length('PERSON_ID', 'IGS_AD_PS_APPL_INST_ALL', length(TRUNC(p_person_id)));
1788:
1789: IF p_adm_offer_resp_status = FND_API.G_MISS_CHAR OR p_adm_offer_resp_status IS NULL THEN
1790: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
1791: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_ADM_OFFER_RESP_STATUS'));
1792: IGS_GE_MSG_STACK.ADD;
1793: RAISE FND_API.G_EXC_ERROR;
1794: END IF;
1795:
1796: IF p_actual_response_dt = FND_API.G_MISS_DATE THEN
2033: 'Y', -- Confirm course indicator.
2034: 'Y', -- Perform eligibility check indicator.
2035: l_enrl_message_name) = FALSE THEN
2036: FND_MESSAGE.SET_NAME('IGS',l_enrl_message_name);
2037: IGS_GE_MSG_STACK.ADD;
2038: RAISE FND_API.G_EXC_ERROR;
2039: END IF;
2040: END IF;
2041:
2162: -- Initialize message list if p_init_msg_list is set to TRUE.
2163: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2164: FND_MSG_PUB.initialize;
2165: END IF;
2166: l_msg_index := igs_ge_msg_stack.count_msg;
2167:
2168: -- Validate all the parameters for their length
2169: -- PERSON_ID
2170: check_length('PERSON_ID', 'IGS_AD_PS_APPL_INST_ALL', length(TRUNC(p_person_id)));
2184:
2185: IF p_person_id = FND_API.G_MISS_NUM OR p_person_id IS NULL THEN
2186: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
2187: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','P_PERSON_ID');
2188: IGS_GE_MSG_STACK.ADD;
2189: RAISE FND_API.G_EXC_ERROR;
2190: END IF;
2191:
2192: IF p_admission_appl_number = FND_API.G_MISS_NUM OR p_admission_appl_number IS NULL THEN
2191:
2192: IF p_admission_appl_number = FND_API.G_MISS_NUM OR p_admission_appl_number IS NULL THEN
2193: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
2194: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','P_ADMISSION_APPL_NUMBER');
2195: IGS_GE_MSG_STACK.ADD;
2196: RAISE FND_API.G_EXC_ERROR;
2197: END IF;
2198:
2199: IF p_nominated_course_cd = FND_API.G_MISS_CHAR OR p_nominated_course_cd IS NULL THEN
2198:
2199: IF p_nominated_course_cd = FND_API.G_MISS_CHAR OR p_nominated_course_cd IS NULL THEN
2200: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
2201: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','P_NOMINATED_COURSE_CD');
2202: IGS_GE_MSG_STACK.ADD;
2203: RAISE FND_API.G_EXC_ERROR;
2204: END IF;
2205:
2206: IF p_sequence_number = FND_API.G_MISS_NUM OR p_sequence_number IS NULL THEN
2205:
2206: IF p_sequence_number = FND_API.G_MISS_NUM OR p_sequence_number IS NULL THEN
2207: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
2208: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','P_SEQUENCE_NUMBER');
2209: IGS_GE_MSG_STACK.ADD;
2210: RAISE FND_API.G_EXC_ERROR;
2211: END IF;
2212:
2213: IF p_qualifying_type_code = FND_API.G_MISS_CHAR OR p_qualifying_type_code IS NULL THEN
2212:
2213: IF p_qualifying_type_code = FND_API.G_MISS_CHAR OR p_qualifying_type_code IS NULL THEN
2214: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
2215: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','P_QUALIFYING_TYPE_CODE');
2216: IGS_GE_MSG_STACK.ADD;
2217: RAISE FND_API.G_EXC_ERROR;
2218: END IF;
2219: -- Initialize API return status to success
2220: x_return_status := FND_API.G_RET_STS_SUCCESS;
2228: --with s_adm_outcome_status = 'PENDING'
2229: ROLLBACK TO RECORD_QUALIFICATION_CODE_pub;
2230: x_return_status := FND_API.G_RET_STS_ERROR;
2231: FND_MESSAGE.SET_NAME('IGS','IGS_AD_ACDX_NO_APPL');
2232: IGS_GE_MSG_STACK.ADD;
2233: RAISE FND_API.G_EXC_ERROR;
2234: ELSIF c_acai%FOUND THEN */
2235: ------------------------------
2236: --Intialization of varable to handle G_MISS_CHAR/NUM/DATE
2265: IF c_qualtype%NOTFOUND THEN
2266: CLOSE c_qualtype;
2267: FND_MESSAGE.SET_NAME('IGS','IGS_AD_QUAL_TYPE_ERROR');
2268: FND_MESSAGE.SET_TOKEN('QUALIFYING_TYPE',l_qualifying_type_code);
2269: IGS_GE_MSG_STACK.ADD;
2270: RAISE FND_API.G_EXC_ERROR;
2271: END IF;
2272: CLOSE c_qualtype;
2273:
2273:
2274: --Check if any qual code is there for current qual type and user is trying to pass qual value.
2275: IF l_qualifying_value IS NOT NULL AND l_qualifying_code IS NOT NULL THEN
2276: FND_MESSAGE.SET_NAME('IGS','IGS_AD_QUAL_CODE_VAL');
2277: IGS_GE_MSG_STACK.ADD;
2278: RAISE FND_API.G_EXC_ERROR;
2279: END IF;
2280:
2281:
2283: IF l_qualifying_value IS NOT NULL AND l_qualtype.QUALIFYING_CODE_ID IS NOT NULL THEN
2284: FND_MESSAGE.SET_NAME('IGS','IGS_AD_DUP_QUAL_CODE');
2285: FND_MESSAGE.SET_TOKEN('ATTRIBUTE1','QUALIFYING CODE');
2286: FND_MESSAGE.SET_TOKEN('ATTRIBUTE2','QUALIFYING VALUE');
2287: IGS_GE_MSG_STACK.ADD;
2288: RAISE FND_API.G_EXC_ERROR;
2289: END IF;
2290:
2291: --Check if any qual value is there for current qual type and user is trying to pass qual code.
2292: IF l_qualifying_code IS NOT NULL AND l_qualtype.QUALIFYING_VALUE IS NOT NULL THEN
2293: FND_MESSAGE.SET_NAME('IGS','IGS_AD_DUP_QUAL_CODE');
2294: FND_MESSAGE.SET_TOKEN('ATTRIBUTE1','QUALIFYING VALUE');
2295: FND_MESSAGE.SET_TOKEN('ATTRIBUTE2','QUALIFYING CODE');
2296: IGS_GE_MSG_STACK.ADD;
2297: RAISE FND_API.G_EXC_ERROR;
2298: END IF;
2299: --will be done in TBH
2300: IF l_qualifying_code IS NOT NULL THEN
2303: CLOSE c_qualcode;
2304: IF l_qualcode.code_id IS NULL THEN
2305: FND_MESSAGE.SET_NAME('IGS','IGS_AD_QUAL_CODE_ERROR');
2306: FND_MESSAGE.SET_TOKEN('QUALIFYING_CODE',l_qualifying_code);
2307: IGS_GE_MSG_STACK.ADD;
2308: RAISE FND_API.G_EXC_ERROR;
2309: ELSE
2310: l_code_id := l_qualcode.code_id;
2311: END IF;
2314: --Check if any qual code is already exists.
2315: IF l_code_id = l_qualtype.qualifying_code_id THEN
2316: FND_MESSAGE.SET_NAME('IGS','IGS_AD_QUAL_EXISTS');
2317: FND_MESSAGE.SET_TOKEN('QUALIFYING_CODE',l_qualifying_code);
2318: IGS_GE_MSG_STACK.ADD;
2319: RAISE FND_API.G_EXC_ERROR;
2320: END IF;
2321:
2322: --Check if any qual code is already exists.
2322: --Check if any qual code is already exists.
2323: IF l_qualifying_value = l_qualtype.qualifying_value THEN
2324: FND_MESSAGE.SET_NAME('IGS','IGS_AD_QUAL_VAL_EXISTS');
2325: FND_MESSAGE.SET_TOKEN('QUALIFYING_VALUE',l_qualifying_value);
2326: IGS_GE_MSG_STACK.ADD;
2327: RAISE FND_API.G_EXC_ERROR;
2328: END IF;
2329: --Call TBH
2330: igs_ad_appqual_code_pkg.UPDATE_ROW(
2464: -- Initialize message list if p_init_msg_list is set to TRUE.
2465: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2466: FND_MSG_PUB.initialize;
2467: END IF;
2468: l_msg_index := igs_ge_msg_stack.count_msg;
2469:
2470:
2471: -- Validate all the parameters for their length
2472: -- person_id
2490:
2491: IF p_person_id = FND_API.G_MISS_NUM OR p_person_id IS NULL THEN
2492: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
2493: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','P_PERSON_ID');
2494: IGS_GE_MSG_STACK.ADD;
2495: RAISE FND_API.G_EXC_ERROR;
2496: END IF;
2497:
2498: IF p_admission_appl_number = FND_API.G_MISS_NUM OR p_admission_appl_number IS NULL THEN
2497:
2498: IF p_admission_appl_number = FND_API.G_MISS_NUM OR p_admission_appl_number IS NULL THEN
2499: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
2500: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','P_ADMISSION_APPL_NUMBER');
2501: IGS_GE_MSG_STACK.ADD;
2502: RAISE FND_API.G_EXC_ERROR;
2503: END IF;
2504:
2505: IF p_nominated_program_cd = FND_API.G_MISS_CHAR OR p_nominated_program_cd IS NULL THEN
2504:
2505: IF p_nominated_program_cd = FND_API.G_MISS_CHAR OR p_nominated_program_cd IS NULL THEN
2506: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
2507: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','P_NOMINATED_PROGRAM_CD');
2508: IGS_GE_MSG_STACK.ADD;
2509: RAISE FND_API.G_EXC_ERROR;
2510: END IF;
2511:
2512: IF p_sequence_number = FND_API.G_MISS_NUM OR p_sequence_number IS NULL THEN
2511:
2512: IF p_sequence_number = FND_API.G_MISS_NUM OR p_sequence_number IS NULL THEN
2513: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
2514: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','P_SEQUENCE_NUMBER');
2515: IGS_GE_MSG_STACK.ADD;
2516: RAISE FND_API.G_EXC_ERROR;
2517: END IF;
2518:
2519: IF p_entry_qual_status = FND_API.G_MISS_CHAR OR p_entry_qual_status IS NULL THEN
2518:
2519: IF p_entry_qual_status = FND_API.G_MISS_CHAR OR p_entry_qual_status IS NULL THEN
2520: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
2521: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','P_ENTRY_QUAL_STATUS');
2522: IGS_GE_MSG_STACK.ADD;
2523: RAISE FND_API.G_EXC_ERROR;
2524: END IF;
2525:
2526:
2538: CLOSE c_acai;
2539:
2540: IF l_appl_inst_rec.person_id IS NULL THEN
2541: fnd_message.set_name('IGS', 'IGS_AD_INVALID_PARAM_COMB');
2542: IGS_GE_MSG_STACK.ADD;
2543: RAISE FND_API.G_EXC_ERROR;
2544: END IF ;
2545:
2546: -- Open the cursor c_appl to fetch the system admission process type for the application
2555: l_appl_inst_rec.adm_outcome_status,
2556: l_s_admission_process_type,
2557: v_message_name) = FALSE THEN
2558: fnd_message.set_name('IGS', v_message_name);
2559: IGS_GE_MSG_STACK.ADD;
2560: RAISE FND_API.G_EXC_ERROR;
2561: END IF;
2562:
2563: -- Update the application instance record with the new value of entry qualification status
2718:
2719: IF (x_msg_count = 0) THEN
2720: FND_MESSAGE.SET_NAME('IGS', 'IGS_GE_UNHANDLED_EXCEPTION');
2721: FND_MSG_PUB.ADD;
2722: IGS_GE_MSG_STACK.ADD;
2723: x_msg_data := FND_MESSAGE.GET;
2724: ELSE
2725: x_msg_data := l_hash_msg_name_text_type_tab(x_msg_count - 1).name;
2726: FND_MESSAGE.SET_NAME(l_hash_msg_name_text_type_tab(x_msg_count - 1).appl,x_msg_data);