DBA Data[Home] [Help]

APPS.IGS_EN_TRANSFER_APIS dependencies on FND_MSG_PUB

Line 89: FND_MSG_PUB.ADD;

85: l_unit_cd := substr(l_message_name,l_messg_and_unitcd_sep + 1,(l_cindex_msg-l_messg_and_unitcd_sep-1));
86: l_message_name := substr(l_message_name,1,l_messg_and_unitcd_sep - 1);
87: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
88: FND_MESSAGE.SET_TOKEN('UNIT_CD',l_unit_cd);
89: FND_MSG_PUB.ADD;
90: ELSE
91: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
92: FND_MSG_PUB.ADD;
93: END IF;

Line 92: FND_MSG_PUB.ADD;

88: FND_MESSAGE.SET_TOKEN('UNIT_CD',l_unit_cd);
89: FND_MSG_PUB.ADD;
90: ELSE
91: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
92: FND_MSG_PUB.ADD;
93: END IF;
94:
95: l_nth_occurence_msg := l_nth_occurence_msg + 1;
96: l_cindex_msg := INSTR(l_messages_str,';',1,l_nth_occurence_msg);

Line 592: FND_MSG_PUB.ADD;

588: l_message_name);
589: IF l_val_sca_confrm_status = FALSE THEN
590: IF l_message_name IN ('IGS_EN_ASSOCIATE_ADMPRG_APPL') AND p_show_warning = 'Y' THEN
591: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
592: FND_MSG_PUB.ADD;
593: END IF;
594: IF l_message_name IN ('IGS_EN_PRG_ATT_CONF_ENR','IGS_EN_CONF_IND_ONLY_BE_CHANG') THEN
595: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
596: FND_MSG_PUB.ADD;

Line 596: FND_MSG_PUB.ADD;

592: FND_MSG_PUB.ADD;
593: END IF;
594: IF l_message_name IN ('IGS_EN_PRG_ATT_CONF_ENR','IGS_EN_CONF_IND_ONLY_BE_CHANG') THEN
595: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
596: FND_MSG_PUB.ADD;
597: RAISE FND_API.G_EXC_ERROR;
598: END IF;
599: END IF;-- end of l_val_sca_confrm_status = FALSE IF THEN
600:

Line 614: FND_MSG_PUB.ADD;

610: IF l_message_name1 NOT IN ('IGS_EN_STUD_INELIG_TO_RE_ENR','IGS_EN_INELIGBLE_DUE_TO_LAPSE',
611: 'IGS_EN_STUD_INELIGIBLE_RE_ENR','IGS_EN_STUD_NOT_HAVE_CURR_AFF',
612: 'IGS_EN_INTERM_DOES_NOT_END', 'IGS_RE_SUPERV_%_MUST_TOT_100') THEN
613: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name1);
614: FND_MSG_PUB.ADD;
615: RAISE FND_API.G_EXC_ERROR;
616: END IF;
617: END IF;-- end of l_val_sca_elgbl_status = FALSE IF THEN
618:

Line 752: FND_MSG_PUB.ADD;

748:
749: IF p_show_warning = 'Y' THEN
750:
751: FND_MESSAGE.SET_NAME( 'IGS' , 'IGS_EN_NOTTRNS_NOMINATED_PRG');
752: FND_MSG_PUB.ADD;
753: FND_MESSAGE.SET_NAME( 'IGS' , 'IGS_EN_PERS_ENCUMB_SYS');
754: FND_MSG_PUB.ADD;
755: END IF;
756:

Line 754: FND_MSG_PUB.ADD;

750:
751: FND_MESSAGE.SET_NAME( 'IGS' , 'IGS_EN_NOTTRNS_NOMINATED_PRG');
752: FND_MSG_PUB.ADD;
753: FND_MESSAGE.SET_NAME( 'IGS' , 'IGS_EN_PERS_ENCUMB_SYS');
754: FND_MSG_PUB.ADD;
755: END IF;
756:
757: END IF;
758:

Line 776: FND_MSG_PUB.ADD;

772:
773: -- log the warning message here
774:
775: FND_MESSAGE.SET_NAME( 'IGS' ,NVL(v_message_name,v_message_name2));
776: FND_MSG_PUB.ADD;
777:
778: FND_MESSAGE.SET_NAME( 'IGS' ,'IGS_EN_PERS_ENCUMB_SYS');
779: FND_MSG_PUB.ADD;
780:

Line 779: FND_MSG_PUB.ADD;

775: FND_MESSAGE.SET_NAME( 'IGS' ,NVL(v_message_name,v_message_name2));
776: FND_MSG_PUB.ADD;
777:
778: FND_MESSAGE.SET_NAME( 'IGS' ,'IGS_EN_PERS_ENCUMB_SYS');
779: FND_MSG_PUB.ADD;
780:
781: END IF;
782:
783: END IF; -- end of IF enrp_val_enr_encmb_pt(

Line 801: FND_MSG_PUB.ADD;

797:
798: IF l_deny_warn = 'E' THEN
799: IF l_message_name IS NOT NULL THEN
800: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
801: FND_MSG_PUB.ADD;
802: p_return_status := FND_API.G_RET_STS_ERROR;
803: RAISE FND_API.G_EXC_ERROR;
804: END IF;
805: END IF;-- end of l_deny_warn = 'E' IF THEN

Line 1061: FND_MSG_PUB.ADD;

1057: -- when these units are being dropped in the immediate transfer then show the message
1058: IF p_show_warning = 'Y' AND l_unchk_units_in_src IS NOT NULL AND p_drop THEN
1059: FND_MESSAGE.SET_NAME('IGS','IGS_EN_TRN_EN_WL_U_NO_SEL');
1060: FND_MESSAGE.SET_TOKEN('UNIT_CD',l_unchk_units_in_src);
1061: FND_MSG_PUB.ADD;
1062: END IF;
1063:
1064: EXCEPTION
1065: WHEN APP_EXCEPTION.APPLICATION_EXCEPTION THEN

Line 1128: FND_MSG_PUB.ADD;

1124:
1125: -- when these units are being dropped in the immediate transfer then show the message
1126: IF p_show_warning = 'Y' AND l_sub_not_selected AND NOT p_drop THEN
1127: FND_MESSAGE.SET_NAME('IGS','IGS_EN_TRN_SUB_NO_SEL_DROP'); -- subordinates units of all superiors unit selected for transfer will be dropped.
1128: FND_MSG_PUB.ADD;
1129: END IF;
1130:
1131: EXCEPTION
1132: WHEN APP_EXCEPTION.APPLICATION_EXCEPTION THEN

Line 1300: FND_MSG_PUB.ADD;

1296: l_message_name);
1297:
1298: IF (l_candidacy_tran_status = FALSE AND p_show_warning = 'Y') THEN
1299: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
1300: FND_MSG_PUB.ADD;
1301: p_return_status := FND_API.G_RET_STS_ERROR;
1302: END IF;
1303:
1304: IF (l_candidacy_tran_status = FALSE AND p_show_warning = 'N') THEN

