[Home] [Help]
188: IF (p_value is NULL) THEN
189: --Note: Reused an existing IBY message and token.
190: FND_MESSAGE.SET_NAME('IBY', 'IBY_0004');
191: FND_MESSAGE.SET_TOKEN('FIELD', p_name);
192: FND_MSG_PUB.Add;
193:
194: -- jleybovi [10/24/00]
195: --
196: -- should return an expected error exception here as missing input is
216: -- have occured here
217: --
218: FND_MESSAGE.SET_NAME('IBY', 'IBY_204011');
219: FND_MESSAGE.SET_TOKEN('FIELD', 'NLS_LANG');
220: FND_MSG_PUB.Add;
221: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
222: */
223: WHEN OTHERS THEN
224: p_url := l_url;
272: -- have occured here
273: --
274: FND_MESSAGE.SET_NAME('IBY', 'IBY_204011');
275: FND_MESSAGE.SET_TOKEN('FIELD', 'NLS_LANG');
276: FND_MSG_PUB.Add;
277: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
278: */
279: WHEN OTHERS THEN
280: p_url := l_url;
466: --dbms_output.put_line('x_return_status = '|| x_return_status);
467: --Raising Exception to handle errors if value is missing
468: IF ((x_baseurl IS NULL) OR (trim(x_baseurl) = '')) THEN
469: FND_MESSAGE.SET_NAME('IBY', 'IBY_204406');
470: FND_MSG_PUB.Add;
471: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
472: END IF;
473:
474: --appending '?' if not already present in the url
619:
620: EXCEPTION
621: WHEN UTL_HTTP.REQUEST_FAILED THEN
622:
623: --FND_MSG_PUB.Add_Exc_Msg(p_error_text => SQLCODE||':-:'||SQLERRM);
624: FND_MESSAGE.SET_NAME('IBY', 'IBY_0001');
625: FND_MSG_PUB.Add;
626: -- x_return_status := 3 ;
627: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
621: WHEN UTL_HTTP.REQUEST_FAILED THEN
622:
623: --FND_MSG_PUB.Add_Exc_Msg(p_error_text => SQLCODE||':-:'||SQLERRM);
624: FND_MESSAGE.SET_NAME('IBY', 'IBY_0001');
625: FND_MSG_PUB.Add;
626: -- x_return_status := 3 ;
627: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
628:
629: END send_request;
729: l_api_name,
730: G_PKG_NAME )
731: THEN
732: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
733: FND_MSG_PUB.Add;
734: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
735: END IF;
736:
737: -- Initialize message list if p_init_msg_list is set to TRUE.
735: END IF;
736:
737: -- Initialize message list if p_init_msg_list is set to TRUE.
738: IF FND_API.to_Boolean( p_init_msg_list ) THEN
739: FND_MSG_PUB.initialize;
740: END IF;
741:
742: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
743: IF (p_validation_level <> g_validation_level) THEN
741:
742: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
743: IF (p_validation_level <> g_validation_level) THEN
744: FND_MESSAGE.SET_NAME('IBY', 'IBY_204401_VAL_LEVEL_ERROR');
745: FND_MSG_PUB.Add;
746: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
747: END IF;
748:
749: -- Initialize API return status to success
964: iby_debug_pub.add(debug_msg => 'Unpack status error; HTML resp. invalid!',
965: debug_level => FND_LOG.LEVEL_UNEXPECTED,
966: module => G_DEBUG_MODULE || '.OraPmtReq');
967: FND_MESSAGE.SET_NAME('IBY', 'IBY_204403_HTML_UNPACK_ERROR');
968: FND_MSG_PUB.Add;
969: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
970: END IF;
971:
972: --Raising Exception to handle Servlet related errors.
974: iby_debug_pub.add(debug_msg => 'HTML response names count=0',
975: debug_level => FND_LOG.LEVEL_UNEXPECTED,
976: module => G_DEBUG_MODULE || '.OraPmtReq');
977: FND_MESSAGE.SET_NAME('IBY', 'IBY_204402_JSERVLET_ERROR');
978: FND_MSG_PUB.Add;
979: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
980: END IF;
981:
982: /* Retrieve name-value pairs stored in l_names and l_values, and assign
1107: END IF;
1108: */
1109:
1110: -- Standard call to get message count and if count is 1, get message info.
1111: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1112: p_data => x_msg_data
1113: );
1114:
1115: iby_debug_pub.add(debug_msg => 'x_return_status=' || x_return_status,
1131: debug_level => FND_LOG.LEVEL_ERROR,
1132: module => G_DEBUG_MODULE || '.OraPmtReq');
1133: --ROLLBACK TO OraPmtReq_PUB;
1134: x_return_status := FND_API.G_RET_STS_ERROR ;
1135: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1136: p_data => x_msg_data
1137: );
1138: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1139:
1141: debug_level => FND_LOG.LEVEL_UNEXPECTED,
1142: module => G_DEBUG_MODULE || '.OraPmtReq');
1143: --ROLLBACK TO OraPmtReq_PUB;
1144: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1145: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1146: p_data => x_msg_data
1147: );
1148: WHEN OTHERS THEN
1149:
1151: debug_level => FND_LOG.LEVEL_UNEXPECTED,
1152: module => G_DEBUG_MODULE || '.OraPmtReq');
1153: --ROLLBACK TO OraPmtReq_PUB;
1154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1155: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1156: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1157: END IF;
1158:
1159: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1152: module => G_DEBUG_MODULE || '.OraPmtReq');
1153: --ROLLBACK TO OraPmtReq_PUB;
1154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1155: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1156: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1157: END IF;
1158:
1159: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1160: p_data => x_msg_data
1155: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1156: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1157: END IF;
1158:
1159: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1160: p_data => x_msg_data
1161: );
1162:
1163: iby_debug_pub.add(debug_msg => 'x_return_status=' || x_return_status,
1234: l_api_name,
1235: G_PKG_NAME )
1236: THEN
1237: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
1238: FND_MSG_PUB.Add;
1239: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1240: END IF;
1241:
1242: -- Initialize message list if p_init_msg_list is set to TRUE.
1240: END IF;
1241:
1242: -- Initialize message list if p_init_msg_list is set to TRUE.
1243: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1244: FND_MSG_PUB.initialize;
1245: END IF;
1246:
1247: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
1248: IF (p_validation_level <> g_validation_level) THEN
1246:
1247: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
1248: IF (p_validation_level <> g_validation_level) THEN
1249: FND_MESSAGE.SET_NAME('IBY', 'IBY_204401_VAL_LEVEL_ERROR');
1250: FND_MSG_PUB.Add;
1251: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1252: END IF;
1253:
1254: -- Initialize API return status to success
1297: --Raising Exception to handle errors in unpacking resulting html file.
1298: IF (l_status = -1) THEN
1299: iby_debug_pub.add('Unpack status error; HTML resp. invalid!',FND_LOG.LEVEL_UNEXPECTED,l_dbg_mod);
1300: FND_MESSAGE.SET_NAME('IBY', 'IBY_204403_HTML_UNPACK_ERROR');
1301: FND_MSG_PUB.Add;
1302: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1303: END IF;
1304:
1305: --Raising Exception to handle Servlet related errors.
1305: --Raising Exception to handle Servlet related errors.
1306: IF (l_names.COUNT = 0) THEN
1307: iby_debug_pub.add('HTML response names count=0',FND_LOG.LEVEL_UNEXPECTED,l_dbg_mod);
1308: FND_MESSAGE.SET_NAME('IBY', 'IBY_204402_JSERVLET_ERROR');
1309: FND_MSG_PUB.Add;
1310: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1311: END IF;
1312: /* Retrieve name-value pairs stored in l_names and l_values, and assign
1313: them to the output record: x_reqresp_rec.
1387: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1388: END IF;
1389:
1390: -- Standard call to get message count and if count is 1, get message info.
1391: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1392: p_data => x_msg_data
1393: );
1394:
1395: iby_debug_pub.add('x_return_status=' || x_return_status, FND_LOG.LEVEL_STATEMENT,l_dbg_mod);
1402:
1403: iby_debug_pub.add('In G_EXC_ERROR Exception', FND_LOG.LEVEL_ERROR,l_dbg_mod);
1404: --ROLLBACK TO OraPmtReq_PUB;
1405: x_return_status := FND_API.G_RET_STS_ERROR ;
1406: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1407: p_data => x_msg_data
1408: );
1409: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1410:
1410:
1411: iby_debug_pub.add('In G_EXC_UNEXPECTED_ERROR Exception', FND_LOG.LEVEL_UNEXPECTED, l_dbg_mod);
1412: --ROLLBACK TO OraPmtReq_PUB;
1413: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1414: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1415: p_data => x_msg_data
1416: );
1417: WHEN OTHERS THEN
1418:
1418:
1419: iby_debug_pub.add('In OTHERS Exception', FND_LOG.LEVEL_UNEXPECTED,l_dbg_mod);
1420: --ROLLBACK TO OraPmtReq_PUB;
1421: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1422: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1423: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1424: END IF;
1425:
1426: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1419: iby_debug_pub.add('In OTHERS Exception', FND_LOG.LEVEL_UNEXPECTED,l_dbg_mod);
1420: --ROLLBACK TO OraPmtReq_PUB;
1421: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1422: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1423: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1424: END IF;
1425:
1426: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1427: p_data => x_msg_data
1422: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1423: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1424: END IF;
1425:
1426: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1427: p_data => x_msg_data
1428: );
1429:
1430: iby_debug_pub.add('x_return_status=' || x_return_status,FND_LOG.LEVEL_UNEXPECTED,l_dbg_mod);
1516: l_api_name,
1517: G_PKG_NAME )
1518: THEN
1519: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
1520: FND_MSG_PUB.Add;
1521: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1522: END IF;
1523:
1524: -- Initialize message list if p_init_msg_list is set to TRUE.
1522: END IF;
1523:
1524: -- Initialize message list if p_init_msg_list is set to TRUE.
1525: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1526: FND_MSG_PUB.initialize;
1527: END IF;
1528:
1529: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
1530: IF (p_validation_level <> g_validation_level) THEN
1528:
1529: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
1530: IF (p_validation_level <> g_validation_level) THEN
1531: FND_MESSAGE.SET_NAME('IBY', 'IBY_204401_VAL_LEVEL_ERROR');
1532: FND_MSG_PUB.Add;
1533: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1534: END IF;
1535:
1536: -- Initialize API return status to success
1632:
1633: --Raising Exception to handle errors in unpacking resulting html file.
1634: IF (l_status = -1) THEN
1635: FND_MESSAGE.SET_NAME('IBY', 'IBY_204403_HTML_UNPACK_ERROR');
1636: FND_MSG_PUB.Add;
1637: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1638: END IF;
1639:
1640: --Raising Exception to handle Servlet related errors.
1639:
1640: --Raising Exception to handle Servlet related errors.
1641: IF (l_names.COUNT = 0) THEN
1642: FND_MESSAGE.SET_NAME('IBY', 'IBY_204402_JSERVLET_ERROR');
1643: FND_MSG_PUB.Add;
1644: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1645: END IF;
1646:
1647: /* Retrieve name-value pairs stored in l_names and l_values, and assign
1677: END IF;
1678: */
1679:
1680: -- Standard call to get message count and if count is 1, get message info.
1681: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1682: p_data => x_msg_data
1683: );
1684: EXCEPTION
1685:
1686:
1687: WHEN FND_API.G_EXC_ERROR THEN
1688: --ROLLBACK TO OraPmtMod_PUB;
1689: x_return_status := FND_API.G_RET_STS_ERROR ;
1690: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1691: p_data => x_msg_data
1692: );
1693: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1694: --ROLLBACK TO OraPmtMod_PUB;
1692: );
1693: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1694: --ROLLBACK TO OraPmtMod_PUB;
1695: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1696: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1697: p_data => x_msg_data
1698: );
1699: WHEN OTHERS THEN
1700: --ROLLBACK TO OraPmtMod_PUB;
1698: );
1699: WHEN OTHERS THEN
1700: --ROLLBACK TO OraPmtMod_PUB;
1701: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1702: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1703: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1704: END IF;
1705:
1706: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1699: WHEN OTHERS THEN
1700: --ROLLBACK TO OraPmtMod_PUB;
1701: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1702: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1703: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1704: END IF;
1705:
1706: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1707: p_data => x_msg_data
1702: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1703: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1704: END IF;
1705:
1706: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1707: p_data => x_msg_data
1708: );
1709:
1710: END OraPmtMod;
1789: l_api_name,
1790: G_PKG_NAME )
1791: THEN
1792: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
1793: FND_MSG_PUB.Add;
1794: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1795: END IF;
1796:
1797: -- Initialize message list if p_init_msg_list is set to TRUE.
1795: END IF;
1796:
1797: -- Initialize message list if p_init_msg_list is set to TRUE.
1798: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1799: FND_MSG_PUB.initialize;
1800: END IF;
1801:
1802: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
1803: IF (p_validation_level <> g_validation_level) THEN
1801:
1802: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
1803: IF (p_validation_level <> g_validation_level) THEN
1804: FND_MESSAGE.SET_NAME('IBY', 'IBY_204401_VAL_LEVEL_ERROR');
1805: FND_MSG_PUB.Add;
1806: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1807: END IF;
1808:
1809: -- Initialize API return status to success
1838: INTO l_pmtinstr_type;
1839:
1840: IF (pmtcanc_csr%ROWCOUNT = 0) THEN
1841: FND_MESSAGE.SET_NAME('IBY', 'IBY_204404_CURSOR_ERROR');
1842: FND_MSG_PUB.Add;
1843: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1844: END IF;
1845:
1846: CLOSE pmtcanc_csr;
1868:
1869: --Raising Exception to handle errors in unpacking resulting html file.
1870: IF (l_status = -1) THEN
1871: FND_MESSAGE.SET_NAME('IBY', 'IBY_204403_HTML_UNPACK_ERROR');
1872: FND_MSG_PUB.Add;
1873: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1874: END IF;
1875:
1876: --Raising Exception to handle Servlet related errors.
1875:
1876: --Raising Exception to handle Servlet related errors.
1877: IF (l_names.COUNT = 0) THEN
1878: FND_MESSAGE.SET_NAME('IBY', 'IBY_204402_JSERVLET_ERROR');
1879: FND_MSG_PUB.Add;
1880: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1881: END IF;
1882:
1883: --show_table_debug(l_names);
1926: END IF;
1927: */
1928:
1929: -- Standard call to get message count and if count is 1, get message info.
1930: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1931: p_data => x_msg_data
1932: );
1933: EXCEPTION
1934: WHEN FND_API.G_EXC_ERROR THEN
1933: EXCEPTION
1934: WHEN FND_API.G_EXC_ERROR THEN
1935: --ROLLBACK TO OraPmtCanc_PUB;
1936: x_return_status := FND_API.G_RET_STS_ERROR ;
1937: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1938: p_data => x_msg_data
1939: );
1940: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1941: --ROLLBACK TO OraPmtCanc_PUB;
1939: );
1940: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1941: --ROLLBACK TO OraPmtCanc_PUB;
1942: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1943: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1944: p_data => x_msg_data
1945: );
1946: WHEN OTHERS THEN
1947: --ROLLBACK TO OraPmtCanc_PUB;
1945: );
1946: WHEN OTHERS THEN
1947: --ROLLBACK TO OraPmtCanc_PUB;
1948: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1949: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1950: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1951: END IF;
1952:
1953: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1946: WHEN OTHERS THEN
1947: --ROLLBACK TO OraPmtCanc_PUB;
1948: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1949: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1950: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1951: END IF;
1952:
1953: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1954: p_data => x_msg_data
1949: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1950: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1951: END IF;
1952:
1953: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1954: p_data => x_msg_data
1955: );
1956:
1957: END OraPmtCanc;
2041: l_api_name,
2042: G_PKG_NAME )
2043: THEN
2044: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
2045: FND_MSG_PUB.Add;
2046: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2047: END IF;
2048:
2049: -- Initialize message list if p_init_msg_list is set to TRUE.
2047: END IF;
2048:
2049: -- Initialize message list if p_init_msg_list is set to TRUE.
2050: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2051: FND_MSG_PUB.initialize;
2052: END IF;
2053:
2054: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
2055: IF (p_validation_level <> g_validation_level) THEN
2053:
2054: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
2055: IF (p_validation_level <> g_validation_level) THEN
2056: FND_MESSAGE.SET_NAME('IBY', 'IBY_204401_VAL_LEVEL_ERROR');
2057: FND_MSG_PUB.Add;
2058: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2059: END IF;
2060:
2061:
2091: INTO l_pmtinstr_type;
2092:
2093: IF (pmtqrytrxn_csr%ROWCOUNT = 0) THEN
2094: FND_MESSAGE.SET_NAME('IBY', 'IBY_204404_CURSOR_ERROR');
2095: FND_MSG_PUB.Add;
2096: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2097: END IF;
2098:
2099: CLOSE pmtqrytrxn_csr;
2125:
2126: --Raising Exception to handle errors in unpacking resulting html file.
2127: IF (l_status = -1) THEN
2128: FND_MESSAGE.SET_NAME('IBY', 'IBY_204403_HTML_UNPACK_ERROR');
2129: FND_MSG_PUB.Add;
2130: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2131: END IF;
2132:
2133: --Raising Exception to handle Servlet related errors.
2132:
2133: --Raising Exception to handle Servlet related errors.
2134: IF (l_names.COUNT = 0) THEN
2135: FND_MESSAGE.SET_NAME('IBY', 'IBY_204402_JSERVLET_ERROR');
2136: FND_MSG_PUB.Add;
2137: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2138: END IF;
2139:
2140: --show_table_debug(l_names);
2233: END IF;
2234: */
2235:
2236: -- Standard call to get message count and if count is 1, get message info.
2237: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2238: p_data => x_msg_data
2239: );
2240: EXCEPTION
2241: WHEN FND_API.G_EXC_ERROR THEN
2240: EXCEPTION
2241: WHEN FND_API.G_EXC_ERROR THEN
2242: --ROLLBACK TO OraPmtQryTrxn_PUB;
2243: x_return_status := FND_API.G_RET_STS_ERROR ;
2244: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2245: p_data => x_msg_data
2246: );
2247: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2248: --ROLLBACK TO OraPmtQryTrxn_PUB;
2246: );
2247: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2248: --ROLLBACK TO OraPmtQryTrxn_PUB;
2249: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2250: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2251: p_data => x_msg_data
2252: );
2253: WHEN OTHERS THEN
2254: --ROLLBACK TO OraPmtQryTrxn_PUB;
2252: );
2253: WHEN OTHERS THEN
2254: --ROLLBACK TO OraPmtQryTrxn_PUB;
2255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2256: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2257: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
2258: END IF;
2259:
2260: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2253: WHEN OTHERS THEN
2254: --ROLLBACK TO OraPmtQryTrxn_PUB;
2255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2256: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2257: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
2258: END IF;
2259:
2260: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2261: p_data => x_msg_data
2256: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2257: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
2258: END IF;
2259:
2260: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2261: p_data => x_msg_data
2262: );
2263:
2264: END OraPmtQryTrxn;
2337: l_api_name,
2338: G_PKG_NAME )
2339: THEN
2340: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
2341: FND_MSG_PUB.Add;
2342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2343: END IF;
2344:
2345: -- Initialize message list if p_init_msg_list is set to TRUE.
2343: END IF;
2344:
2345: -- Initialize message list if p_init_msg_list is set to TRUE.
2346: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2347: FND_MSG_PUB.initialize;
2348: END IF;
2349:
2350: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
2351: IF (p_validation_level <> g_validation_level) THEN
2349:
2350: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
2351: IF (p_validation_level <> g_validation_level) THEN
2352: FND_MESSAGE.SET_NAME('IBY', 'IBY_204401_VAL_LEVEL_ERROR');
2353: FND_MSG_PUB.Add;
2354: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2355: END IF;
2356:
2357: -- Initialize API return status to success
2417:
2418: --Raising Exception to handle errors in unpacking resulting html file.
2419: IF (l_status = -1) THEN
2420: FND_MESSAGE.SET_NAME('IBY', 'IBY_204403_HTML_UNPACK_ERROR');
2421: FND_MSG_PUB.Add;
2422: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2423: END IF;
2424:
2425: --Raising Exception to handle Servlet related errors.
2424:
2425: --Raising Exception to handle Servlet related errors.
2426: IF (l_names.COUNT = 0) THEN
2427: FND_MESSAGE.SET_NAME('IBY', 'IBY_204402_JSERVLET_ERROR');
2428: FND_MSG_PUB.Add;
2429: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2430: END IF;
2431:
2432: -- Assign output parameters to output record x_capresp_rec
2483: END IF;
2484: */
2485:
2486: -- Standard call to get message count and if count is 1, get message info.
2487: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2488: p_data => x_msg_data
2489: );
2490: EXCEPTION
2491: WHEN FND_API.G_EXC_ERROR THEN
2490: EXCEPTION
2491: WHEN FND_API.G_EXC_ERROR THEN
2492: --ROLLBACK TO OraPmtCapture_PUB;
2493: x_return_status := FND_API.G_RET_STS_ERROR ;
2494: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2495: p_data => x_msg_data
2496: );
2497: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2498: --ROLLBACK TO OraPmtCapture_PUB;
2496: );
2497: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2498: --ROLLBACK TO OraPmtCapture_PUB;
2499: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2500: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2501: p_data => x_msg_data
2502: );
2503: WHEN OTHERS THEN
2504: --ROLLBACK TO OraPmtCapture_PUB;
2502: );
2503: WHEN OTHERS THEN
2504: --ROLLBACK TO OraPmtCapture_PUB;
2505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2506: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2507: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
2508: END IF;
2509:
2510: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2503: WHEN OTHERS THEN
2504: --ROLLBACK TO OraPmtCapture_PUB;
2505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2506: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2507: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
2508: END IF;
2509:
2510: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2511: p_data => x_msg_data
2506: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2507: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
2508: END IF;
2509:
2510: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2511: p_data => x_msg_data
2512: );
2513:
2514: END OraPmtCapture;
2587: l_api_name,
2588: G_PKG_NAME )
2589: THEN
2590: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
2591: FND_MSG_PUB.Add;
2592: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2593: END IF;
2594:
2595: -- Initialize message list if p_init_msg_list is set to TRUE.
2593: END IF;
2594:
2595: -- Initialize message list if p_init_msg_list is set to TRUE.
2596: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2597: FND_MSG_PUB.initialize;
2598: END IF;
2599:
2600: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
2601: IF (p_validation_level <> g_validation_level) THEN
2599:
2600: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
2601: IF (p_validation_level <> g_validation_level) THEN
2602: FND_MESSAGE.SET_NAME('IBY', 'IBY_204401_VAL_LEVEL_ERROR');
2603: FND_MSG_PUB.Add;
2604: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2605: END IF;
2606:
2607:
2662:
2663: --Raising Exception to handle errors in unpacking resulting html file.
2664: IF (l_status = -1) THEN
2665: FND_MESSAGE.SET_NAME('IBY', 'IBY_204403_HTML_UNPACK_ERROR');
2666: FND_MSG_PUB.Add;
2667: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2668: END IF;
2669:
2670: --Raising Exception to handle Servlet related errors.
2669:
2670: --Raising Exception to handle Servlet related errors.
2671: IF (l_names.COUNT = 0) THEN
2672: FND_MESSAGE.SET_NAME('IBY', 'IBY_204402_JSERVLET_ERROR');
2673: FND_MSG_PUB.Add;
2674: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2675: END IF;
2676:
2677: -- Assign output parameters to output record x_retresp_rec
2727: END IF;
2728: */
2729:
2730: -- Standard call to get message count and if count is 1, get message info.
2731: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2732: p_data => x_msg_data
2733: );
2734: EXCEPTION
2735: WHEN FND_API.G_EXC_ERROR THEN
2734: EXCEPTION
2735: WHEN FND_API.G_EXC_ERROR THEN
2736: --ROLLBACK TO OraPmtReturn_PUB;
2737: x_return_status := FND_API.G_RET_STS_ERROR ;
2738: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2739: p_data => x_msg_data
2740: );
2741: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2742: --ROLLBACK TO OraPmtReturn_PUB;
2740: );
2741: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2742: --ROLLBACK TO OraPmtReturn_PUB;
2743: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2744: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2745: p_data => x_msg_data
2746: );
2747: WHEN OTHERS THEN
2748: --ROLLBACK TO OraPmtReturn_PUB;
2746: );
2747: WHEN OTHERS THEN
2748: --ROLLBACK TO OraPmtReturn_PUB;
2749: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2750: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2751: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
2752: END IF;
2753:
2754: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2747: WHEN OTHERS THEN
2748: --ROLLBACK TO OraPmtReturn_PUB;
2749: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2750: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2751: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
2752: END IF;
2753:
2754: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2755: p_data => x_msg_data
2750: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2751: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
2752: END IF;
2753:
2754: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2755: p_data => x_msg_data
2756: );
2757:
2758: END OraPmtReturn;
2832: l_api_name,
2833: G_PKG_NAME )
2834: THEN
2835: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
2836: FND_MSG_PUB.Add;
2837: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2838: END IF;
2839:
2840: -- Initialize message list if p_init_msg_list is set to TRUE.
2838: END IF;
2839:
2840: -- Initialize message list if p_init_msg_list is set to TRUE.
2841: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2842: FND_MSG_PUB.initialize;
2843: END IF;
2844:
2845: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
2846: IF (p_validation_level <> g_validation_level) THEN
2844:
2845: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
2846: IF (p_validation_level <> g_validation_level) THEN
2847: FND_MESSAGE.SET_NAME('IBY', 'IBY_204401_VAL_LEVEL_ERROR');
2848: FND_MSG_PUB.Add;
2849: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2850: END IF;
2851:
2852: -- Initialize API return status to success
2914:
2915: --Raising Exception to handle errors in unpacking resulting html file.
2916: IF (l_status = -1) THEN
2917: FND_MESSAGE.SET_NAME('IBY', 'IBY_204403_HTML_UNPACK_ERROR');
2918: FND_MSG_PUB.Add;
2919: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2920: END IF;
2921:
2922: --Raising Exception to handle Servlet related errors.
2921:
2922: --Raising Exception to handle Servlet related errors.
2923: IF (l_names.COUNT = 0) THEN
2924: FND_MESSAGE.SET_NAME('IBY', 'IBY_204402_JSERVLET_ERROR');
2925: FND_MSG_PUB.Add;
2926: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2927: END IF;
2928:
2929: --dbms_output.put_line('after successful unpacking');
2999: END IF;
3000: */
3001:
3002: -- Standard call to get message count and if count is 1, get message info.
3003: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3004: p_data => x_msg_data
3005: );
3006: EXCEPTION
3007: WHEN FND_API.G_EXC_ERROR THEN
3006: EXCEPTION
3007: WHEN FND_API.G_EXC_ERROR THEN
3008: --ROLLBACK TO OraPmtVoid_PUB;
3009: x_return_status := FND_API.G_RET_STS_ERROR ;
3010: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3011: p_data => x_msg_data
3012: );
3013: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3014: --ROLLBACK TO OraPmtVoid_PUB;
3012: );
3013: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3014: --ROLLBACK TO OraPmtVoid_PUB;
3015: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3016: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3017: p_data => x_msg_data
3018: );
3019: WHEN OTHERS THEN
3020: --ROLLBACK TO OraPmtVoid_PUB;
3018: );
3019: WHEN OTHERS THEN
3020: --ROLLBACK TO OraPmtVoid_PUB;
3021: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3022: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3023: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
3024: END IF;
3025:
3026: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3019: WHEN OTHERS THEN
3020: --ROLLBACK TO OraPmtVoid_PUB;
3021: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3022: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3023: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
3024: END IF;
3025:
3026: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3027: p_data => x_msg_data
3022: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3023: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
3024: END IF;
3025:
3026: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3027: p_data => x_msg_data
3028: );
3029:
3030: END OraPmtVoid;
3111: l_api_name,
3112: G_PKG_NAME )
3113: THEN
3114: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
3115: FND_MSG_PUB.Add;
3116: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3117: END IF;
3118:
3119: -- Initialize message list if p_init_msg_list is set to TRUE.
3117: END IF;
3118:
3119: -- Initialize message list if p_init_msg_list is set to TRUE.
3120: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3121: FND_MSG_PUB.initialize;
3122: END IF;
3123:
3124: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
3125: IF (p_validation_level <> g_validation_level) THEN
3123:
3124: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
3125: IF (p_validation_level <> g_validation_level) THEN
3126: FND_MESSAGE.SET_NAME('IBY', 'IBY_204401_VAL_LEVEL_ERROR');
3127: FND_MSG_PUB.Add;
3128: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3129: END IF;
3130:
3131: -- Initialize API return status to success
3227:
3228: --Raising Exception to handle errors in unpacking resulting html file.
3229: IF (l_status = -1) THEN
3230: FND_MESSAGE.SET_NAME('IBY', 'IBY_204403_HTML_UNPACK_ERROR');
3231: FND_MSG_PUB.Add;
3232: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3233: END IF;
3234:
3235: --Raising Exception to handle Servlet related errors.
3234:
3235: --Raising Exception to handle Servlet related errors.
3236: IF (l_names.COUNT = 0) THEN
3237: FND_MESSAGE.SET_NAME('IBY', 'IBY_204402_JSERVLET_ERROR');
3238: FND_MSG_PUB.Add;
3239: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3240: END IF;
3241:
3242: --show_table_debug(l_names);
3296: END IF;
3297: */
3298:
3299: -- Standard call to get message count and if count is 1, get message info.
3300: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3301: p_data => x_msg_data
3302: );
3303: EXCEPTION
3304: WHEN FND_API.G_EXC_ERROR THEN
3303: EXCEPTION
3304: WHEN FND_API.G_EXC_ERROR THEN
3305: --ROLLBACK TO OraPmtCredit_PUB;
3306: x_return_status := FND_API.G_RET_STS_ERROR ;
3307: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3308: p_data => x_msg_data
3309: );
3310: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3311: --ROLLBACK TO OraPmtCredit_PUB;
3309: );
3310: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3311: --ROLLBACK TO OraPmtCredit_PUB;
3312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3313: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3314: p_data => x_msg_data
3315: );
3316: WHEN OTHERS THEN
3317: --ROLLBACK TO OraPmtCredit_PUB;
3315: );
3316: WHEN OTHERS THEN
3317: --ROLLBACK TO OraPmtCredit_PUB;
3318: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3319: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3320: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
3321: END IF;
3322:
3323: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3316: WHEN OTHERS THEN
3317: --ROLLBACK TO OraPmtCredit_PUB;
3318: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3319: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3320: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
3321: END IF;
3322:
3323: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3324: p_data => x_msg_data
3319: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3320: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
3321: END IF;
3322:
3323: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3324: p_data => x_msg_data
3325: );
3326:
3327: END OraPmtCredit;
3400: l_api_name,
3401: G_PKG_NAME )
3402: THEN
3403: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
3404: FND_MSG_PUB.Add;
3405: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3406: END IF;
3407:
3408: -- Initialize message list if p_init_msg_list is set to TRUE.
3406: END IF;
3407:
3408: -- Initialize message list if p_init_msg_list is set to TRUE.
3409: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3410: FND_MSG_PUB.initialize;
3411: END IF;
3412:
3413: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
3414: IF (p_validation_level <> g_validation_level) THEN
3412:
3413: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
3414: IF (p_validation_level <> g_validation_level) THEN
3415: FND_MESSAGE.SET_NAME('IBY', 'IBY_204401_VAL_LEVEL_ERROR');
3416: FND_MSG_PUB.Add;
3417: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3418: END IF;
3419:
3420: -- Initialize API return status to success
3441: -- NOTE: Response.ErrCode, Response.ErrMessage are not populated
3442: -- since that would imply hardcoding the message text here (NLS issues)
3443: -- Instead it is sent to the API message list.
3444: FND_MESSAGE.SET_NAME('IBY', 'IBY_204404_CURSOR_ERROR');
3445: FND_MSG_PUB.Add;
3446: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3447: END IF;
3448:
3449: CLOSE pmtinq_csr;
3461: END IF;
3462: */
3463:
3464: -- Standard call to get message count and if count is 1, get message info.
3465: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3466: p_data => x_msg_data
3467: );
3468: EXCEPTION
3469: WHEN FND_API.G_EXC_ERROR THEN
3468: EXCEPTION
3469: WHEN FND_API.G_EXC_ERROR THEN
3470: --ROLLBACK TO OraPmtInq_PUB;
3471: x_return_status := FND_API.G_RET_STS_ERROR ;
3472: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3473: p_data => x_msg_data
3474: );
3475: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3476: --ROLLBACK TO OraPmtInq_PUB;
3474: );
3475: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3476: --ROLLBACK TO OraPmtInq_PUB;
3477: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3478: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3479: p_data => x_msg_data
3480: );
3481: WHEN OTHERS THEN
3482: --ROLLBACK TO OraPmtInq_PUB;
3480: );
3481: WHEN OTHERS THEN
3482: --ROLLBACK TO OraPmtInq_PUB;
3483: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3484: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3485: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
3486: END IF;
3487:
3488: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3481: WHEN OTHERS THEN
3482: --ROLLBACK TO OraPmtInq_PUB;
3483: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3484: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3485: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
3486: END IF;
3487:
3488: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3489: p_data => x_msg_data
3484: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3485: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
3486: END IF;
3487:
3488: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3489: p_data => x_msg_data
3490: );
3491:
3492: END OraPmtInq;
3571: l_api_name,
3572: G_PKG_NAME )
3573: THEN
3574: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
3575: FND_MSG_PUB.Add;
3576: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3577: END IF;
3578:
3579: -- Initialize message list if p_init_msg_list is set to TRUE.
3577: END IF;
3578:
3579: -- Initialize message list if p_init_msg_list is set to TRUE.
3580: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3581: FND_MSG_PUB.initialize;
3582: END IF;
3583:
3584: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
3585: IF (p_validation_level <> g_validation_level) THEN
3583:
3584: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
3585: IF (p_validation_level <> g_validation_level) THEN
3586: FND_MESSAGE.SET_NAME('IBY', 'IBY_204401_VAL_LEVEL_ERROR');
3587: FND_MSG_PUB.Add;
3588: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3589: END IF;
3590:
3591:
3661:
3662: --Raising Exception to handle errors in unpacking resulting html file.
3663: IF (l_status = -1) THEN
3664: FND_MESSAGE.SET_NAME('IBY', 'IBY_204403_HTML_UNPACK_ERROR');
3665: FND_MSG_PUB.Add;
3666: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3667: END IF;
3668:
3669: --Raising Exception to handle Servlet related errors.
3668:
3669: --Raising Exception to handle Servlet related errors.
3670: IF (l_names.COUNT = 0) THEN
3671: FND_MESSAGE.SET_NAME('IBY', 'IBY_204402_JSERVLET_ERROR');
3672: FND_MSG_PUB.Add;
3673: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3674: END IF;
3675:
3676: --show_table_debug(l_names);
3776: END IF;
3777: */
3778:
3779: -- Standard call to get message count and if count is 1, get message info.
3780: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3781: p_data => x_msg_data
3782: );
3783: EXCEPTION
3784: WHEN FND_API.G_EXC_ERROR THEN
3783: EXCEPTION
3784: WHEN FND_API.G_EXC_ERROR THEN
3785: --ROLLBACK TO OraPmtCloseBatch_PUB;
3786: x_return_status := FND_API.G_RET_STS_ERROR ;
3787: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3788: p_data => x_msg_data
3789: );
3790: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3791: --ROLLBACK TO OraPmtCloseBatch_PUB;
3789: );
3790: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3791: --ROLLBACK TO OraPmtCloseBatch_PUB;
3792: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3793: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3794: p_data => x_msg_data
3795: );
3796: WHEN OTHERS THEN
3797: --ROLLBACK TO OraPmtCloseBatch_PUB;
3795: );
3796: WHEN OTHERS THEN
3797: --ROLLBACK TO OraPmtCloseBatch_PUB;
3798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3799: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3800: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
3801: END IF;
3802:
3803: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3796: WHEN OTHERS THEN
3797: --ROLLBACK TO OraPmtCloseBatch_PUB;
3798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3799: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3800: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
3801: END IF;
3802:
3803: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3804: p_data => x_msg_data
3799: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3800: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
3801: END IF;
3802:
3803: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3804: p_data => x_msg_data
3805: );
3806:
3807: END OraPmtCloseBatch;
3884: l_api_name,
3885: G_PKG_NAME )
3886: THEN
3887: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
3888: FND_MSG_PUB.Add;
3889: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3890: END IF;
3891:
3892: -- Initialize message list if p_init_msg_list is set to TRUE.
3890: END IF;
3891:
3892: -- Initialize message list if p_init_msg_list is set to TRUE.
3893: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3894: FND_MSG_PUB.initialize;
3895: END IF;
3896:
3897: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
3898: IF (p_validation_level <> g_validation_level) THEN
3896:
3897: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
3898: IF (p_validation_level <> g_validation_level) THEN
3899: FND_MESSAGE.SET_NAME('IBY', 'IBY_204401_VAL_LEVEL_ERROR');
3900: FND_MSG_PUB.Add;
3901: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3902: END IF;
3903:
3904: -- Initialize API return status to success
3963:
3964: --Raising Exception to handle errors in unpacking resulting html file.
3965: IF (l_status = -1) THEN
3966: FND_MESSAGE.SET_NAME('IBY', 'IBY_204403_HTML_UNPACK_ERROR');
3967: FND_MSG_PUB.Add;
3968: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3969: END IF;
3970:
3971: --Raising Exception to handle Servlet related errors.
3970:
3971: --Raising Exception to handle Servlet related errors.
3972: IF (l_names.COUNT = 0) THEN
3973: FND_MESSAGE.SET_NAME('IBY', 'IBY_204402_JSERVLET_ERROR');
3974: FND_MSG_PUB.Add;
3975: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3976: END IF;
3977:
3978: --show_table_debug(l_names);
4072: END IF;
4073: */
4074:
4075: -- Standard call to get message count and if count is 1, get message info.
4076: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4077: p_data => x_msg_data
4078: );
4079: EXCEPTION
4080: WHEN FND_API.G_EXC_ERROR THEN
4079: EXCEPTION
4080: WHEN FND_API.G_EXC_ERROR THEN
4081: --ROLLBACK TO OraPmtQueryBatch_PUB;
4082: x_return_status := FND_API.G_RET_STS_ERROR ;
4083: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4084: p_data => x_msg_data
4085: );
4086: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4087: --ROLLBACK TO OraPmtQueryBatch_PUB;
4085: );
4086: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4087: --ROLLBACK TO OraPmtQueryBatch_PUB;
4088: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4089: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4090: p_data => x_msg_data
4091: );
4092: WHEN OTHERS THEN
4093: --ROLLBACK TO OraPmtQueryBatch_PUB;
4091: );
4092: WHEN OTHERS THEN
4093: --ROLLBACK TO OraPmtQueryBatch_PUB;
4094: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4095: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4096: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
4097: END IF;
4098:
4099: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4092: WHEN OTHERS THEN
4093: --ROLLBACK TO OraPmtQueryBatch_PUB;
4094: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4095: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4096: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
4097: END IF;
4098:
4099: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4100: p_data => x_msg_data
4095: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4096: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
4097: END IF;
4098:
4099: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4100: p_data => x_msg_data
4101: );
4102:
4103: END OraPmtQueryBatch;
4241: l_api_name,
4242: G_PKG_NAME )
4243: THEN
4244: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
4245: FND_MSG_PUB.Add;
4246: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4247: END IF;
4248:
4249: -- Initialize message list if p_init_msg_list is set to TRUE.
4247: END IF;
4248:
4249: -- Initialize message list if p_init_msg_list is set to TRUE.
4250: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4251: FND_MSG_PUB.initialize;
4252: END IF;
4253:
4254: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
4255: IF (p_validation_level <> g_validation_level) THEN
4253:
4254: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
4255: IF (p_validation_level <> g_validation_level) THEN
4256: FND_MESSAGE.SET_NAME('IBY', 'IBY_204401_VAL_LEVEL_ERROR');
4257: FND_MSG_PUB.Add;
4258: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4259: END IF;
4260:
4261:
4320:
4321: --Raising Exception to handle errors in unpacking resulting html file.
4322: IF (l_status = -1) THEN
4323: FND_MESSAGE.SET_NAME('IBY', 'IBY_204403_HTML_UNPACK_ERROR');
4324: FND_MSG_PUB.Add;
4325: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4326: END IF;
4327:
4328: --Raising Exception to handle Servlet related errors.
4327:
4328: --Raising Exception to handle Servlet related errors.
4329: IF (l_names.COUNT = 0) THEN
4330: FND_MESSAGE.SET_NAME('IBY', 'IBY_204402_JSERVLET_ERROR');
4331: FND_MSG_PUB.Add;
4332: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4333: END IF;
4334:
4335: FOR i IN 1..l_names.COUNT LOOP
4368: END IF;
4369: */
4370:
4371: -- Standard call to get message count and if count is 1, get message info.
4372: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4373: p_data => x_msg_data
4374: );
4375: EXCEPTION
4376:
4376:
4377: WHEN FND_API.G_EXC_ERROR THEN
4378: --ROLLBACK TO OraRiskEval_PUB;
4379: x_return_status := FND_API.G_RET_STS_ERROR ;
4380: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4381: p_data => x_msg_data
4382: );
4383: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4384: --ROLLBACK TO OraRiskEval_PUB;
4382: );
4383: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4384: --ROLLBACK TO OraRiskEval_PUB;
4385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4386: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4387: p_data => x_msg_data
4388: );
4389:
4390: WHEN OTHERS THEN
4389:
4390: WHEN OTHERS THEN
4391: --ROLLBACK TO OraRiskEval_PUB;
4392: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4393: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4394: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
4395: END IF;
4396:
4397: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4390: WHEN OTHERS THEN
4391: --ROLLBACK TO OraRiskEval_PUB;
4392: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4393: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4394: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
4395: END IF;
4396:
4397: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4398: p_data => x_msg_data
4393: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4394: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
4395: END IF;
4396:
4397: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4398: p_data => x_msg_data
4399: );
4400:
4401:
4477: l_api_name,
4478: G_PKG_NAME )
4479: THEN
4480: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
4481: FND_MSG_PUB.Add;
4482: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4483: END IF;
4484:
4485: -- Initialize message list if p_init_msg_list is set to TRUE.
4483: END IF;
4484:
4485: -- Initialize message list if p_init_msg_list is set to TRUE.
4486: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4487: FND_MSG_PUB.initialize;
4488: END IF;
4489:
4490: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
4491: IF (p_validation_level <> g_validation_level) THEN
4489:
4490: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
4491: IF (p_validation_level <> g_validation_level) THEN
4492: FND_MESSAGE.SET_NAME('IBY', 'IBY_204401_VAL_LEVEL_ERROR');
4493: FND_MSG_PUB.Add;
4494: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4495: END IF;
4496:
4497:
4546:
4547: --Raising Exception to handle errors in unpacking resulting html file.
4548: IF (l_status = -1) THEN
4549: FND_MESSAGE.SET_NAME('IBY', 'IBY_204403_HTML_UNPACK_ERROR');
4550: FND_MSG_PUB.Add;
4551: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4552: END IF;
4553:
4554: --Raising Exception to handle Servlet related errors.
4553:
4554: --Raising Exception to handle Servlet related errors.
4555: IF (l_names.COUNT = 0) THEN
4556: FND_MESSAGE.SET_NAME('IBY', 'IBY_204402_JSERVLET_ERROR');
4557: FND_MSG_PUB.Add;
4558: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4559: END IF;
4560:
4561: FOR i IN 1..l_names.COUNT LOOP
4595: END IF;
4596: */
4597:
4598: -- Standard call to get message count and if count is 1, get message info.
4599: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4600: p_data => x_msg_data
4601: );
4602: EXCEPTION
4603:
4604:
4605: WHEN FND_API.G_EXC_ERROR THEN
4606: --ROLLBACK TO OraRiskEval_PUB;
4607: x_return_status := FND_API.G_RET_STS_ERROR ;
4608: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4609: p_data => x_msg_data
4610: );
4611: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4612: --ROLLBACK TO OraRiskEval_PUB;
4610: );
4611: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4612: --ROLLBACK TO OraRiskEval_PUB;
4613: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4614: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4615: p_data => x_msg_data
4616: );
4617:
4618: WHEN OTHERS THEN
4617:
4618: WHEN OTHERS THEN
4619: --ROLLBACK TO OraRiskEval_PUB;
4620: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4621: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4622: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name, SQLCODE||':'||SQLERRM);
4623: END IF;
4624:
4625: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4618: WHEN OTHERS THEN
4619: --ROLLBACK TO OraRiskEval_PUB;
4620: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4621: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4622: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name, SQLCODE||':'||SQLERRM);
4623: END IF;
4624:
4625: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4626: p_data => x_msg_data
4621: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4622: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name, SQLCODE||':'||SQLERRM);
4623: END IF;
4624:
4625: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
4626: p_data => x_msg_data
4627: );
4628:
4629:
4719: l_api_name,
4720: G_PKG_NAME )
4721: THEN
4722: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
4723: FND_MSG_PUB.Add;
4724: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4725: END IF;
4726:
4727: -- Initialize message list if p_init_msg_list is set to TRUE.
4725: END IF;
4726:
4727: -- Initialize message list if p_init_msg_list is set to TRUE.
4728: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4729: FND_MSG_PUB.initialize;
4730: END IF;
4731:
4732: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
4733: IF (p_validation_level <> g_validation_level) THEN
4731:
4732: -- Verifying if validation level is FULL, which is expected for PUBLIC APIs.
4733: IF (p_validation_level <> g_validation_level) THEN
4734: FND_MESSAGE.SET_NAME('IBY', 'IBY_204401_VAL_LEVEL_ERROR');
4735: FND_MSG_PUB.Add;
4736: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4737: END IF;
4738:
4739: iby_debug_pub.add('Batch size = ' || p_capturetrxn_rec_tbl.count,
4743: -- Verifying if the batch size exceeded max.
4744: -- The batch size has exceeded the max limit size.
4745: IF (p_capturetrxn_rec_tbl.count > C_MAX_CC_BATCH_SIZE) THEN
4746: FND_MESSAGE.SET_NAME('IBY', 'IBY_204407_VAL_ERROR');
4747: FND_MSG_PUB.Add;
4748: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4749: END IF;
4750:
4751: -- Initialize API return status to success
4924: FND_LOG.LEVEL_UNEXPECTED,
4925: G_DEBUG_MODULE || '.OraCCBatchCapture');
4926:
4927: FND_MESSAGE.SET_NAME('IBY', 'IBY_204403_HTML_UNPACK_ERROR');
4928: FND_MSG_PUB.Add;
4929: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4930: END IF;
4931:
4932: --Raising Exception to handle Servlet related errors.
4936: FND_LOG.LEVEL_UNEXPECTED,
4937: G_DEBUG_MODULE || '.OraCCBatchCapture');
4938:
4939: FND_MESSAGE.SET_NAME('IBY', 'IBY_204402_JSERVLET_ERROR');
4940: FND_MSG_PUB.Add;
4941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4942: END IF;
4943: -- Assign output parameters to output record x_capresp_rec_tbl
4944: FOR i IN 1..l_names.COUNT LOOP
5028: -- if the batch failed an error message should have been
5029: -- returned
5030: --
5031: IF (NOT l_batch_msg IS NULL) THEN
5032: --FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name,l_batch_msg);
5033: --
5034: -- setting dummy message so that the results
5035: -- from the EC Servlet/Java engine can be returned
5036: -- verbatim
5036: -- verbatim
5037: --
5038: FND_MESSAGE.SET_NAME('IBY', 'IBY_9999');
5039: FND_MESSAGE.SET_TOKEN('MESSAGE_TEXT', l_batch_msg);
5040: FND_MSG_PUB.ADD;
5041: ELSE
5042: -- no error message; assuming a complete communication
5043: -- failure where the iPayment URL is bad but the webserver
5044: -- is up and returns a parseable error page
5043: -- failure where the iPayment URL is bad but the webserver
5044: -- is up and returns a parseable error page
5045: --
5046: FND_MESSAGE.SET_NAME('IBY', 'IBY_0001');
5047: FND_MSG_PUB.Add;
5048: END IF;
5049:
5050: END IF;
5051:
5050: END IF;
5051:
5052:
5053: -- Standard call to get message count and if count is 1, get message info.
5054: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
5055: p_data => x_msg_data
5056: );
5057:
5058: iby_debug_pub.add('Exit',
5066: FND_LOG.LEVEL_ERROR,
5067: G_DEBUG_MODULE || '.OraCCBatchCapture');
5068: --ROLLBACK TO OraCCBatchCapture_PUB;
5069: x_return_status := FND_API.G_RET_STS_ERROR ;
5070: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
5071: p_data => x_msg_data
5072: );
5073: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5074:
5076: FND_LOG.LEVEL_UNEXPECTED,
5077: G_DEBUG_MODULE || '.OraCCBatchCapture');
5078: --ROLLBACK TO OraCCBatchCapture_PUB;
5079: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5080: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
5081: p_data => x_msg_data
5082: );
5083: WHEN OTHERS THEN
5084:
5092: FND_LOG.LEVEL_UNEXPECTED,
5093: G_DEBUG_MODULE || '.OraCCBatchCapture');
5094:
5095: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5096: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5097: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name, SQLCODE||':'||SQLERRM);
5098: END IF;
5099:
5100: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
5093: G_DEBUG_MODULE || '.OraCCBatchCapture');
5094:
5095: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5096: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5097: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name, SQLCODE||':'||SQLERRM);
5098: END IF;
5099:
5100: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
5101: p_data => x_msg_data
5096: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5097: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name, SQLCODE||':'||SQLERRM);
5098: END IF;
5099:
5100: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
5101: p_data => x_msg_data
5102: );
5103:
5104:
5205: iby_debug_pub.add(debug_msg => 'Unpack status error; HTML resp. invalid!',
5206: debug_level => FND_LOG.LEVEL_UNEXPECTED,
5207: module => G_DEBUG_MODULE || '.OraSecureExtension');
5208: FND_MESSAGE.SET_NAME('IBY', 'IBY_204403_HTML_UNPACK_ERROR');
5209: FND_MSG_PUB.Add;
5210: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5211: END IF;
5212:
5213: --Raising Exception to handle Servlet related errors.
5216: iby_debug_pub.add(debug_msg => 'HTML response names count=0',
5217: debug_level => FND_LOG.LEVEL_UNEXPECTED,
5218: module => G_DEBUG_MODULE || '.OraSecureExtension');
5219: FND_MESSAGE.SET_NAME('IBY', 'IBY_204402_JSERVLET_ERROR');
5220: FND_MSG_PUB.Add;
5221: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5222: END IF;
5223:
5224: /* Retrieve name-value pairs stored in l_names and l_values, and assign
5271: END IF;
5272: */
5273:
5274: -- Standard call to get message count and if count is 1, get message info.
5275: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
5276: p_data => x_msg_data
5277: );
5278:
5279: IF (NOT trxn_status_success(x_resp_rec.Response.Status)) THEN
5300: debug_level => FND_LOG.LEVEL_ERROR,
5301: module => G_DEBUG_MODULE || '.OraSecureExtension');
5302: --ROLLBACK TO OraPmtReq_PUB;
5303: x_return_status := FND_API.G_RET_STS_ERROR ;
5304: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
5305: p_data => x_msg_data
5306: );
5307: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5308:
5310: debug_level => FND_LOG.LEVEL_UNEXPECTED,
5311: module => G_DEBUG_MODULE || '.OraSecureExtension');
5312: --ROLLBACK TO OraPmtReq_PUB;
5313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5314: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
5315: p_data => x_msg_data
5316: );
5317: WHEN OTHERS THEN
5318:
5319: iby_debug_pub.add(debug_msg => 'In OTHERS Exception',
5320: debug_level => FND_LOG.LEVEL_UNEXPECTED,
5321: module => G_DEBUG_MODULE || '.OraSecureExtension');
5322: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5323: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5324: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
5325: END IF;
5326:
5327: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
5320: debug_level => FND_LOG.LEVEL_UNEXPECTED,
5321: module => G_DEBUG_MODULE || '.OraSecureExtension');
5322: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5323: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5324: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
5325: END IF;
5326:
5327: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
5328: p_data => x_msg_data
5323: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5324: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
5325: END IF;
5326:
5327: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
5328: p_data => x_msg_data
5329: );
5330:
5331: iby_debug_pub.add(debug_msg => 'x_return_status=' || x_return_status,