Line 1306: FND_MSG_PUB.ADD;

1302: END IF;
1303:
1304: IF (l_candidacy_tran_status = FALSE AND p_show_warning = 'N') THEN
1305: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
1306: FND_MSG_PUB.ADD;
1307: RAISE FND_API.G_EXC_ERROR;
1308: END IF;
1309:
1310: l_candidacy_tran_status := IGS_EN_INS_CA_TRNSFR.enrp_ins_ca_trnsfr(p_person_id,

Line 1321: FND_MSG_PUB.ADD;

1317: l_message_name);
1318:
1319: IF (l_candidacy_tran_status = FALSE AND p_show_warning = 'Y') THEN
1320: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
1321: FND_MSG_PUB.ADD;
1322: p_return_status := FND_API.G_RET_STS_ERROR;
1323: END IF;
1324:
1325: IF (l_candidacy_tran_status = FALSE AND p_show_warning = 'N') THEN

Line 1327: FND_MSG_PUB.ADD;

1323: END IF;
1324:
1325: IF (l_candidacy_tran_status = FALSE AND p_show_warning = 'N') THEN
1326: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
1327: FND_MSG_PUB.ADD;
1328: RAISE FND_API.G_EXC_ERROR;
1329: END IF;
1330:
1331: l_res_elgbl_status := IGS_EN_VAL_SCA.enrp_val_res_elgbl(p_person_id,

Line 1339: FND_MSG_PUB.ADD;

1335:
1336: IF (l_elgbl_message_name IS NOT NULL AND p_show_warning = 'Y') THEN
1337: IF l_elgbl_message_name NOT IN ('IGS_RE_SUPERV_%_MUST_TOT_100') THEN
1338: FND_MESSAGE.SET_NAME( 'IGS' , l_elgbl_message_name);
1339: FND_MSG_PUB.ADD;
1340: p_return_status := FND_API.G_RET_STS_ERROR;
1341: END IF;
1342: END IF;
1343:

Line 1348: FND_MSG_PUB.ADD;

1344:
1345: IF (l_elgbl_message_name IS NOT NULL AND p_show_warning = 'N') THEN
1346: IF l_elgbl_message_name NOT IN ('IGS_RE_SUPERV_%_MUST_TOT_100') THEN
1347: FND_MESSAGE.SET_NAME( 'IGS' , l_elgbl_message_name);
1348: FND_MSG_PUB.ADD;
1349: RAISE FND_API.G_EXC_ERROR;
1350: END IF;
1351: END IF;
1352:

Line 1420: FND_MSG_PUB.ADD;

1416: END IF; -- end of IF THEN ELSE
1417:
1418: IF p_show_warning = 'Y' AND l_message_name IS NOT NULL THEN
1419: FND_MESSAGE.SET_NAME( 'IGS' ,l_message_name);
1420: FND_MSG_PUB.ADD;
1421: END IF;-- end of l_message_name IF THEN
1422:
1423: EXCEPTION
1424: WHEN APP_EXCEPTION.APPLICATION_EXCEPTION THEN

Line 1686: FND_MSG_PUB.ADD;

1682: FND_MESSAGE.SET_TOKEN('UNIT_CD',l_unit_dtls_rec.unit_cd);
1683: FND_MESSAGE.SET_TOKEN('LOCATION_CD',l_unit_dtls_rec.location_cd);
1684: FND_MESSAGE.SET_TOKEN('SECTION',l_unit_dtls_rec.unit_class);
1685: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1686: FND_MSG_PUB.ADD;
1687: END IF;-- end of NOT l_error_occured IF THEN
1688: FND_MESSAGE.SET_NAME( 'IGS' , l_return_message);
1689: FND_MSG_PUB.ADD;
1690: p_return_status := FND_API.G_RET_STS_ERROR;

Line 1689: FND_MSG_PUB.ADD;

1685: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1686: FND_MSG_PUB.ADD;
1687: END IF;-- end of NOT l_error_occured IF THEN
1688: FND_MESSAGE.SET_NAME( 'IGS' , l_return_message);
1689: FND_MSG_PUB.ADD;
1690: p_return_status := FND_API.G_RET_STS_ERROR;
1691: END IF;
1692: IF p_show_warning = 'N' THEN
1693: IF NOT l_error_occured THEN

Line 1705: FND_MSG_PUB.ADD;

1701: FND_MESSAGE.SET_TOKEN('UNIT_CD',l_unit_dtls_rec.unit_cd);
1702: FND_MESSAGE.SET_TOKEN('LOCATION_CD',l_unit_dtls_rec.location_cd);
1703: FND_MESSAGE.SET_TOKEN('SECTION',l_unit_dtls_rec.unit_class);
1704: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1705: FND_MSG_PUB.ADD;
1706: END IF;-- end of NOT l_error_occured IF THEN
1707: FND_MESSAGE.SET_NAME( 'IGS' , l_return_message);
1708: FND_MSG_PUB.ADD;
1709: RAISE FND_API.G_EXC_ERROR;

Line 1708: FND_MSG_PUB.ADD;

1704: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1705: FND_MSG_PUB.ADD;
1706: END IF;-- end of NOT l_error_occured IF THEN
1707: FND_MESSAGE.SET_NAME( 'IGS' , l_return_message);
1708: FND_MSG_PUB.ADD;
1709: RAISE FND_API.G_EXC_ERROR;
1710: END IF;
1711:
1712: ELSE

Line 1737: FND_MSG_PUB.ADD;

1733: FND_MESSAGE.SET_TOKEN('UNIT_CD',l_unit_dtls_rec.unit_cd);
1734: FND_MESSAGE.SET_TOKEN('LOCATION_CD',l_unit_dtls_rec.location_cd);
1735: FND_MESSAGE.SET_TOKEN('SECTION',l_unit_dtls_rec.unit_class);
1736: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1737: FND_MSG_PUB.ADD;
1738: END IF;-- end of NOT l_error_occured IF THEN
1739: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
1740: FND_MSG_PUB.ADD;
1741:

Line 1740: FND_MSG_PUB.ADD;

1736: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1737: FND_MSG_PUB.ADD;
1738: END IF;-- end of NOT l_error_occured IF THEN
1739: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
1740: FND_MSG_PUB.ADD;
1741:
1742: -- if IGS_EN_VAL_SCT.enrp_val_sua_trnsfr validation passed then proceed
1743: ELSE
1744: -- for completed and discontinued unit attempts perform the 2 validations

Line 1760: FND_MSG_PUB.ADD;

1756: FND_MESSAGE.SET_TOKEN('UNIT_CD',l_unit_dtls_rec.unit_cd);
1757: FND_MESSAGE.SET_TOKEN('LOCATION_CD',l_unit_dtls_rec.location_cd);
1758: FND_MESSAGE.SET_TOKEN('SECTION',l_unit_dtls_rec.unit_class);
1759: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1760: FND_MSG_PUB.ADD;
1761: END IF;-- end of NOT l_error_occured IF THEN
1762: FND_MESSAGE.SET_NAME( 'IGS' , 'IGS_EN_UNATT_PROCEED_TRN_UN');
1763: FND_MSG_PUB.ADD;
1764: END IF;

Line 1763: FND_MSG_PUB.ADD;

1759: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1760: FND_MSG_PUB.ADD;
1761: END IF;-- end of NOT l_error_occured IF THEN
1762: FND_MESSAGE.SET_NAME( 'IGS' , 'IGS_EN_UNATT_PROCEED_TRN_UN');
1763: FND_MSG_PUB.ADD;
1764: END IF;
1765:
1766: END IF; -- end of ('COMPLETED','DISCONTIN')
1767:

Line 1786: FND_MSG_PUB.ADD;

1782: FND_MESSAGE.SET_TOKEN('UNIT_CD',l_unit_dtls_rec.unit_cd);
1783: FND_MESSAGE.SET_TOKEN('LOCATION_CD',l_unit_dtls_rec.location_cd);
1784: FND_MESSAGE.SET_TOKEN('SECTION',l_unit_dtls_rec.unit_class);
1785: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1786: FND_MSG_PUB.ADD;
1787: -- if intra career transfer, warn that unit will not be transfered and will be dropped from source
1788: IF is_career_model_enabled AND
1789: NOT is_tranfer_across_careers(p_source_program_cd,p_source_prog_ver,p_dest_program_cd,p_dest_prog_ver,l_src_crs_type) THEN
1790: FND_MESSAGE.SET_NAME( 'IGS' , 'IGS_EN_PAST_UNT_NOTTRN_DRP');

Line 1791: FND_MSG_PUB.ADD;

1787: -- if intra career transfer, warn that unit will not be transfered and will be dropped from source
1788: IF is_career_model_enabled AND
1789: NOT is_tranfer_across_careers(p_source_program_cd,p_source_prog_ver,p_dest_program_cd,p_dest_prog_ver,l_src_crs_type) THEN
1790: FND_MESSAGE.SET_NAME( 'IGS' , 'IGS_EN_PAST_UNT_NOTTRN_DRP');
1791: FND_MSG_PUB.ADD;
1792: -- if program mode or inter career transfer then warn that unit will not be transfered
1793: ELSE
1794: FND_MESSAGE.SET_NAME( 'IGS' , 'IGS_EN_PAST_UNT_NOTTRN');
1795: FND_MSG_PUB.ADD;

Line 1795: FND_MSG_PUB.ADD;

1791: FND_MSG_PUB.ADD;
1792: -- if program mode or inter career transfer then warn that unit will not be transfered
1793: ELSE
1794: FND_MESSAGE.SET_NAME( 'IGS' , 'IGS_EN_PAST_UNT_NOTTRN');
1795: FND_MSG_PUB.ADD;
1796: END IF;
1797: END IF;
1798: ELSE
1799: -- create unit transfer record with the same transfer date as the parent program transfer record

Line 1839: FND_MSG_PUB.ADD;

1835: FND_MESSAGE.SET_TOKEN('UNIT_CD',l_unit_dtls_rec.unit_cd);
1836: FND_MESSAGE.SET_TOKEN('LOCATION_CD',l_unit_dtls_rec.location_cd);
1837: FND_MESSAGE.SET_TOKEN('SECTION',l_unit_dtls_rec.unit_class);
1838: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1839: FND_MSG_PUB.ADD;
1840: END IF;-- end of NOT l_error_occured IF THEN
1841: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
1842: FND_MSG_PUB.ADD;
1843: FND_MESSAGE.SET_NAME( 'IGS' , 'IGS_EN_PERS_ENCUMB_SYS');

Line 1842: FND_MSG_PUB.ADD;

1838: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1839: FND_MSG_PUB.ADD;
1840: END IF;-- end of NOT l_error_occured IF THEN
1841: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
1842: FND_MSG_PUB.ADD;
1843: FND_MESSAGE.SET_NAME( 'IGS' , 'IGS_EN_PERS_ENCUMB_SYS');
1844: FND_MSG_PUB.ADD;
1845:
1846: END IF;

Line 1844: FND_MSG_PUB.ADD;

1840: END IF;-- end of NOT l_error_occured IF THEN
1841: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
1842: FND_MSG_PUB.ADD;
1843: FND_MESSAGE.SET_NAME( 'IGS' , 'IGS_EN_PERS_ENCUMB_SYS');
1844: FND_MSG_PUB.ADD;
1845:
1846: END IF;
1847:
1848: END IF;

Line 1882: FND_MSG_PUB.ADD;

1878: FND_MESSAGE.SET_TOKEN('UNIT_CD',l_unit_dtls_rec.unit_cd);
1879: FND_MESSAGE.SET_TOKEN('LOCATION_CD',l_unit_dtls_rec.location_cd);
1880: FND_MESSAGE.SET_TOKEN('SECTION',l_unit_dtls_rec.unit_class);
1881: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1882: FND_MSG_PUB.ADD;
1883: END IF;-- end of NOT l_error_occured IF THEN
1884: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
1885: FND_MSG_PUB.ADD;
1886: p_return_status := FND_API.G_RET_STS_ERROR;

Line 1885: FND_MSG_PUB.ADD;

1881: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1882: FND_MSG_PUB.ADD;
1883: END IF;-- end of NOT l_error_occured IF THEN
1884: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
1885: FND_MSG_PUB.ADD;
1886: p_return_status := FND_API.G_RET_STS_ERROR;
1887: END IF;
1888: IF p_show_warning = 'N' THEN
1889: IF NOT l_error_occured THEN

Line 1901: FND_MSG_PUB.ADD;

1897: FND_MESSAGE.SET_TOKEN('UNIT_CD',l_unit_dtls_rec.unit_cd);
1898: FND_MESSAGE.SET_TOKEN('LOCATION_CD',l_unit_dtls_rec.location_cd);
1899: FND_MESSAGE.SET_TOKEN('SECTION',l_unit_dtls_rec.unit_class);
1900: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1901: FND_MSG_PUB.ADD;
1902: END IF;-- end of NOT l_error_occured IF THEN
1903: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
1904: FND_MSG_PUB.ADD;
1905: RAISE FND_API.G_EXC_ERROR;

Line 1904: FND_MSG_PUB.ADD;

1900: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1901: FND_MSG_PUB.ADD;
1902: END IF;-- end of NOT l_error_occured IF THEN
1903: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
1904: FND_MSG_PUB.ADD;
1905: RAISE FND_API.G_EXC_ERROR;
1906: END IF;
1907:
1908: ELSE -- if l_sua_trans_status THEN

Line 1938: FND_MSG_PUB.ADD;

1934: FND_MESSAGE.SET_TOKEN('UNIT_CD',l_unit_dtls_rec.unit_cd);
1935: FND_MESSAGE.SET_TOKEN('LOCATION_CD',l_unit_dtls_rec.location_cd);
1936: FND_MESSAGE.SET_TOKEN('SECTION',l_unit_dtls_rec.unit_class);
1937: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1938: FND_MSG_PUB.ADD;
1939: END IF;-- end of NOT l_error_occured IF THEN
1940: FND_MESSAGE.SET_NAME( 'IGS' ,nvl(l_message_name1,l_message_name2));
1941: FND_MSG_PUB.ADD;
1942: p_return_status := FND_API.G_RET_STS_ERROR;

Line 1941: FND_MSG_PUB.ADD;

1937: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1938: FND_MSG_PUB.ADD;
1939: END IF;-- end of NOT l_error_occured IF THEN
1940: FND_MESSAGE.SET_NAME( 'IGS' ,nvl(l_message_name1,l_message_name2));
1941: FND_MSG_PUB.ADD;
1942: p_return_status := FND_API.G_RET_STS_ERROR;
1943: ELSIF p_show_warning = 'N' THEN
1944: IF NOT l_error_occured THEN
1945: l_error_occured := TRUE;

Line 1956: FND_MSG_PUB.ADD;

1952: FND_MESSAGE.SET_TOKEN('UNIT_CD',l_unit_dtls_rec.unit_cd);
1953: FND_MESSAGE.SET_TOKEN('LOCATION_CD',l_unit_dtls_rec.location_cd);
1954: FND_MESSAGE.SET_TOKEN('SECTION',l_unit_dtls_rec.unit_class);
1955: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1956: FND_MSG_PUB.ADD;
1957: END IF;-- end of NOT l_error_occured IF THEN
1958: FND_MESSAGE.SET_NAME( 'IGS' ,nvl(l_message_name1,l_message_name2));
1959: FND_MSG_PUB.ADD;
1960: RAISE FND_API.G_EXC_ERROR;

Line 1959: FND_MSG_PUB.ADD;

1955: FND_MESSAGE.SET_TOKEN('TEACH_CAL_DESC',l_teach_cal_desc);
1956: FND_MSG_PUB.ADD;
1957: END IF;-- end of NOT l_error_occured IF THEN
1958: FND_MESSAGE.SET_NAME( 'IGS' ,nvl(l_message_name1,l_message_name2));
1959: FND_MSG_PUB.ADD;
1960: RAISE FND_API.G_EXC_ERROR;
1961: END IF; -- end of p_show_warning = 'Y'
1962:
1963: END IF; -- end of NOT l_sua_confrm_status IF THEN

Line 2007: FND_MSG_PUB.ADD;

2003:
2004: IF l_del_all_sua_status = FALSE THEN
2005: IF p_show_warning = 'Y' THEN
2006: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name3);
2007: FND_MSG_PUB.ADD;
2008: p_return_status := FND_API.G_RET_STS_ERROR;
2009: END IF;
2010: IF p_show_warning = 'N' THEN
2011: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name3);

Line 2012: FND_MSG_PUB.ADD;

2008: p_return_status := FND_API.G_RET_STS_ERROR;
2009: END IF;
2010: IF p_show_warning = 'N' THEN
2011: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name3);
2012: FND_MSG_PUB.ADD;
2013: RAISE FND_API.G_EXC_ERROR;
2014: END IF;
2015:
2016: END IF; -- end of l_del_all_sua_status = FALSE

Line 2149: FND_MSG_PUB.ADD;

2145: IF l_return_status = 'FALSE' AND l_deny_warn = 'WARN' THEN
2146:
2147: IF l_message_name2 IS NOT NULL AND p_show_warning = 'Y' THEN
2148: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name2);
2149: FND_MSG_PUB.ADD;
2150: END IF;
2151:
2152: END IF; -- show warning message when rule failed in warn
2153:

Line 2159: FND_MSG_PUB.ADD;

2155: IF l_return_status = 'FALSE' AND l_deny_warn = 'DENY' THEN
2156:
2157: IF l_message_name2 IS NOT NULL AND p_show_warning = 'Y' THEN
2158: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name2);
2159: FND_MSG_PUB.ADD;
2160: p_return_status := FND_API.G_RET_STS_ERROR;
2161: END IF;
2162:
2163: IF l_message_name2 IS NOT NULL AND p_show_warning = 'N' THEN

Line 2165: FND_MSG_PUB.ADD;

2161: END IF;
2162:
2163: IF l_message_name2 IS NOT NULL AND p_show_warning = 'N' THEN
2164: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name2);
2165: FND_MSG_PUB.ADD;
2166: p_return_status := FND_API.G_RET_STS_ERROR;
2167: RAISE FND_API.G_EXC_ERROR;
2168: END IF;
2169:

Line 2223: FND_MSG_PUB.ADD;

2219: IF l_return_status = 'FALSE' AND l_deny_warn = 'WARN' THEN
2220:
2221: IF l_message_name2 IS NOT NULL AND p_show_warning = 'Y' THEN
2222: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name2);
2223: FND_MSG_PUB.ADD;
2224: END IF;
2225:
2226: END IF; -- end of l_return_status = 'FALSE' AND l_deny_warn = 'WARN' IF THEN
2227:

Line 2232: FND_MSG_PUB.ADD;

2228: IF l_return_status = 'FALSE' AND l_deny_warn = 'DENY' THEN
2229:
2230: IF l_message_name2 IS NOT NULL AND p_show_warning = 'Y' THEN
2231: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name2);
2232: FND_MSG_PUB.ADD;
2233: p_return_status := FND_API.G_RET_STS_ERROR;
2234: END IF;
2235:
2236: IF l_message_name2 IS NOT NULL AND p_show_warning = 'N' THEN

Line 2238: FND_MSG_PUB.ADD;

2234: END IF;
2235:
2236: IF l_message_name2 IS NOT NULL AND p_show_warning = 'N' THEN
2237: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name2);
2238: FND_MSG_PUB.ADD;
2239: p_return_status := FND_API.G_RET_STS_ERROR;
2240: RAISE FND_API.G_EXC_ERROR;
2241: END IF;
2242:

Line 2497: FND_MSG_PUB.ADD;

2493: l_unitset_append_count := l_unitset_append_count + 1;
2494: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ERR_US_TRN');
2495: FND_MESSAGE.SET_TOKEN('UNIT_SET_CD',l_unitset);
2496: FND_MESSAGE.SET_TOKEN('US_VERSION_NUMBER',l_unitset_att_rec.us_version_number);
2497: FND_MSG_PUB.ADD;
2498: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
2499: FND_MSG_PUB.ADD;
2500: RAISE FND_API.G_EXC_ERROR;
2501: ELSIF (p_show_warning = 'Y' ) THEN

Line 2499: FND_MSG_PUB.ADD;

2495: FND_MESSAGE.SET_TOKEN('UNIT_SET_CD',l_unitset);
2496: FND_MESSAGE.SET_TOKEN('US_VERSION_NUMBER',l_unitset_att_rec.us_version_number);
2497: FND_MSG_PUB.ADD;
2498: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
2499: FND_MSG_PUB.ADD;
2500: RAISE FND_API.G_EXC_ERROR;
2501: ELSIF (p_show_warning = 'Y' ) THEN
2502: -- if error occured for the first time for this unit set then log the heading and
2503: -- increment the count and append to out param. Ignore this logic when further errors occur

Line 2515: FND_MSG_PUB.ADD;

2511: l_unitset_append_count := l_unitset_append_count + 1;
2512: FND_MESSAGE.SET_NAME('IGS','IGS_EN_WARN_US_TRN');
2513: FND_MESSAGE.SET_TOKEN('UNIT_SET_CD',l_unitset);
2514: FND_MESSAGE.SET_TOKEN('US_VERSION_NUMBER',l_unitset_att_rec.us_version_number);
2515: FND_MSG_PUB.ADD;
2516: END IF;
2517: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
2518: FND_MSG_PUB.ADD;
2519: p_return_status := FND_API.G_RET_STS_ERROR;

Line 2518: FND_MSG_PUB.ADD;

2514: FND_MESSAGE.SET_TOKEN('US_VERSION_NUMBER',l_unitset_att_rec.us_version_number);
2515: FND_MSG_PUB.ADD;
2516: END IF;
2517: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
2518: FND_MSG_PUB.ADD;
2519: p_return_status := FND_API.G_RET_STS_ERROR;
2520: l_val_susa_tran := FALSE;
2521:
2522: END IF;-- end of l_message_name IN IF THEN

Line 2564: FND_MSG_PUB.ADD;

2560: l_unitset_append_count := l_unitset_append_count + 1;
2561: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ERR_US_TRN');
2562: FND_MESSAGE.SET_TOKEN('UNIT_SET_CD',l_unitset);
2563: FND_MESSAGE.SET_TOKEN('US_VERSION_NUMBER',l_unitset_att_rec.us_version_number);
2564: FND_MSG_PUB.ADD;
2565: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
2566: FND_MSG_PUB.ADD;
2567: RAISE FND_API.G_EXC_ERROR;
2568: ELSIF (p_show_warning = 'Y' ) THEN

Line 2566: FND_MSG_PUB.ADD;

2562: FND_MESSAGE.SET_TOKEN('UNIT_SET_CD',l_unitset);
2563: FND_MESSAGE.SET_TOKEN('US_VERSION_NUMBER',l_unitset_att_rec.us_version_number);
2564: FND_MSG_PUB.ADD;
2565: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
2566: FND_MSG_PUB.ADD;
2567: RAISE FND_API.G_EXC_ERROR;
2568: ELSIF (p_show_warning = 'Y' ) THEN
2569: -- if error occured for the first time for this unit set then log the heading and
2570: -- increment the count and append to out param. Ignore this logic when further errors occur

Line 2582: FND_MSG_PUB.ADD;

2578: l_unitset_append_count := l_unitset_append_count + 1;
2579: FND_MESSAGE.SET_NAME('IGS','IGS_EN_WARN_US_TRN');
2580: FND_MESSAGE.SET_TOKEN('UNIT_SET_CD',l_unitset);
2581: FND_MESSAGE.SET_TOKEN('US_VERSION_NUMBER',l_unitset_att_rec.us_version_number);
2582: FND_MSG_PUB.ADD;
2583: END IF;
2584: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
2585: FND_MSG_PUB.ADD;
2586: p_return_status := FND_API.G_RET_STS_ERROR;

Line 2585: FND_MSG_PUB.ADD;

2581: FND_MESSAGE.SET_TOKEN('US_VERSION_NUMBER',l_unitset_att_rec.us_version_number);
2582: FND_MSG_PUB.ADD;
2583: END IF;
2584: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
2585: FND_MSG_PUB.ADD;
2586: p_return_status := FND_API.G_RET_STS_ERROR;
2587: END IF;-- end of p_show_warning = 'N' IF THEN
2588:
2589: END IF;-- END OF l_message_name

Line 2623: FND_MSG_PUB.ADD;

2619: l_unitset_append_count := l_unitset_append_count + 1;
2620: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ERR_US_TRN');
2621: FND_MESSAGE.SET_TOKEN('UNIT_SET_CD',l_unitset);
2622: FND_MESSAGE.SET_TOKEN('US_VERSION_NUMBER',l_unitset_att_rec.us_version_number);
2623: FND_MSG_PUB.ADD;
2624: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name1);
2625: FND_MSG_PUB.ADD;
2626: IF l_message_name2 IS NOT NULL THEN
2627: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name2);

Line 2625: FND_MSG_PUB.ADD;

2621: FND_MESSAGE.SET_TOKEN('UNIT_SET_CD',l_unitset);
2622: FND_MESSAGE.SET_TOKEN('US_VERSION_NUMBER',l_unitset_att_rec.us_version_number);
2623: FND_MSG_PUB.ADD;
2624: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name1);
2625: FND_MSG_PUB.ADD;
2626: IF l_message_name2 IS NOT NULL THEN
2627: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name2);
2628: FND_MSG_PUB.ADD;
2629: END IF;

Line 2628: FND_MSG_PUB.ADD;

2624: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name1);
2625: FND_MSG_PUB.ADD;
2626: IF l_message_name2 IS NOT NULL THEN
2627: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name2);
2628: FND_MSG_PUB.ADD;
2629: END IF;
2630: RAISE FND_API.G_EXC_ERROR;
2631: ELSIF (p_show_warning = 'Y' ) THEN
2632: -- if error occured for the first time for this unit set then log the heading and

Line 2645: FND_MSG_PUB.ADD;

2641: l_unitset_append_count := l_unitset_append_count + 1;
2642: FND_MESSAGE.SET_NAME('IGS','IGS_EN_WARN_US_TRN');
2643: FND_MESSAGE.SET_TOKEN('UNIT_SET_CD',l_unitset);
2644: FND_MESSAGE.SET_TOKEN('US_VERSION_NUMBER',l_unitset_att_rec.us_version_number);
2645: FND_MSG_PUB.ADD;
2646: END IF;
2647: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name1);
2648: FND_MSG_PUB.ADD;
2649: IF l_message_name2 IS NOT NULL THEN

Line 2648: FND_MSG_PUB.ADD;

2644: FND_MESSAGE.SET_TOKEN('US_VERSION_NUMBER',l_unitset_att_rec.us_version_number);
2645: FND_MSG_PUB.ADD;
2646: END IF;
2647: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name1);
2648: FND_MSG_PUB.ADD;
2649: IF l_message_name2 IS NOT NULL THEN
2650: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name2);
2651: FND_MSG_PUB.ADD;
2652: END IF;

Line 2651: FND_MSG_PUB.ADD;

2647: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name1);
2648: FND_MSG_PUB.ADD;
2649: IF l_message_name2 IS NOT NULL THEN
2650: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name2);
2651: FND_MSG_PUB.ADD;
2652: END IF;
2653: p_return_status := FND_API.G_RET_STS_ERROR;
2654: END IF;-- end of p_show_warning = 'N' IF THEN
2655:

Line 2683: FND_MSG_PUB.ADD;

2679: l_unitset_append_count := l_unitset_append_count + 1;
2680: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ERR_US_TRN');
2681: FND_MESSAGE.SET_TOKEN('UNIT_SET_CD',l_unitset);
2682: FND_MESSAGE.SET_TOKEN('US_VERSION_NUMBER',l_unitset_att_rec.us_version_number);
2683: FND_MSG_PUB.ADD;
2684: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name3);
2685: FND_MSG_PUB.ADD;
2686: IF l_message_name2 IS NOT NULL THEN
2687: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name4);

Line 2685: FND_MSG_PUB.ADD;

2681: FND_MESSAGE.SET_TOKEN('UNIT_SET_CD',l_unitset);
2682: FND_MESSAGE.SET_TOKEN('US_VERSION_NUMBER',l_unitset_att_rec.us_version_number);
2683: FND_MSG_PUB.ADD;
2684: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name3);
2685: FND_MSG_PUB.ADD;
2686: IF l_message_name2 IS NOT NULL THEN
2687: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name4);
2688: FND_MSG_PUB.ADD;
2689: END IF;

Line 2688: FND_MSG_PUB.ADD;

2684: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name3);
2685: FND_MSG_PUB.ADD;
2686: IF l_message_name2 IS NOT NULL THEN
2687: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name4);
2688: FND_MSG_PUB.ADD;
2689: END IF;
2690: RAISE FND_API.G_EXC_ERROR;
2691: ELSIF (p_show_warning = 'Y' ) THEN
2692: -- if error occured for the first time for this unit set then log the heading and

Line 2706: FND_MSG_PUB.ADD;

2702: l_unitset_append_count := l_unitset_append_count + 1;
2703: FND_MESSAGE.SET_NAME('IGS','IGS_EN_WARN_US_TRN');
2704: FND_MESSAGE.SET_TOKEN('UNIT_SET_CD',l_unitset);
2705: FND_MESSAGE.SET_TOKEN('US_VERSION_NUMBER',l_unitset_att_rec.us_version_number);
2706: FND_MSG_PUB.ADD;
2707: END IF;
2708: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name3);
2709: FND_MSG_PUB.ADD;
2710: IF l_message_name2 IS NOT NULL THEN

Line 2709: FND_MSG_PUB.ADD;

2705: FND_MESSAGE.SET_TOKEN('US_VERSION_NUMBER',l_unitset_att_rec.us_version_number);
2706: FND_MSG_PUB.ADD;
2707: END IF;
2708: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name3);
2709: FND_MSG_PUB.ADD;
2710: IF l_message_name2 IS NOT NULL THEN
2711: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name4);
2712: FND_MSG_PUB.ADD;
2713: END IF;

Line 2712: FND_MSG_PUB.ADD;

2708: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name3);
2709: FND_MSG_PUB.ADD;
2710: IF l_message_name2 IS NOT NULL THEN
2711: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name4);
2712: FND_MSG_PUB.ADD;
2713: END IF;
2714: p_return_status := FND_API.G_RET_STS_ERROR;
2715: END IF;-- end of p_show_warning = 'Y' IF THEN
2716:

Line 2841: FND_MSG_PUB.ADD;

2837: );
2838:
2839: IF l_status = FALSE THEN
2840: FND_MESSAGE.SET_NAME('IGS',l_message_name);
2841: FND_MSG_PUB.ADD;
2842: FND_MESSAGE.SET_NAME('IGS', 'IGS_EN_UNABLE_DISCONT_FROM');
2843: FND_MSG_PUB.ADD;
2844: RAISE FND_API.G_EXC_ERROR;
2845: END IF;

Line 2843: FND_MSG_PUB.ADD;

2839: IF l_status = FALSE THEN
2840: FND_MESSAGE.SET_NAME('IGS',l_message_name);
2841: FND_MSG_PUB.ADD;
2842: FND_MESSAGE.SET_NAME('IGS', 'IGS_EN_UNABLE_DISCONT_FROM');
2843: FND_MSG_PUB.ADD;
2844: RAISE FND_API.G_EXC_ERROR;
2845: END IF;
2846: ELSIF p_discontinue_source = 'N' AND p_dest_fut_dt_trans_flag = 'S' THEN
2847: -- if source is key then make it non key because destination is already being made key in this case

Line 3145: FND_MSG_PUB.INITIALIZE;

3141: l_adm_transfer BOOLEAN;
3142: l_key_program IGS_EN_SPA_TERMS.key_program_flag%TYPE;
3143: BEGIN
3144: SAVEPOINT TRANSFER_PRGM;
3145: FND_MSG_PUB.INITIALIZE;
3146: IF is_career_model_enabled THEN
3147: l_career_model_enabled := TRUE;
3148: ELSE
3149: l_career_model_enabled := FALSE;

Line 3159: FND_MSG_PUB.ADD;

3155: CLOSE c_get_std_course_ind_of_src;
3156:
3157: IF l_career_model_enabled AND l_src_primary_prg_type = 'SECONDARY' THEN
3158: FND_MESSAGE.SET_NAME('IGS', 'IGS_EN_SEC_CANT_BE_SRC');
3159: FND_MSG_PUB.ADD;
3160: RAISE FND_API.G_EXC_ERROR;
3161: END IF;
3162:
3163: -- getting destination program key flag ,student confirmed

Line 3178: FND_MSG_PUB.ADD;

3174: p_dest_prog_ver,
3175: l_src_career_type);
3176: IF l_src_std_confrm_ind = 'N' AND l_tran_across_careers THEN
3177: FND_MESSAGE.SET_NAME('IGS', 'IGS_EN_UN_SRC_ONLY_INTRA');
3178: FND_MSG_PUB.ADD;
3179: RAISE FND_API.G_EXC_ERROR;
3180: END IF;
3181: END IF;
3182:

Line 3244: FND_MSG_PUB.ADD;

3240: -- is an research program.
3241: IF l_src_prg_reasearch_ind = 'N' OR l_dest_prg_reasearch_ind = 'N' THEN
3242:
3243: FND_MESSAGE.SET_NAME('IGS', 'IGS_EN_NOT_TRN_RESCAND');
3244: FND_MSG_PUB.ADD;
3245: RAISE FND_API.G_EXC_ERROR;
3246:
3247: END IF;-- end of l_src_prg_reasearch_ind = 'Y' IF THEN
3248:

Line 3310: FND_MSG_PUB.ADD;

3306: IF l_return_value = FALSE AND l_message_name NOT IN ('IGS_EN_STUD_INELIG_TO_RE_ENR','IGS_EN_INELIGBLE_DUE_TO_LAPSE',
3307: 'IGS_EN_STUD_INELIGIBLE_RE_ENR','IGS_EN_STUD_NOT_HAVE_CURR_AFF',
3308: 'IGS_EN_INTERM_DOES_NOT_END') THEN
3309: FND_MESSAGE.SET_NAME( 'IGS' , l_message_name);
3310: FND_MSG_PUB.ADD;
3311: RAISE FND_API.G_EXC_ERROR;
3312: END IF;
3313: l_discon_dt := NULL;
3314: l_discon_reason_code := NULL;

Line 3428: FND_MSG_PUB.ADD;

3424: p_term_cal_type,
3425: p_term_seq_num ) THEN
3426:
3427: FND_MESSAGE.SET_NAME( 'IGS' , 'IGS_EN_ENR_SUA_CUR_FUT_TERM');
3428: FND_MSG_PUB.ADD;
3429: RAISE FND_API.G_EXC_ERROR;
3430:
3431: END IF;
3432:

Line 3486: FND_MSG_PUB.ADD;

3482: p_source_program_cd,
3483: l_debt_message_name);
3484: IF l_debt_message_name IS NOT NULL THEN
3485: FND_MESSAGE.SET_NAME( 'IGS' , l_debt_message_name);
3486: FND_MSG_PUB.ADD;
3487: END IF;
3488: END IF;
3489:
3490:

Line 3579: FND_MSG_PUB.COUNT_AND_GET( p_count => p_msg_count,

3575: END IF;
3576: -- its an immediate transfer.
3577:
3578: IGS_EN_STDNT_PS_ATT_PKG.skip_before_after_dml := FALSE;
3579: FND_MSG_PUB.COUNT_AND_GET( p_count => p_msg_count,
3580: p_data => p_msg_data);
3581:
3582: IF p_show_warning = 'Y' AND p_msg_count > 0 THEN
3583: ROLLBACK TO TRANSFER_PRGM;

Line 3591: FND_MSG_PUB.ADD;

3587: WHEN APP_EXCEPTION.APPLICATION_EXCEPTION THEN
3588: IGS_EN_STDNT_PS_ATT_PKG.skip_before_after_dml := FALSE;
3589: p_return_status := FND_API.G_RET_STS_ERROR;
3590: FND_MESSAGE.SET_ENCODED(FND_MESSAGE.GET_ENCODED());
3591: FND_MSG_PUB.ADD;
3592: FND_MSG_PUB.COUNT_AND_GET( p_count => p_msg_count,
3593: p_data => p_msg_data);
3594: ROLLBACK TO TRANSFER_PRGM;
3595: WHEN FND_API.G_EXC_ERROR THEN

Line 3592: FND_MSG_PUB.COUNT_AND_GET( p_count => p_msg_count,

3588: IGS_EN_STDNT_PS_ATT_PKG.skip_before_after_dml := FALSE;
3589: p_return_status := FND_API.G_RET_STS_ERROR;
3590: FND_MESSAGE.SET_ENCODED(FND_MESSAGE.GET_ENCODED());
3591: FND_MSG_PUB.ADD;
3592: FND_MSG_PUB.COUNT_AND_GET( p_count => p_msg_count,
3593: p_data => p_msg_data);
3594: ROLLBACK TO TRANSFER_PRGM;
3595: WHEN FND_API.G_EXC_ERROR THEN
3596: IGS_EN_STDNT_PS_ATT_PKG.skip_before_after_dml := FALSE;

Line 3598: FND_MSG_PUB.COUNT_AND_GET( p_count => p_msg_count,

3594: ROLLBACK TO TRANSFER_PRGM;
3595: WHEN FND_API.G_EXC_ERROR THEN
3596: IGS_EN_STDNT_PS_ATT_PKG.skip_before_after_dml := FALSE;
3597: p_return_status := FND_API.G_RET_STS_ERROR;
3598: FND_MSG_PUB.COUNT_AND_GET( p_count => p_msg_count,
3599: p_data => p_msg_data);
3600: ROLLBACK TO TRANSFER_PRGM;
3601: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3602: IGS_EN_STDNT_PS_ATT_PKG.skip_before_after_dml := FALSE;

Line 3604: FND_MSG_PUB.COUNT_AND_GET( p_count => p_msg_count,

3600: ROLLBACK TO TRANSFER_PRGM;
3601: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3602: IGS_EN_STDNT_PS_ATT_PKG.skip_before_after_dml := FALSE;
3603: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3604: FND_MSG_PUB.COUNT_AND_GET( p_count => p_msg_count,
3605: p_data => p_msg_data);
3606: IF (FND_LOG.LEVEL_UNEXPECTED >= g_debug_level ) THEN
3607: FND_LOG.STRING(fnd_log.level_unexpected, 'igs.patch.115.sql.igs_en_program_transfer_apis.program_transfer_api :',SQLERRM);
3608: END IF;

Line 3613: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

3609: ROLLBACK TO TRANSFER_PRGM;
3610: WHEN OTHERS THEN
3611: IGS_EN_STDNT_PS_ATT_PKG.skip_before_after_dml := FALSE;
3612: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3613: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3614: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,
3615: l_api_name);
3616: END IF;
3617: FND_MSG_PUB.COUNT_AND_GET( p_count => p_msg_count,

Line 3614: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,

3610: WHEN OTHERS THEN
3611: IGS_EN_STDNT_PS_ATT_PKG.skip_before_after_dml := FALSE;
3612: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3613: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3614: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,
3615: l_api_name);
3616: END IF;
3617: FND_MSG_PUB.COUNT_AND_GET( p_count => p_msg_count,
3618: p_data => p_msg_data);

Line 3617: FND_MSG_PUB.COUNT_AND_GET( p_count => p_msg_count,

3613: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3614: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,
3615: l_api_name);
3616: END IF;
3617: FND_MSG_PUB.COUNT_AND_GET( p_count => p_msg_count,
3618: p_data => p_msg_data);
3619: IF (FND_LOG.LEVEL_UNEXPECTED >= g_debug_level ) THEN
3620: FND_LOG.STRING(fnd_log.level_unexpected, 'igs.patch.115.sql.igs_en_program_transfer_apis.program_transfer_api :',SQLERRM);
3621: END IF;

Line 3661: FND_MSG_PUB.GET(FND_MSG_PUB.G_FIRST,

3657: l_warn_and_err_msg := l_msg_text || '
';
3658: ELSIF l_msg_count > 1 THEN
3659: FOR l_index IN 1..NVL(l_msg_count,0)
3660: LOOP
3661: FND_MSG_PUB.GET(FND_MSG_PUB.G_FIRST,
3662: FND_API.G_TRUE,
3663: l_enc_msg,
3664: l_msg_index);
3665: FND_MESSAGE.SET_ENCODED(l_enc_msg);

Line 3669: FND_MSG_PUB.DELETE_MSG(l_msg_index);

3665: FND_MESSAGE.SET_ENCODED(l_enc_msg);
3666: l_msg_text := FND_MESSAGE.GET;
3667: l_warn_and_err_msg := l_warn_and_err_msg||l_msg_text || '
';
3668:
3669: FND_MSG_PUB.DELETE_MSG(l_msg_index);
3670:
3671: END LOOP;
3672: END IF;
3673: p_warn_and_err_msg := l_warn_and_err_msg;