995:
996: EXCEPTION
997: WHEN FND_API.g_exc_error THEN
998: x_return_status := FND_API.g_ret_sts_error;
999: FND_MSG_PUB.count_and_get (
1000: p_encoded => FND_API.g_false
1001: ,p_count => x_msg_count
1002: ,p_data => x_msg_data
1003: );
1002: ,p_data => x_msg_data
1003: );
1004:
1005: -- Debug Message
1006: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1007: hz_utility_v2pub.debug_return_messages (
1008: x_msg_count, x_msg_data, 'ERROR');
1009: hz_utility_v2pub.debug('Create_Channel_Team (-)');
1010: END IF;
1010: END IF;
1011:
1012: WHEN FND_API.g_exc_unexpected_error THEN
1013: x_return_status := FND_API.g_ret_sts_unexp_error ;
1014: FND_MSG_PUB.count_and_get (
1015: p_encoded => FND_API.g_false
1016: ,p_count => x_msg_count
1017: ,p_data => x_msg_data
1018: );
1016: ,p_count => x_msg_count
1017: ,p_data => x_msg_data
1018: );
1019: -- Debug Message
1020: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1021: hz_utility_v2pub.debug_return_messages (
1022: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
1023: hz_utility_v2pub.debug('Create_Channel_Team (-)');
1024: END IF;
1025:
1026: WHEN OTHERS THEN
1027: x_return_status := FND_API.g_ret_sts_unexp_error ;
1028:
1029: FND_MSG_PUB.count_and_get(
1030: p_encoded => FND_API.g_false
1031: ,p_count => x_msg_count
1032: ,p_data => x_msg_data
1033: );
1032: ,p_data => x_msg_data
1033: );
1034:
1035: -- Debug Message
1036: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1037: hz_utility_v2pub.debug_return_messages (
1038: x_msg_count, x_msg_data, 'SQL ERROR');
1039: hz_utility_v2pub.debug('Create_Channel_Team (-)');
1040: END IF;
1109: l_res_created_flg := 'N';
1110: l_cm_added := 'N';
1111: l_user_exists := 'N';
1112:
1113: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1114: PVX_Utility_PVT.debug_message('Procedure : Cr_Login_User_Access_Rec Start');
1115: END IF;
1116:
1117: OPEN l_get_resource_id_csr(p_login_user_id) ;
1162: ELSE
1163: CLOSE l_get_resource_id_csr;
1164: END IF; /* (l_get_resource_id_csr%FOUND) */
1165:
1166: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1167: PVX_Utility_PVT.debug_message('Procedure : Cr_Login_User_Access_Rec End');
1168: END IF;
1169:
1170: EXCEPTION
1169:
1170: EXCEPTION
1171: WHEN FND_API.g_exc_error THEN
1172: x_return_status := FND_API.g_ret_sts_error;
1173: FND_MSG_PUB.count_and_get (
1174: p_encoded => FND_API.g_false
1175: ,p_count => x_msg_count
1176: ,p_data => x_msg_data
1177: );
1176: ,p_data => x_msg_data
1177: );
1178:
1179: -- Debug Message
1180: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1181: hz_utility_v2pub.debug_return_messages (
1182: x_msg_count, x_msg_data, 'ERROR');
1183: hz_utility_v2pub.debug('Cr_Login_User_Access_Rec(-)');
1184: END IF;
1184: END IF;
1185:
1186: WHEN FND_API.g_exc_unexpected_error THEN
1187: x_return_status := FND_API.g_ret_sts_unexp_error ;
1188: FND_MSG_PUB.count_and_get (
1189: p_encoded => FND_API.g_false
1190: ,p_count => x_msg_count
1191: ,p_data => x_msg_data
1192: );
1190: ,p_count => x_msg_count
1191: ,p_data => x_msg_data
1192: );
1193: -- Debug Message
1194: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1195: hz_utility_v2pub.debug_return_messages (
1196: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
1197: hz_utility_v2pub.debug('Cr_Login_User_Access_Rec(-)');
1198: END IF;
1199:
1200: WHEN OTHERS THEN
1201: x_return_status := FND_API.g_ret_sts_unexp_error ;
1202:
1203: FND_MSG_PUB.count_and_get(
1204: p_encoded => FND_API.g_false
1205: ,p_count => x_msg_count
1206: ,p_data => x_msg_data
1207: );
1206: ,p_data => x_msg_data
1207: );
1208:
1209: -- Debug Message
1210: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1211: hz_utility_v2pub.debug_return_messages (
1212: x_msg_count, x_msg_data, 'SQL ERROR');
1213: hz_utility_v2pub.debug('Cr_Login_User_Access_Rec(-)');
1214: END IF;
1264: l_curr_code VARCHAR2(30):= null;
1265:
1266: BEGIN
1267: -- Debug Message
1268: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1269: PVX_Utility_PVT.debug_message('Procedure TAP_Get_Channel_Managers Start.');
1270: END IF;
1271:
1272: -- Initialize API return status to SUCCESS
1272: -- Initialize API return status to SUCCESS
1273: x_return_status := FND_API.G_RET_STS_SUCCESS;
1274:
1275: -- Initialize message list.
1276: FND_MSG_PUB.initialize;
1277:
1278: -- bulk_trans_rec_type instantiation
1279: -- logic control properties
1280: l_gen_bulk_rec.trans_object_id := JTF_TERR_NUMBER_LIST(null);
1375: CLOSE l_get_Currency;
1376:
1377: l_gen_bulk_rec.SQUAL_CURC01(1) := l_curr_code;
1378:
1379: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
1380: PVX_UTILITY_PVT.debug_message('Partner Details - Partner Type:'||p_prtnr_qualifier_rec.partner_type);
1381: PVX_UTILITY_PVT.debug_message('party_id = ' || to_char(p_prtnr_qualifier_rec.party_id));
1382: PVX_UTILITY_PVT.debug_message('prtnr name Range= ' || p_prtnr_qualifier_rec.partner_name);
1383: PVX_UTILITY_PVT.debug_message('city = ' || p_prtnr_qualifier_rec.city);
1416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1417: END IF;
1418: END IF;
1419:
1420: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
1421: IF (l_winners_rec.resource_id.count > 0 ) THEN
1422: FOR k IN 1..l_winners_rec.resource_id.last
1423: LOOP
1424: PVX_UTILITY_PVT.debug_message('Resource Id = '||to_char(l_winners_rec.resource_id(k)));
1432:
1433: EXCEPTION
1434: WHEN FND_API.g_exc_error THEN
1435: x_return_status := FND_API.g_ret_sts_error;
1436: FND_MSG_PUB.count_and_get (
1437: p_encoded => FND_API.g_false
1438: ,p_count => x_msg_count
1439: ,p_data => x_msg_data
1440: );
1439: ,p_data => x_msg_data
1440: );
1441:
1442: -- Debug Message
1443: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1444: hz_utility_v2pub.debug_return_messages (
1445: x_msg_count, x_msg_data, 'ERROR');
1446: hz_utility_v2pub.debug('TAP_Get_Channel_Team(-)');
1447: END IF;
1447: END IF;
1448:
1449: WHEN FND_API.g_exc_unexpected_error THEN
1450: x_return_status := FND_API.g_ret_sts_unexp_error ;
1451: FND_MSG_PUB.count_and_get (
1452: p_encoded => FND_API.g_false
1453: ,p_count => x_msg_count
1454: ,p_data => x_msg_data
1455: );
1453: ,p_count => x_msg_count
1454: ,p_data => x_msg_data
1455: );
1456: -- Debug Message
1457: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1458: hz_utility_v2pub.debug_return_messages (
1459: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
1460: hz_utility_v2pub.debug('TAP_Get_Channel_Team(-)');
1461: END IF;
1462:
1463: WHEN OTHERS THEN
1464: x_return_status := FND_API.g_ret_sts_unexp_error ;
1465:
1466: FND_MSG_PUB.count_and_get(
1467: p_encoded => FND_API.g_false
1468: ,p_count => x_msg_count
1469: ,p_data => x_msg_data
1470: );
1469: ,p_data => x_msg_data
1470: );
1471:
1472: -- Debug Message
1473: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1474: hz_utility_v2pub.debug_return_messages (
1475: x_msg_count, x_msg_data, 'SQL ERROR');
1476: hz_utility_v2pub.debug('TAP_Get_Channel_Team(-)');
1477: END IF;
1555:
1556: BEGIN
1557: --------------- INSERTION OF THE LOGIC BEGIN ---------------------------
1558: -- Debug Message
1559: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1560: PVX_Utility_PVT.debug_message('Procedure Process_TAP_Resources Start.');
1561: END IF;
1562:
1563: -- Initialize the return status
1719: x_prtnr_access_id_tbl(l_resource_cnt).partner_access_id := l_partner_access_id;
1720: ELSIF (l_res_created_flg = 'E') THEN
1721: -- Raise and Error that a VAD cannot create another VAD partner_type
1722: -- fnd_message.Set_Name('PV', 'PV_VAD_CANNOT_CREATE_VAD_PTYPE');
1723: -- fnd_msg_pub.Add;
1724: RAISE FND_API.G_EXC_ERROR;
1725: END IF; /* l_resource_create_flg = 'E' */
1726: ELSE
1727: CLOSE l_get_res_category;
1732:
1733: EXCEPTION
1734: WHEN FND_API.g_exc_error THEN
1735: x_return_status := FND_API.g_ret_sts_error;
1736: FND_MSG_PUB.count_and_get (
1737: p_encoded => FND_API.g_false
1738: ,p_count => x_msg_count
1739: ,p_data => x_msg_data
1740: );
1739: ,p_data => x_msg_data
1740: );
1741:
1742: -- Debug Message
1743: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1744: hz_utility_v2pub.debug_return_messages (
1745: x_msg_count, x_msg_data, 'ERROR');
1746: hz_utility_v2pub.debug('Process_TAP_Resources (-)');
1747: END IF;
1747: END IF;
1748:
1749: WHEN FND_API.g_exc_unexpected_error THEN
1750: x_return_status := FND_API.g_ret_sts_unexp_error ;
1751: FND_MSG_PUB.count_and_get (
1752: p_encoded => FND_API.g_false
1753: ,p_count => x_msg_count
1754: ,p_data => x_msg_data
1755: );
1754: ,p_data => x_msg_data
1755: );
1756:
1757: -- Debug Message
1758: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1759: hz_utility_v2pub.debug_return_messages (
1760: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
1761: hz_utility_v2pub.debug('Process_TAP_Resources (-)');
1762: END IF;
1763:
1764: WHEN OTHERS THEN
1765: x_return_status := FND_API.g_ret_sts_unexp_error ;
1766:
1767: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1768: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1769: END IF;
1770:
1771: FND_MSG_PUB.count_and_get(
1764: WHEN OTHERS THEN
1765: x_return_status := FND_API.g_ret_sts_unexp_error ;
1766:
1767: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1768: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1769: END IF;
1770:
1771: FND_MSG_PUB.count_and_get(
1772: p_encoded => FND_API.g_false
1767: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1768: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1769: END IF;
1770:
1771: FND_MSG_PUB.count_and_get(
1772: p_encoded => FND_API.g_false
1773: ,p_count => x_msg_count
1774: ,p_data => x_msg_data
1775: );
1774: ,p_data => x_msg_data
1775: );
1776:
1777: -- Debug Message
1778: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1779: hz_utility_v2pub.debug_return_messages (
1780: x_msg_count, x_msg_data, 'SQL ERROR');
1781: hz_utility_v2pub.debug('Process_TAP_Resources (-)');
1782: END IF;
1929: CLOSE l_partner_details_csr;
1930:
1931: IF ( rec_index = 0 ) THEN
1932: fnd_message.Set_Name('PV', 'PV_API_NO_PARTNER_PARTY_ID');
1933: fnd_msg_pub.Add;
1934: RAISE FND_API.G_EXC_ERROR;
1935: END IF;
1936:
1937: -- Debug Message
1934: RAISE FND_API.G_EXC_ERROR;
1935: END IF;
1936:
1937: -- Debug Message
1938: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1939: PVX_Utility_PVT.debug_message('After successfully getting the Partner Details ***************');
1940: END IF;
1941:
1942: -- Store in the output variable.
1942: -- Store in the output variable.
1943: x_partner_qualifiers_tbl := l_partner_qualifiers_tbl;
1944:
1945: -- Standard call to get message count and if count is 1, get message info.
1946: FND_MSG_PUB.Count_And_Get
1947: (p_count => x_msg_count,
1948: p_data => x_msg_data
1949: );
1950:
1954: IF l_partner_details_csr%ISOPEN THEN
1955: CLOSE l_partner_details_csr;
1956: END IF;
1957:
1958: FND_MSG_PUB.count_and_get (
1959: p_encoded => FND_API.g_false
1960: ,p_count => x_msg_count
1961: ,p_data => x_msg_data
1962: );
1961: ,p_data => x_msg_data
1962: );
1963:
1964: -- Debug Message
1965: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1966: hz_utility_v2pub.debug_return_messages (
1967: x_msg_count, x_msg_data, 'ERROR');
1968: hz_utility_v2pub.debug('get_partner_details (-)');
1969: END IF;
1972: x_return_status := FND_API.g_ret_sts_unexp_error ;
1973: IF l_partner_details_csr%ISOPEN THEN
1974: CLOSE l_partner_details_csr;
1975: END IF;
1976: FND_MSG_PUB.count_and_get (
1977: p_encoded => FND_API.g_false
1978: ,p_count => x_msg_count
1979: ,p_data => x_msg_data
1980: );
1978: ,p_count => x_msg_count
1979: ,p_data => x_msg_data
1980: );
1981: -- Debug Message
1982: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1983: hz_utility_v2pub.debug_return_messages (
1984: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
1985: hz_utility_v2pub.debug('get_partner_details (-)');
1986: END IF;
1991: IF l_partner_details_csr%ISOPEN THEN
1992: CLOSE l_partner_details_csr;
1993: END IF;
1994:
1995: FND_MSG_PUB.count_and_get(
1996: p_encoded => FND_API.g_false
1997: ,p_count => x_msg_count
1998: ,p_data => x_msg_data
1999: );
1998: ,p_data => x_msg_data
1999: );
2000:
2001: -- Debug Message
2002: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2003: hz_utility_v2pub.debug_return_messages (
2004: x_msg_count, x_msg_data, 'SQL ERROR');
2005: hz_utility_v2pub.debug('get_partner_details (-)');
2006: END IF;
2069:
2070: BEGIN
2071:
2072: -- Debug Message
2073: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
2074: PVX_UTILITY_PVT.debug_message('Private Procedure: ' || l_api_name || 'start');
2075: END IF;
2076:
2077: -- Initialize API return status to SUCCESS
2105: RAISE FND_API.G_EXC_ERROR;
2106: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2107: -- FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
2108: -- FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_TAP_ACCESS_TERRS_PVT.Delete_Tap_Access_Terrs');
2109: -- FND_MSG_PUB.Add;
2110: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2111: END IF;
2112: END IF;
2113:
2131: RAISE FND_API.G_EXC_ERROR;
2132: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2133: -- FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
2134: -- FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_Partner_Accesses_PVT.Delete_Partner_Accesses');
2135: -- FND_MSG_PUB.Add;
2136: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2137: END IF;
2138: END IF;
2139: END LOOP; /* FOR l_channel_team_rec IN l_channel_team_csr(p_partner_id) */
2138: END IF;
2139: END LOOP; /* FOR l_channel_team_rec IN l_channel_team_csr(p_partner_id) */
2140:
2141: -- Debug Message
2142: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2143: PVX_UTILITY_PVT.debug_message('Private Procedure: ' || l_api_name || 'end.');
2144: END IF;
2145:
2146: -- Standard call to get message count and if count is 1, get message info.
2143: PVX_UTILITY_PVT.debug_message('Private Procedure: ' || l_api_name || 'end.');
2144: END IF;
2145:
2146: -- Standard call to get message count and if count is 1, get message info.
2147: FND_MSG_PUB.Count_And_Get
2148: (p_count => x_msg_count,
2149: p_data => x_msg_data
2150: );
2151:
2151:
2152: EXCEPTION
2153: WHEN FND_API.g_exc_error THEN
2154: x_return_status := FND_API.g_ret_sts_error;
2155: FND_MSG_PUB.count_and_get (
2156: p_encoded => FND_API.g_false
2157: ,p_count => x_msg_count
2158: ,p_data => x_msg_data
2159: );
2158: ,p_data => x_msg_data
2159: );
2160:
2161: -- Debug Message
2162: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2163: hz_utility_v2pub.debug_return_messages (
2164: x_msg_count, x_msg_data, 'ERROR');
2165: hz_utility_v2pub.debug('Delete_Channel_Team (-)');
2166: END IF;
2166: END IF;
2167:
2168: WHEN FND_API.g_exc_unexpected_error THEN
2169: x_return_status := FND_API.g_ret_sts_unexp_error ;
2170: FND_MSG_PUB.count_and_get (
2171: p_encoded => FND_API.g_false
2172: ,p_count => x_msg_count
2173: ,p_data => x_msg_data
2174: );
2172: ,p_count => x_msg_count
2173: ,p_data => x_msg_data
2174: );
2175: -- Debug Message
2176: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2177: hz_utility_v2pub.debug_return_messages (
2178: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
2179: hz_utility_v2pub.debug('Delete_Channel_Team (-)');
2180: END IF;
2181:
2182: WHEN OTHERS THEN
2183: x_return_status := FND_API.g_ret_sts_unexp_error ;
2184:
2185: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
2186: THEN
2187: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2188: END IF;
2189:
2183: x_return_status := FND_API.g_ret_sts_unexp_error ;
2184:
2185: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
2186: THEN
2187: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2188: END IF;
2189:
2190: FND_MSG_PUB.count_and_get(
2191: p_encoded => FND_API.g_false
2186: THEN
2187: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2188: END IF;
2189:
2190: FND_MSG_PUB.count_and_get(
2191: p_encoded => FND_API.g_false
2192: ,p_count => x_msg_count
2193: ,p_data => x_msg_data
2194: );
2193: ,p_data => x_msg_data
2194: );
2195:
2196: -- Debug Message
2197: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2198: hz_utility_v2pub.debug_return_messages (
2199: x_msg_count, x_msg_data, 'SQL ERROR');
2200: hz_utility_v2pub.debug('Delete_Channel_Team (-)');
2201: END IF;
2332:
2333: -- Initialize message list if p_init_msg_list is set to TRUE.
2334: IF FND_API.to_Boolean( p_init_msg_list )
2335: THEN
2336: FND_MSG_PUB.initialize;
2337: END IF;
2338:
2339: -- Debug Message
2340: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2336: FND_MSG_PUB.initialize;
2337: END IF;
2338:
2339: -- Debug Message
2340: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2341: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || ' Start');
2342: END IF;
2343:
2344: -- Initialize API return status to SUCCESS
2350:
2351: IF p_partner_id IS NULL OR p_partner_id = FND_API.g_miss_num THEN
2352: fnd_message.Set_Name('PV', 'PV_REQUIRED_VALIDATION');
2353: fnd_message.set_token('FIELD', 'PARTNER_ID');
2354: fnd_msg_pub.Add;
2355: RAISE FND_API.G_EXC_ERROR;
2356: ELSE
2357: l_partner_id := p_partner_id;
2358: END IF;
2360:
2361: -- Procesing of TAP returned resources with 'CHANNEL_MANAGER' or 'CHANNEL_REP' role.
2362: -- Debug Message
2363:
2364: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2365: PVX_Utility_PVT.debug_message('START : Procesing of TAP returned resources with CHANNEL_MANAGER or CHANNEL_REP role.');
2366: END IF;
2367:
2368: -- Get the Partner Party Id for the given Partner_Id
2371: IF l_party_id_csr%NOTFOUND THEN
2372: CLOSE l_party_id_csr;
2373: -- Raise an error saying partner is not active
2374: fnd_message.Set_Name('PV', 'PV_PARTNER_NOT_ACTIVE');
2375: fnd_msg_pub.Add;
2376: RAISE FND_API.G_EXC_ERROR;
2377: ELSE
2378: CLOSE l_party_id_csr;
2379: END IF;
2429: l_partner_qualifier_rec.partner_type := l_partner_types(j).attr_value;
2430: l_partner_qualifier_rec.partner_level := l_partner_level;
2431:
2432: -- Debug Message
2433: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2434: PVX_Utility_PVT.debug_message('START : -- Call the TAP_Get_Channel_Team API ');
2435: PVX_Utility_PVT.debug_message('('||to_char(i)||') partner_name => '|| l_partner_qualifier_rec.party_site_id);
2436: PVX_Utility_PVT.debug_message('('||to_char(i)||') city => '|| l_partner_qualifier_rec.city);
2437: PVX_Utility_PVT.debug_message('('||to_char(i)||') country => '|| l_partner_qualifier_rec.country);
2461: RAISE FND_API.G_EXC_ERROR;
2462: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2463: -- FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
2464: -- FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_TERR_ASSIGN_PUB.TAP_Get_Channel_Team');
2465: -- FND_MSG_PUB.Add;
2466: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2467: END IF;
2468: END IF;
2469:
2467: END IF;
2468: END IF;
2469:
2470: -- Debug Message
2471: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2472: PVX_Utility_PVT.debug_message('SUCCESSFULLY END : -- TAP_Get_Channel_Team ');
2473: END IF;
2474:
2475:
2505:
2506: EXCEPTION
2507: WHEN FND_API.g_exc_error THEN
2508: x_return_status := FND_API.g_ret_sts_error;
2509: FND_MSG_PUB.count_and_get (
2510: p_encoded => FND_API.g_false
2511: ,p_count => x_msg_count
2512: ,p_data => x_msg_data
2513: );
2512: ,p_data => x_msg_data
2513: );
2514:
2515: -- Debug Message
2516: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2517: hz_utility_v2pub.debug_return_messages (
2518: x_msg_count, x_msg_data, 'ERROR');
2519: hz_utility_v2pub.debug('Create_Terr_Channel_Team (-)');
2520: END IF;
2521:
2522: WHEN FND_API.g_exc_unexpected_error THEN
2523:
2524: x_return_status := FND_API.g_ret_sts_unexp_error ;
2525: FND_MSG_PUB.count_and_get (
2526: p_encoded => FND_API.g_false
2527: ,p_count => x_msg_count
2528: ,p_data => x_msg_data
2529: );
2527: ,p_count => x_msg_count
2528: ,p_data => x_msg_data
2529: );
2530: -- Debug Message
2531: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2532: hz_utility_v2pub.debug_return_messages (
2533: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
2534: hz_utility_v2pub.debug('Create_Terr_Channel_Team (-)');
2535: END IF;
2537: WHEN OTHERS THEN
2538:
2539: x_return_status := FND_API.g_ret_sts_unexp_error ;
2540:
2541: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
2542: THEN
2543: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2544: END IF;
2545:
2539: x_return_status := FND_API.g_ret_sts_unexp_error ;
2540:
2541: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
2542: THEN
2543: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2544: END IF;
2545:
2546: FND_MSG_PUB.count_and_get(
2547: p_encoded => FND_API.g_false
2542: THEN
2543: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2544: END IF;
2545:
2546: FND_MSG_PUB.count_and_get(
2547: p_encoded => FND_API.g_false
2548: ,p_count => x_msg_count
2549: ,p_data => x_msg_data
2550: );
2549: ,p_data => x_msg_data
2550: );
2551:
2552: -- Debug Message
2553: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2554: hz_utility_v2pub.debug_return_messages (
2555: x_msg_count, x_msg_data, 'SQL ERROR');
2556: hz_utility_v2pub.debug('Create_Terr_Channel_Team (-)');
2557: END IF;
2647:
2648: -- Initialize message list if p_init_msg_list is set to TRUE.
2649: IF FND_API.to_Boolean( p_init_msg_list )
2650: THEN
2651: FND_MSG_PUB.initialize;
2652: END IF;
2653:
2654: -- Debug Message
2655: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2651: FND_MSG_PUB.initialize;
2652: END IF;
2653:
2654: -- Debug Message
2655: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2656: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || ' Start');
2657: END IF;
2658:
2659: -- Initialize API return status to SUCCESS
2665:
2666: IF p_partner_id IS NULL OR p_partner_id = FND_API.g_miss_num THEN
2667: fnd_message.Set_Name('PV', 'PV_REQUIRED_VALIDATION');
2668: fnd_message.set_token('FIELD', 'PARTNER_ID');
2669: fnd_msg_pub.Add;
2670: RAISE FND_API.G_EXC_ERROR;
2671: ELSE
2672: l_partner_id := p_partner_id;
2673: END IF;
2700: RAISE FND_API.G_EXC_ERROR;
2701: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2702: -- FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
2703: -- FND_MESSAGE.SET_TOKEN('API_NAME', 'Cr_Login_User_Access_Rec');
2704: -- FND_MSG_PUB.Add;
2705: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2706: END IF;
2707: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
2708:
2721: -- records are added. set tap created flag to 'N' and keep flag = 'Y'
2722: IF ( NOT(p_vad_partner_id IS NULL OR p_vad_partner_id = FND_API.g_miss_num) ) THEN
2723:
2724: -- Debug Message
2725: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2726: PVX_Utility_PVT.debug_message('START : Step3: If p_vad_partner_id is not null, then all the CMs( Employees of VAD Organization.');
2727: END IF;
2728:
2729: -- Get the VAD Channel Team -
2744: RAISE FND_API.G_EXC_ERROR;
2745: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2746: /* FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
2747: FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_TERR_ASSIGN_PUB.Create_VAD_Channel_Team');
2748: FND_MSG_PUB.Add;
2749: */ RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2750: END IF;
2751: END IF;
2752:
2763: END LOOP;
2764: END IF;
2765:
2766: -- Debug Message
2767: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2768: PVX_Utility_PVT.debug_message('SUCCESSFULLY END : Step3.');
2769: END IF;
2770:
2771: END IF; -- l_vad_partner_id IS NOT NULL OR l_vad_partner_id <> FND_API.g_miss_num
2773: -- Assign Default Channel Manager as a Channel Team member, if both the above (Logged_in_User and
2774: -- TAP procedure call failed to add any channel team member.
2775: -- Debug Message
2776:
2777: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2778: PVX_Utility_PVT.debug_message('START : Step4: Assign Default Channel Manager as a Channel Team member : l_cm_added => '||l_cm_added );
2779: END IF;
2780:
2781: if x_prtnr_access_id_tbl.count > 0 then
2789: CLOSE l_get_default_cm_csr;
2790:
2791: IF (l_def_cm = 0 ) THEN
2792: FND_MESSAGE.SET_NAME('PV', 'PV_NO_DEFAULT_CMM');
2793: FND_MSG_PUB.Add;
2794: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2795: END IF;
2796: -- Set the p_partner_access_rec record
2797: l_partner_access_rec.partner_id := l_partner_id;
2825: RAISE FND_API.G_EXC_ERROR;
2826: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2827: /* FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
2828: FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_Partner_Accesses_PVT.Create_Partner_Accesses');
2829: FND_MSG_PUB.Add;
2830: */ RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2831: END IF;
2832: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
2833:
2844: COMMIT WORK;
2845: END IF;
2846:
2847: -- Debug Message
2848: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2849: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
2850: END IF;
2851:
2852: -- Standard call to get message count and if count is 1, get message info.
2849: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
2850: END IF;
2851:
2852: -- Standard call to get message count and if count is 1, get message info.
2853: FND_MSG_PUB.Count_And_Get
2854: (p_count => x_msg_count,
2855: p_data => x_msg_data
2856: );
2857:
2857:
2858: EXCEPTION
2859: WHEN FND_API.g_exc_error THEN
2860: x_return_status := FND_API.g_ret_sts_error;
2861: FND_MSG_PUB.count_and_get (
2862: p_encoded => FND_API.g_false
2863: ,p_count => x_msg_count
2864: ,p_data => x_msg_data
2865: );
2864: ,p_data => x_msg_data
2865: );
2866:
2867: -- Debug Message
2868: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2869: hz_utility_v2pub.debug_return_messages (
2870: x_msg_count, x_msg_data, 'ERROR');
2871: hz_utility_v2pub.debug('Create_User_Channel_Team (-)');
2872: END IF;
2873:
2874: WHEN FND_API.g_exc_unexpected_error THEN
2875:
2876: x_return_status := FND_API.g_ret_sts_unexp_error ;
2877: FND_MSG_PUB.count_and_get (
2878: p_encoded => FND_API.g_false
2879: ,p_count => x_msg_count
2880: ,p_data => x_msg_data
2881: );
2879: ,p_count => x_msg_count
2880: ,p_data => x_msg_data
2881: );
2882: -- Debug Message
2883: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2884: hz_utility_v2pub.debug_return_messages (
2885: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
2886: hz_utility_v2pub.debug('Create_User_Channel_Team (-)');
2887: END IF;
2889: WHEN OTHERS THEN
2890:
2891: x_return_status := FND_API.g_ret_sts_unexp_error ;
2892:
2893: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
2894: THEN
2895: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2896: END IF;
2897:
2891: x_return_status := FND_API.g_ret_sts_unexp_error ;
2892:
2893: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
2894: THEN
2895: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2896: END IF;
2897:
2898: FND_MSG_PUB.count_and_get(
2899: p_encoded => FND_API.g_false
2894: THEN
2895: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2896: END IF;
2897:
2898: FND_MSG_PUB.count_and_get(
2899: p_encoded => FND_API.g_false
2900: ,p_count => x_msg_count
2901: ,p_data => x_msg_data
2902: );
2901: ,p_data => x_msg_data
2902: );
2903:
2904: -- Debug Message
2905: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2906: hz_utility_v2pub.debug_return_messages (
2907: x_msg_count, x_msg_data, 'SQL ERROR');
2908: hz_utility_v2pub.debug('Create_User_Channel_Team (-)');
2909: END IF;
3018:
3019: -- Initialize message list if p_init_msg_list is set to TRUE.
3020: IF FND_API.to_Boolean( p_init_msg_list )
3021: THEN
3022: FND_MSG_PUB.initialize;
3023: END IF;
3024:
3025: -- Debug Message
3026: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
3022: FND_MSG_PUB.initialize;
3023: END IF;
3024:
3025: -- Debug Message
3026: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)) THEN
3027: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || ' Start');
3028: END IF;
3029:
3030: -- Initialize API return status to SUCCESS
3037: IF p_partner_id IS NULL OR p_partner_id = FND_API.g_miss_num
3038: THEN
3039: fnd_message.Set_Name('PV', 'PV_REQUIRED_VALIDATION');
3040: fnd_message.set_token('FIELD', 'PARTNER_ID');
3041: fnd_msg_pub.Add;
3042: RAISE FND_API.G_EXC_ERROR;
3043: ELSE
3044: l_partner_id := p_partner_id;
3045: END IF;
3100: RAISE FND_API.G_EXC_ERROR;
3101: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3102: /* FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
3103: FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_TERR_ASSIGN_PUB.Create_Terr_Channel_Team');
3104: FND_MSG_PUB.Add;
3105: */ RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3106: END IF;
3107: END IF;
3108:
3144: RAISE FND_API.G_EXC_ERROR;
3145: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3146: /* FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
3147: FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_BATCH_CHG_PRTNR_PVT.Create_Batch_Chg_Partners');
3148: FND_MSG_PUB.Add;
3149: */ RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3150: END IF;
3151: END IF;
3152:
3173: RAISE FND_API.G_EXC_ERROR;
3174: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3175: /* FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
3176: FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_BATCH_CHG_PRTNR_PVT.Update_Batch_Chg_Partners');
3177: FND_MSG_PUB.Add;
3178: */ RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3179: END IF;
3180: END IF;
3181:
3203: RAISE FND_API.G_EXC_ERROR;
3204: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3205: /* FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
3206: FND_MESSAGE.SET_TOKEN('API_NAME', 'Create_User_Channel_Team');
3207: FND_MSG_PUB.Add;
3208: */ RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3209: END IF;
3210:
3211: END IF;
3217: COMMIT WORK;
3218: END IF;
3219:
3220: -- Debug Message
3221: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3222: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || ' End');
3223: END IF;
3224:
3225: -- Standard call to get message count and if count is 1, get message info.
3222: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || ' End');
3223: END IF;
3224:
3225: -- Standard call to get message count and if count is 1, get message info.
3226: FND_MSG_PUB.Count_And_Get
3227: (p_count => x_msg_count,
3228: p_data => x_msg_data
3229: );
3230:
3231: EXCEPTION
3232: WHEN FND_API.g_exc_error THEN
3233: ROLLBACK TO create_channel_team_pub;
3234: x_return_status := FND_API.g_ret_sts_error;
3235: FND_MSG_PUB.count_and_get (
3236: p_encoded => FND_API.g_false
3237: ,p_count => x_msg_count
3238: ,p_data => x_msg_data
3239: );
3238: ,p_data => x_msg_data
3239: );
3240:
3241: -- Debug Message
3242: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3243: hz_utility_v2pub.debug_return_messages (
3244: x_msg_count, x_msg_data, 'ERROR');
3245: hz_utility_v2pub.debug('Create_Channel_Team (-)');
3246: END IF;
3247:
3248: WHEN FND_API.g_exc_unexpected_error THEN
3249: ROLLBACK TO create_channel_team_pub;
3250: x_return_status := FND_API.g_ret_sts_unexp_error ;
3251: FND_MSG_PUB.count_and_get (
3252: p_encoded => FND_API.g_false
3253: ,p_count => x_msg_count
3254: ,p_data => x_msg_data
3255: );
3253: ,p_count => x_msg_count
3254: ,p_data => x_msg_data
3255: );
3256: -- Debug Message
3257: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3258: hz_utility_v2pub.debug_return_messages (
3259: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
3260: hz_utility_v2pub.debug('Create_Channel_Team (-)');
3261: END IF;
3263: WHEN OTHERS THEN
3264: ROLLBACK TO create_channel_team_pub;
3265: x_return_status := FND_API.g_ret_sts_unexp_error ;
3266:
3267: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
3268: THEN
3269: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
3270: END IF;
3271:
3265: x_return_status := FND_API.g_ret_sts_unexp_error ;
3266:
3267: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
3268: THEN
3269: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
3270: END IF;
3271:
3272: FND_MSG_PUB.count_and_get(
3273: p_encoded => FND_API.g_false
3268: THEN
3269: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
3270: END IF;
3271:
3272: FND_MSG_PUB.count_and_get(
3273: p_encoded => FND_API.g_false
3274: ,p_count => x_msg_count
3275: ,p_data => x_msg_data
3276: );
3275: ,p_data => x_msg_data
3276: );
3277:
3278: -- Debug Message
3279: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3280: hz_utility_v2pub.debug_return_messages (
3281: x_msg_count, x_msg_data, 'SQL ERROR');
3282: hz_utility_v2pub.debug('Create_Channel_Team (-)');
3283: END IF;
3385: IF l_party_id_csr%NOTFOUND THEN
3386: CLOSE l_party_id_csr;
3387: -- Raise an error saying partner is not active
3388: fnd_message.Set_Name('PV', 'PV_PARTNER_NOT_ACTIVE');
3389: fnd_msg_pub.Add;
3390: RAISE FND_API.G_EXC_ERROR;
3391: ELSE
3392: CLOSE l_party_id_csr;
3393: END IF;
3428: RAISE FND_API.G_EXC_ERROR;
3429: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3430: /* FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
3431: FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_TERR_ASSIGN_PUB.Do_Create_Channel_Team');
3432: FND_MSG_PUB.Add;
3433: */ RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3434: END IF;
3435: END IF;
3436:
3437: EXCEPTION
3438: WHEN FND_API.g_exc_error THEN
3439: ROLLBACK TO create_channel_team_pub;
3440: x_return_status := FND_API.g_ret_sts_error;
3441: FND_MSG_PUB.count_and_get (
3442: p_encoded => FND_API.g_false
3443: ,p_count => x_msg_count
3444: ,p_data => x_msg_data
3445: );
3444: ,p_data => x_msg_data
3445: );
3446:
3447: -- Debug Message
3448: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3449: hz_utility_v2pub.debug_return_messages (
3450: x_msg_count, x_msg_data, 'ERROR');
3451: hz_utility_v2pub.debug('Create_Channel_Team (-)');
3452: END IF;
3453:
3454: WHEN FND_API.g_exc_unexpected_error THEN
3455: ROLLBACK TO create_channel_team_pub;
3456: x_return_status := FND_API.g_ret_sts_unexp_error ;
3457: FND_MSG_PUB.count_and_get (
3458: p_encoded => FND_API.g_false
3459: ,p_count => x_msg_count
3460: ,p_data => x_msg_data
3461: );
3459: ,p_count => x_msg_count
3460: ,p_data => x_msg_data
3461: );
3462: -- Debug Message
3463: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3464: hz_utility_v2pub.debug_return_messages (
3465: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
3466: hz_utility_v2pub.debug('Create_Channel_Team (-)');
3467: END IF;
3469: WHEN OTHERS THEN
3470: ROLLBACK TO create_channel_team_pub;
3471: x_return_status := FND_API.g_ret_sts_unexp_error ;
3472:
3473: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
3474: THEN
3475: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
3476: END IF;
3477:
3471: x_return_status := FND_API.g_ret_sts_unexp_error ;
3472:
3473: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
3474: THEN
3475: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
3476: END IF;
3477:
3478: FND_MSG_PUB.count_and_get(
3479: p_encoded => FND_API.g_false
3474: THEN
3475: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
3476: END IF;
3477:
3478: FND_MSG_PUB.count_and_get(
3479: p_encoded => FND_API.g_false
3480: ,p_count => x_msg_count
3481: ,p_data => x_msg_data
3482: );
3481: ,p_data => x_msg_data
3482: );
3483:
3484: -- Debug Message
3485: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3486: hz_utility_v2pub.debug_return_messages (
3487: x_msg_count, x_msg_data, 'SQL ERROR');
3488: hz_utility_v2pub.debug('Create_Channel_Team (-)');
3489: END IF;
3583: BEGIN
3584: --PN Not in use, Replaced by TERR and User APIs
3585:
3586: -- dbms_output.put_line('Dummy stmt ');
3587: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3588: PVX_Utility_PVT.debug_message('This procedure is not in use');
3589: END IF;
3590: /*
3591: -- Standard call to check for call compatibility.
3599:
3600: -- Initialize message list if p_init_msg_list is set to TRUE.
3601: IF FND_API.to_Boolean( p_init_msg_list )
3602: THEN
3603: FND_MSG_PUB.initialize;
3604: END IF;
3605:
3606: -- Debug Message
3607: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3603: FND_MSG_PUB.initialize;
3604: END IF;
3605:
3606: -- Debug Message
3607: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3608: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || ' Start');
3609: END IF;
3610:
3611: -- Initialize API return status to SUCCESS
3617:
3618: IF p_partner_id IS NULL OR p_partner_id = FND_API.g_miss_num THEN
3619: fnd_message.Set_Name('PV', 'PV_REQUIRED_VALIDATION');
3620: fnd_message.set_token('FIELD', 'PARTNER_ID');
3621: fnd_msg_pub.Add;
3622: RAISE FND_API.G_EXC_ERROR;
3623: ELSE
3624: l_partner_id := p_partner_id;
3625: END IF;
3652: RAISE FND_API.G_EXC_ERROR;
3653: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3654: FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
3655: FND_MESSAGE.SET_TOKEN('API_NAME', 'Cr_Login_User_Access_Rec');
3656: FND_MSG_PUB.Add;
3657: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3658: END IF;
3659: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
3660:
3666: END IF; -- p_mode <> 'UPDATE'
3667:
3668: -- STEP (ii) : Procesing of TAP returned resources with 'CHANNEL_MANAGER' or 'CHANNEL_REP' role.
3669: -- Debug Message
3670: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3671: PVX_Utility_PVT.debug_message('START : STEP (ii) : Procesing of TAP returned resources with CHANNEL_MANAGER or CHANNEL_REP role.');
3672: END IF;
3673:
3674: -- Get the Partner Party Id for the given Partner_Id
3677: IF l_party_id_csr%NOTFOUND THEN
3678: CLOSE l_party_id_csr;
3679: -- Raise an error saying partner is not active
3680: fnd_message.Set_Name('PV', 'PV_PARTNER_NOT_ACTIVE');
3681: fnd_msg_pub.Add;
3682: RAISE FND_API.G_EXC_ERROR;
3683: ELSE
3684: CLOSE l_party_id_csr;
3685: END IF;
3707: RAISE FND_API.G_EXC_ERROR;
3708: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3709: FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
3710: FND_MESSAGE.SET_TOKEN('API_NAME', 'get_partner_details');
3711: FND_MSG_PUB.Add;
3712: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3713: END IF;
3714: END IF;
3715: */
3758: l_partner_qualifier_rec.partner_type := l_partner_types(j).attr_value;
3759: l_partner_qualifier_rec.partner_level := l_partner_level;
3760:
3761: -- Debug Message
3762: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3763: PVX_Utility_PVT.debug_message('START : -- Call the TAP_Get_Channel_Team API ');
3764: PVX_Utility_PVT.debug_message('('||to_char(i)||') partner_name => '|| l_partner_qualifier_rec.party_site_id);
3765: PVX_Utility_PVT.debug_message('('||to_char(i)||') city => '|| l_partner_qualifier_rec.city);
3766: PVX_Utility_PVT.debug_message('('||to_char(i)||') country => '|| l_partner_qualifier_rec.country);
3790: RAISE FND_API.G_EXC_ERROR;
3791: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3792: FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
3793: FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_TERR_ASSIGN_PUB.TAP_Get_Channel_Team');
3794: FND_MSG_PUB.Add;
3795: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3796: END IF;
3797: END IF;
3798:
3796: END IF;
3797: END IF;
3798:
3799: -- Debug Message
3800: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3801: PVX_Utility_PVT.debug_message('SUCCESSFULLY END : -- TAP_Get_Channel_Team ');
3802: END IF;
3803:
3804:
3837: -- records are added. set tap created flag to 'N' and keep flag = 'Y'
3838: IF ( NOT(p_vad_partner_id IS NULL OR p_vad_partner_id = FND_API.g_miss_num) ) THEN
3839:
3840: -- Debug Message
3841: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3842: PVX_Utility_PVT.debug_message('START : Step3: If p_vad_partner_id is not null, then all the CMs( Employees of VAD Organization.');
3843: END IF;
3844:
3845: -- Get the VAD Channel Team -
3860: RAISE FND_API.G_EXC_ERROR;
3861: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3862: FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
3863: FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_TERR_ASSIGN_PUB.Create_VAD_Channel_Team');
3864: FND_MSG_PUB.Add;
3865: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3866: END IF;
3867: END IF;
3868:
3879: END LOOP;
3880: END IF;
3881:
3882: -- Debug Message
3883: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3884: PVX_Utility_PVT.debug_message('SUCCESSFULLY END : Step3.');
3885: END IF;
3886:
3887: END IF; -- l_vad_partner_id IS NOT NULL OR l_vad_partner_id <> FND_API.g_miss_num
3888:
3889: -- Assign Default Channel Manager as a Channel Team member, if both the above (Logged_in_User and
3890: -- TAP procedure call failed to add any channel team member.
3891: -- Debug Message
3892: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3893: PVX_Utility_PVT.debug_message('START : Step4: Assign Default Channel Manager as a Channel Team member : l_cm_added => '||l_cm_added );
3894: END IF;
3895:
3896: IF ( l_cm_added <> 'Y' ) THEN
3927: RAISE FND_API.G_EXC_ERROR;
3928: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3929: FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
3930: FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_Partner_Accesses_PVT.Create_Partner_Accesses');
3931: FND_MSG_PUB.Add;
3932: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3933: END IF;
3934: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
3935:
3946: COMMIT WORK;
3947: END IF;
3948:
3949: -- Debug Message
3950: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3951: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
3952: END IF;
3953:
3954: -- Standard call to get message count and if count is 1, get message info.
3951: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
3952: END IF;
3953:
3954: -- Standard call to get message count and if count is 1, get message info.
3955: FND_MSG_PUB.Count_And_Get
3956: (p_count => x_msg_count,
3957: p_data => x_msg_data
3958: );
3959:
3959:
3960: EXCEPTION
3961: WHEN FND_API.g_exc_error THEN
3962: x_return_status := FND_API.g_ret_sts_error;
3963: FND_MSG_PUB.count_and_get (
3964: p_encoded => FND_API.g_false
3965: ,p_count => x_msg_count
3966: ,p_data => x_msg_data
3967: );
3966: ,p_data => x_msg_data
3967: );
3968:
3969: -- Debug Message
3970: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3971: hz_utility_v2pub.debug_return_messages (
3972: x_msg_count, x_msg_data, 'ERROR');
3973: hz_utility_v2pub.debug('Create_Online_Channel_Team (-)');
3974: END IF;
3975:
3976: WHEN FND_API.g_exc_unexpected_error THEN
3977:
3978: x_return_status := FND_API.g_ret_sts_unexp_error ;
3979: FND_MSG_PUB.count_and_get (
3980: p_encoded => FND_API.g_false
3981: ,p_count => x_msg_count
3982: ,p_data => x_msg_data
3983: );
3981: ,p_count => x_msg_count
3982: ,p_data => x_msg_data
3983: );
3984: -- Debug Message
3985: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3986: hz_utility_v2pub.debug_return_messages (
3987: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
3988: hz_utility_v2pub.debug('Create_Online_Channel_Team (-)');
3989: END IF;
3991: WHEN OTHERS THEN
3992:
3993: x_return_status := FND_API.g_ret_sts_unexp_error ;
3994:
3995: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
3996: THEN
3997: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
3998: END IF;
3999:
3993: x_return_status := FND_API.g_ret_sts_unexp_error ;
3994:
3995: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
3996: THEN
3997: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
3998: END IF;
3999:
4000: FND_MSG_PUB.count_and_get(
4001: p_encoded => FND_API.g_false
3996: THEN
3997: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
3998: END IF;
3999:
4000: FND_MSG_PUB.count_and_get(
4001: p_encoded => FND_API.g_false
4002: ,p_count => x_msg_count
4003: ,p_data => x_msg_data
4004: );
4003: ,p_data => x_msg_data
4004: );
4005:
4006: -- Debug Message
4007: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4008: hz_utility_v2pub.debug_return_messages (
4009: x_msg_count, x_msg_data, 'SQL ERROR');
4010: hz_utility_v2pub.debug('Create_Online_Channel_Team (-)');
4011: END IF;
4067: l_api_name CONSTANT VARCHAR2(30) := 'Dummy Declaration';
4068: begin
4069: --PN Not in use, Replaced by TERR and User APIs
4070: -- dbms_output.put_line('Dummy stmt ');
4071: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4072: PVX_Utility_PVT.debug_message('This procedure is not in use');
4073: END IF;
4074:
4075: /*
4159:
4160: -- Initialize message list if p_init_msg_list is set to TRUE.
4161: IF FND_API.to_Boolean( p_init_msg_list )
4162: THEN
4163: FND_MSG_PUB.initialize;
4164: END IF;
4165:
4166: -- Debug Message
4167: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4163: FND_MSG_PUB.initialize;
4164: END IF;
4165:
4166: -- Debug Message
4167: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4168: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || ' Start');
4169: END IF;
4170:
4171: -- Initialize API return status to SUCCESS
4177:
4178: IF p_partner_id IS NULL OR p_partner_id = FND_API.g_miss_num THEN
4179: fnd_message.Set_Name('PV', 'PV_REQUIRED_VALIDATION');
4180: fnd_message.set_token('FIELD', 'PARTNER_ID');
4181: fnd_msg_pub.Add;
4182: RAISE FND_API.G_EXC_ERROR;
4183: ELSE
4184: l_partner_id := p_partner_id;
4185: END IF;
4212: RAISE FND_API.G_EXC_ERROR;
4213: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4214: FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
4215: FND_MESSAGE.SET_TOKEN('API_NAME', 'Cr_Login_User_Access_Rec');
4216: FND_MSG_PUB.Add;
4217: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4218: END IF;
4219: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
4220:
4226: END IF; -- p_mode <> 'UPDATE'
4227:
4228: -- STEP (ii) : Procesing of TAP returned resources with 'CHANNEL_MANAGER' or 'CHANNEL_REP' role.
4229: -- Debug Message
4230: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4231: PVX_Utility_PVT.debug_message('START : STEP (ii) : Procesing of TAP returned resources with CHANNEL_MANAGER or CHANNEL_REP role.');
4232: END IF;
4233:
4234: -- Get the Partner Party Id for the given Partner_Id
4237: IF l_party_id_csr%NOTFOUND THEN
4238: CLOSE l_party_id_csr;
4239: -- Raise an error saying partner is not active
4240: fnd_message.Set_Name('PV', 'PV_PARTNER_NOT_ACTIVE');
4241: fnd_msg_pub.Add;
4242: RAISE FND_API.G_EXC_ERROR;
4243: ELSE
4244: CLOSE l_party_id_csr;
4245: END IF;
4265: RAISE FND_API.G_EXC_ERROR;
4266: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4267: FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
4268: FND_MESSAGE.SET_TOKEN('API_NAME', 'get_partner_details');
4269: FND_MSG_PUB.Add;
4270: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4271: END IF;
4272: END IF;
4273:
4310: l_partner_qualifier_rec.partner_type := l_partner_types(j).attr_value;
4311: l_partner_qualifier_rec.partner_level := l_partner_level;
4312:
4313: -- Debug Message
4314: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4315: PVX_Utility_PVT.debug_message('START : -- Call the TAP_Get_Channel_Team API ');
4316: PVX_Utility_PVT.debug_message('('||to_char(i)||') partner_name => '|| l_partner_qualifier_rec.party_site_id);
4317: PVX_Utility_PVT.debug_message('('||to_char(i)||') city => '|| l_partner_qualifier_rec.city);
4318: PVX_Utility_PVT.debug_message('('||to_char(i)||') country => '|| l_partner_qualifier_rec.country);
4342: RAISE FND_API.G_EXC_ERROR;
4343: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4344: FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
4345: FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_TERR_ASSIGN_PUB.TAP_Get_Channel_Team');
4346: FND_MSG_PUB.Add;
4347: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4348: END IF;
4349: END IF;
4350:
4348: END IF;
4349: END IF;
4350:
4351: -- Debug Message
4352: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4353: PVX_Utility_PVT.debug_message('SUCCESSFULLY END : -- TAP_Get_Channel_Team ');
4354: END IF;
4355:
4356:
4389: -- records are added. set tap created flag to 'N' and keep flag = 'Y'
4390: IF ( NOT(p_vad_partner_id IS NULL OR p_vad_partner_id = FND_API.g_miss_num) ) THEN
4391:
4392: -- Debug Message
4393: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4394: PVX_Utility_PVT.debug_message('START : Step3: If p_vad_partner_id is not null, then all the CMs( Employees of VAD Organization.');
4395: END IF;
4396:
4397: -- Get the VAD Channel Team -
4412: RAISE FND_API.G_EXC_ERROR;
4413: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4414: FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
4415: FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_TERR_ASSIGN_PUB.Create_VAD_Channel_Team');
4416: FND_MSG_PUB.Add;
4417: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4418: END IF;
4419: END IF;
4420:
4431: END LOOP;
4432: END IF;
4433:
4434: -- Debug Message
4435: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4436: PVX_Utility_PVT.debug_message('SUCCESSFULLY END : Step3.');
4437: END IF;
4438:
4439: END IF; -- l_vad_partner_id IS NOT NULL OR l_vad_partner_id <> FND_API.g_miss_num
4440:
4441: -- Assign Default Channel Manager as a Channel Team member, if both the above (Logged_in_User and
4442: -- TAP procedure call failed to add any channel team member.
4443: -- Debug Message
4444: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4445: PVX_Utility_PVT.debug_message('START : Step4: Assign Default Channel Manager as a Channel Team member : l_cm_added => '||l_cm_added );
4446: END IF;
4447:
4448: IF ( l_cm_added <> 'Y' ) THEN
4479: RAISE FND_API.G_EXC_ERROR;
4480: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4481: FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
4482: FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_Partner_Accesses_PVT.Create_Partner_Accesses');
4483: FND_MSG_PUB.Add;
4484: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4485: END IF;
4486: END IF; -- l_return_status <> FND_API.G_RET_STS_SUCCESS
4487:
4498: COMMIT WORK;
4499: END IF;
4500:
4501: -- Debug Message
4502: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4503: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
4504: END IF;
4505:
4506: -- Standard call to get message count and if count is 1, get message info.
4503: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
4504: END IF;
4505:
4506: -- Standard call to get message count and if count is 1, get message info.
4507: FND_MSG_PUB.Count_And_Get
4508: (p_count => x_msg_count,
4509: p_data => x_msg_data
4510: );
4511:
4511:
4512: EXCEPTION
4513: WHEN FND_API.g_exc_error THEN
4514: x_return_status := FND_API.g_ret_sts_error;
4515: FND_MSG_PUB.count_and_get (
4516: p_encoded => FND_API.g_false
4517: ,p_count => x_msg_count
4518: ,p_data => x_msg_data
4519: );
4518: ,p_data => x_msg_data
4519: );
4520:
4521: -- Debug Message
4522: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4523: hz_utility_v2pub.debug_return_messages (
4524: x_msg_count, x_msg_data, 'ERROR');
4525: hz_utility_v2pub.debug('Create_Online_Channel_Team (-)');
4526: END IF;
4527:
4528: WHEN FND_API.g_exc_unexpected_error THEN
4529:
4530: x_return_status := FND_API.g_ret_sts_unexp_error ;
4531: FND_MSG_PUB.count_and_get (
4532: p_encoded => FND_API.g_false
4533: ,p_count => x_msg_count
4534: ,p_data => x_msg_data
4535: );
4533: ,p_count => x_msg_count
4534: ,p_data => x_msg_data
4535: );
4536: -- Debug Message
4537: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4538: hz_utility_v2pub.debug_return_messages (
4539: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
4540: hz_utility_v2pub.debug('Create_Online_Channel_Team (-)');
4541: END IF;
4543: WHEN OTHERS THEN
4544:
4545: x_return_status := FND_API.g_ret_sts_unexp_error ;
4546:
4547: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
4548: THEN
4549: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
4550: END IF;
4551:
4545: x_return_status := FND_API.g_ret_sts_unexp_error ;
4546:
4547: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
4548: THEN
4549: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
4550: END IF;
4551:
4552: FND_MSG_PUB.count_and_get(
4553: p_encoded => FND_API.g_false
4548: THEN
4549: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
4550: END IF;
4551:
4552: FND_MSG_PUB.count_and_get(
4553: p_encoded => FND_API.g_false
4554: ,p_count => x_msg_count
4555: ,p_data => x_msg_data
4556: );
4555: ,p_data => x_msg_data
4556: );
4557:
4558: -- Debug Message
4559: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4560: hz_utility_v2pub.debug_return_messages (
4561: x_msg_count, x_msg_data, 'SQL ERROR');
4562: hz_utility_v2pub.debug('Create_Online_Channel_Team (-)');
4563: END IF;
4695:
4696: -- Initialize message list if p_init_msg_list is set to TRUE.
4697: IF FND_API.to_Boolean( p_init_msg_list )
4698: THEN
4699: FND_MSG_PUB.initialize;
4700: END IF;
4701:
4702: -- Debug Message
4703: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4699: FND_MSG_PUB.initialize;
4700: END IF;
4701:
4702: -- Debug Message
4703: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4704: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || ' Start');
4705: END IF;
4706:
4707: -- Initialize API return status to SUCCESS
4713:
4714: IF p_partner_id IS NULL OR p_partner_id = FND_API.g_miss_num THEN
4715: fnd_message.Set_Name('PV', 'PV_REQUIRED_VALIDATION');
4716: fnd_message.set_token('FIELD', 'PARTNER_ID');
4717: fnd_msg_pub.Add;
4718: RAISE FND_API.G_EXC_ERROR;
4719: ELSE
4720: l_partner_id := p_partner_id;
4721: END IF;
4723: -- Initialize the l_vad_partner_id.
4724: IF p_vad_partner_id IS NULL OR p_vad_partner_id = FND_API.g_miss_num THEN
4725: fnd_message.Set_Name('PV', 'PV_REQUIRED_VALIDATION');
4726: fnd_message.set_token('FIELD', 'VAD_PARTNER_ID');
4727: fnd_msg_pub.Add;
4728: RAISE FND_API.G_EXC_ERROR;
4729: ELSE
4730: l_vad_partner_id := p_vad_partner_id;
4731: END IF;
4737: IF ( l_VAD_party_id_csr%NOTFOUND ) THEN
4738: CLOSE l_VAD_party_id_csr;
4739: -- Raise an error ;
4740: fnd_message.Set_Name('PV', 'PV_PARTNER_NOT_ACTIVE');
4741: fnd_msg_pub.Add;
4742: RAISE FND_API.G_EXC_ERROR;
4743: ELSE
4744: CLOSE l_VAD_party_id_csr;
4745: END IF;
4785: RAISE FND_API.G_EXC_ERROR;
4786: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4787: /* FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
4788: FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_PARTNER_ACCESSES_PVT.Create_Partner_Accesses');
4789: FND_MSG_PUB.Add;
4790: */ RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4791: END IF;
4792: END IF;
4793:
4808: END IF;
4809:
4810:
4811: -- Debug Message
4812: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4813: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
4814: END IF;
4815:
4816: -- Standard call to get message count and if count is 1, get message info.
4813: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
4814: END IF;
4815:
4816: -- Standard call to get message count and if count is 1, get message info.
4817: FND_MSG_PUB.Count_And_Get
4818: ( p_count => l_msg_count,
4819: p_data => l_msg_data
4820: );
4821:
4825: IF ( l_VAD_contacts_csr%ISOPEN ) THEN
4826: CLOSE l_VAD_contacts_csr;
4827: END IF;
4828:
4829: FND_MSG_PUB.count_and_get (
4830: p_encoded => FND_API.g_false
4831: ,p_count => x_msg_count
4832: ,p_data => x_msg_data
4833: );
4832: ,p_data => x_msg_data
4833: );
4834:
4835: -- Debug Message
4836: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4837: hz_utility_v2pub.debug_return_messages (
4838: x_msg_count, x_msg_data, 'ERROR');
4839: hz_utility_v2pub.debug('Create_VAD_Channel_Team (-)');
4840: END IF;
4845: IF ( l_VAD_contacts_csr%ISOPEN ) THEN
4846: CLOSE l_VAD_contacts_csr;
4847: END IF;
4848:
4849: FND_MSG_PUB.count_and_get (
4850: p_encoded => FND_API.g_false
4851: ,p_count => x_msg_count
4852: ,p_data => x_msg_data
4853: );
4851: ,p_count => x_msg_count
4852: ,p_data => x_msg_data
4853: );
4854: -- Debug Message
4855: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4856: hz_utility_v2pub.debug_return_messages (
4857: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
4858: hz_utility_v2pub.debug('Create_VAD_Channel_Team (-)');
4859: END IF;
4864: IF ( l_VAD_contacts_csr%ISOPEN ) THEN
4865: CLOSE l_VAD_contacts_csr;
4866: END IF;
4867:
4868: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
4869: THEN
4870: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
4871: END IF;
4872:
4866: END IF;
4867:
4868: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
4869: THEN
4870: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
4871: END IF;
4872:
4873: FND_MSG_PUB.count_and_get(
4874: p_encoded => FND_API.g_false
4869: THEN
4870: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
4871: END IF;
4872:
4873: FND_MSG_PUB.count_and_get(
4874: p_encoded => FND_API.g_false
4875: ,p_count => x_msg_count
4876: ,p_data => x_msg_data
4877: );
4876: ,p_data => x_msg_data
4877: );
4878:
4879: -- Debug Message
4880: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4881: hz_utility_v2pub.debug_return_messages (
4882: x_msg_count, x_msg_data, 'SQL ERROR');
4883: hz_utility_v2pub.debug('Create_VAD_Channel_Team (-)');
4884: END IF;
4968:
4969: -- Initialize message list if p_init_msg_list is set to TRUE.
4970: IF FND_API.to_Boolean( p_init_msg_list )
4971: THEN
4972: FND_MSG_PUB.initialize;
4973: END IF;
4974:
4975: -- Debug Message
4976: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4972: FND_MSG_PUB.initialize;
4973: END IF;
4974:
4975: -- Debug Message
4976: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4977: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'start');
4978: END IF;
4979:
4980: -- Initialize API return status to SUCCESS
4984: -- Validate Environment
4985: -- =========================================================================
4986:
4987: -- Debug Message
4988: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4989: PVX_Utility_PVT.debug_message('Validating the supplied partner Id.');
4990: END IF;
4991:
4992: IF p_partner_id IS NULL OR p_partner_id = FND_API.g_miss_num THEN
4991:
4992: IF p_partner_id IS NULL OR p_partner_id = FND_API.g_miss_num THEN
4993: fnd_message.Set_Name('PV', 'PV_REQUIRED_VALIDATION');
4994: fnd_message.set_token('FIELD', 'PARTNER_ID');
4995: fnd_msg_pub.Add;
4996: RAISE FND_API.G_EXC_ERROR;
4997: ELSE
4998: l_partner_id := p_partner_id;
4999: END IF;
4998: l_partner_id := p_partner_id;
4999: END IF;
5000:
5001: -- Debug Message
5002: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5003: PVX_Utility_PVT.debug_message('After successful validating the supplied partner Id.');
5004: END IF;
5005:
5006: -- Initialize the l_vad_partner_id.
5012: IF l_party_id_csr%NOTFOUND THEN
5013: CLOSE l_party_id_csr;
5014: -- Raise an error saying partner is not active
5015: fnd_message.Set_Name('PV', 'PV_PARTNER_NOT_ACTIVE');
5016: fnd_msg_pub.Add;
5017: RAISE FND_API.G_EXC_ERROR;
5018: ELSE
5019: CLOSE l_party_id_csr;
5020: END IF;
5042: RAISE FND_API.G_EXC_ERROR;
5043: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5044: /* FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
5045: FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_TERR_ASSIGN_PUB.Create_Channel_Team');
5046: FND_MSG_PUB.Add;
5047: */ RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5048: END IF;
5049: END IF;
5050:
5060: COMMIT WORK;
5061: END IF;
5062:
5063: -- Debug Message
5064: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5065: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
5066: END IF;
5067:
5068: -- Standard call to get message count and if count is 1, get message info.
5065: PVX_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
5066: END IF;
5067:
5068: -- Standard call to get message count and if count is 1, get message info.
5069: FND_MSG_PUB.Count_And_Get
5070: ( p_count => l_msg_count,
5071: p_data => l_msg_data
5072: );
5073:
5075: WHEN FND_API.g_exc_error THEN
5076: ROLLBACK TO Update_Channel_Team_pub;
5077: x_return_status := FND_API.g_ret_sts_error;
5078:
5079: FND_MSG_PUB.count_and_get (
5080: p_encoded => FND_API.g_false
5081: ,p_count => x_msg_count
5082: ,p_data => x_msg_data
5083: );
5082: ,p_data => x_msg_data
5083: );
5084:
5085: -- Debug Message
5086: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5087: hz_utility_v2pub.debug_return_messages (
5088: x_msg_count, x_msg_data, 'ERROR');
5089: hz_utility_v2pub.debug('Update_Channel_Team (-)');
5090: END IF;
5092: WHEN FND_API.g_exc_unexpected_error THEN
5093: ROLLBACK TO Update_Channel_Team_pub;
5094: x_return_status := FND_API.g_ret_sts_unexp_error ;
5095:
5096: FND_MSG_PUB.count_and_get (
5097: p_encoded => FND_API.g_false
5098: ,p_count => x_msg_count
5099: ,p_data => x_msg_data
5100: );
5098: ,p_count => x_msg_count
5099: ,p_data => x_msg_data
5100: );
5101: -- Debug Message
5102: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5103: hz_utility_v2pub.debug_return_messages (
5104: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
5105: hz_utility_v2pub.debug('Update_Channel_Team (-)');
5106: END IF;
5108: WHEN OTHERS THEN
5109: ROLLBACK TO Update_Channel_Team_pub;
5110: x_return_status := FND_API.g_ret_sts_unexp_error ;
5111:
5112: FND_MSG_PUB.count_and_get(
5113: p_encoded => FND_API.g_false
5114: ,p_count => x_msg_count
5115: ,p_data => x_msg_data
5116: );
5115: ,p_data => x_msg_data
5116: );
5117:
5118: -- Debug Message
5119: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5120: hz_utility_v2pub.debug_return_messages (
5121: x_msg_count, x_msg_data, 'SQL ERROR');
5122: hz_utility_v2pub.debug('Update_Channel_Team (-)');
5123: END IF;
5185:
5186: BEGIN
5187:
5188: -- Debug Message
5189: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5190: PVX_UTILITY_PVT.debug_message('Private Procedure:Process_Channel_Team Start');
5191: END IF;
5192:
5193: -- Initialize API return status to SUCCESS
5205: RAISE FND_API.G_EXC_ERROR;
5206: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5207: /* FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
5208: FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_TERR_ASSIGN_PUB.Delete_Channel_Team');
5209: FND_MSG_PUB.Add;
5210: */ RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5211: END IF;
5212: END IF;
5213:
5219: IF l_party_id_csr%NOTFOUND THEN
5220: CLOSE l_party_id_csr;
5221: -- Raise an error saying partner is not active
5222: fnd_message.Set_Name('PV', 'PV_PARTNER_NOT_ACTIVE');
5223: fnd_msg_pub.Add;
5224: RAISE FND_API.G_EXC_ERROR;
5225: ELSE
5226: CLOSE l_party_id_csr;
5227: END IF;
5264: RAISE FND_API.G_EXC_ERROR;
5265: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
5266: /* FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
5267: FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_TERR_ASSIGN_PUB.Create_Terr_Channel_Team');
5268: FND_MSG_PUB.Add;
5269: */ RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5270: END IF;
5271: END IF;
5272:
5291: RAISE FND_API.G_EXC_ERROR;
5292: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5293: /* FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
5294: FND_MESSAGE.SET_TOKEN('API_NAME', 'Create_User_Channel_Team');
5295: FND_MSG_PUB.Add;
5296: */ RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5297: END IF;
5298:
5299: END IF;
5298:
5299: END IF;
5300:
5301: -- Debug Message
5302: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5303: PVX_UTILITY_PVT.debug_message('Private Procedure:Process_Channel_Team End.');
5304: END IF;
5305:
5306: EXCEPTION
5306: EXCEPTION
5307: WHEN FND_API.g_exc_error THEN
5308: x_return_status := FND_API.g_ret_sts_error;
5309:
5310: FND_MSG_PUB.count_and_get (
5311: p_encoded => FND_API.g_false
5312: ,p_count => x_msg_count
5313: ,p_data => x_msg_data
5314: );
5313: ,p_data => x_msg_data
5314: );
5315:
5316: -- Debug Message
5317: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5318: hz_utility_v2pub.debug_return_messages (
5319: x_msg_count, x_msg_data, 'ERROR');
5320:
5321: hz_utility_v2pub.debug('Process_Channel_Team (-)');
5322: END IF;
5323:
5324: WHEN FND_API.g_exc_unexpected_error THEN
5325: x_return_status := FND_API.g_ret_sts_unexp_error ;
5326: FND_MSG_PUB.count_and_get (
5327: p_encoded => FND_API.g_false
5328: ,p_count => x_msg_count
5329: ,p_data => x_msg_data
5330: );
5329: ,p_data => x_msg_data
5330: );
5331:
5332: -- Debug Message
5333: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5334: hz_utility_v2pub.debug_return_messages (
5335: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
5336: hz_utility_v2pub.debug('Process_Channel_Team (-)');
5337: END IF;
5337: END IF;
5338:
5339: WHEN OTHERS THEN
5340: x_return_status := FND_API.g_ret_sts_unexp_error ;
5341: FND_MSG_PUB.count_and_get(
5342: p_encoded => FND_API.g_false
5343: ,p_count => x_msg_count
5344: ,p_data => x_msg_data
5345: );
5344: ,p_data => x_msg_data
5345: );
5346:
5347: -- Debug Message
5348: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5349: hz_utility_v2pub.debug_return_messages (
5350: x_msg_count, x_msg_data, 'SQL ERROR');
5351: hz_utility_v2pub.debug('Process_Channel_Team (-)');
5352: END IF;
5668: Write_log (1, substrb(fnd_message.get, 1, 255));
5669:
5670: EXCEPTION
5671: WHEN FND_API.G_EXC_ERROR THEN
5672: FND_MSG_PUB.count_and_get (
5673: p_encoded => FND_API.g_false
5674: ,p_count => l_msg_count
5675: ,p_data => l_msg_data
5676: );
5676: );
5677: --new
5678: -- RETCODE := FND_API.G_RET_STS_ERROR;
5679: l_partner_err_cnt := l_partner_err_cnt +1;
5680: apps.fnd_message.set_encoded(apps.fnd_msg_pub.get(l_msg_count));
5681: l_msg_data := substr(apps.fnd_message.get,1,254);
5682:
5683: -- Debug statement for each partner_id
5684: fnd_message.set_name('PV', 'PV_TAP_CTEAM_ERR');
5689:
5690: fnd_message.set_token('ERROR', l_msg_data);
5691: Write_log (1, substrb(fnd_message.get, 1, 255));
5692: ROLLBACK TO Process_Partner_Channel_Team;
5693: fnd_msg_pub.Delete_Msg;
5694:
5695: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5696: FND_MSG_PUB.count_and_get (
5697: p_encoded => FND_API.g_false
5692: ROLLBACK TO Process_Partner_Channel_Team;
5693: fnd_msg_pub.Delete_Msg;
5694:
5695: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5696: FND_MSG_PUB.count_and_get (
5697: p_encoded => FND_API.g_false
5698: ,p_count => l_msg_count
5699: ,p_data => l_msg_data
5700: );
5700: );
5701: --new
5702: -- RETCODE := FND_API.G_RET_STS_UNEXP_ERROR;
5703: l_partner_err_cnt := l_partner_err_cnt +1;
5704: apps.fnd_message.set_encoded(apps.fnd_msg_pub.get(l_msg_count));
5705: l_msg_data := substr(apps.fnd_message.get,1,254);
5706:
5707: -- Debug statement for each partner_id
5708: fnd_message.set_name('PV', 'PV_TAP_CTEAM_ERR');
5712: -- fnd_message.set_token('PARTNER_ID', l_partner_id);
5713: fnd_message.set_token('ERROR', l_msg_data);
5714: Write_log (1, substrb(fnd_message.get, 1, 255));
5715: ROLLBACK TO Process_Partner_Channel_Team;
5716: fnd_msg_pub.Delete_Msg;
5717:
5718: WHEN OTHERS THEN
5719: FND_MSG_PUB.count_and_get (
5720: p_encoded => FND_API.g_false
5715: ROLLBACK TO Process_Partner_Channel_Team;
5716: fnd_msg_pub.Delete_Msg;
5717:
5718: WHEN OTHERS THEN
5719: FND_MSG_PUB.count_and_get (
5720: p_encoded => FND_API.g_false
5721: ,p_count => l_msg_count
5722: ,p_data => l_msg_data
5723: );
5723: );
5724:
5725: -- RETCODE := '2';
5726: l_partner_err_cnt := l_partner_err_cnt +1;
5727: apps.fnd_message.set_encoded(apps.fnd_msg_pub.get(l_msg_count));
5728: l_msg_data := substr(apps.fnd_message.get,1,254);
5729:
5730: -- Debug statement for each partner_id
5731: fnd_message.set_name('PV', 'PV_TAP_CTEAM_ERR');
5735: -- fnd_message.set_token('PARTNER_ID', l_partner_id);
5736: fnd_message.set_token('ERROR', l_msg_data);
5737: Write_log (1, substrb(fnd_message.get, 1, 255));
5738: ROLLBACK TO Process_Partner_Channel_Team;
5739: fnd_msg_pub.Delete_Msg;
5740: END ;
5741: END LOOP;
5742: END IF ;
5743:
6330: RAISE FND_API.G_EXC_ERROR;
6331: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6332: /* FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
6333: FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_BATCH_CHG_PRTNR_PVT.Create_Batch_Chg_Partners');
6334: FND_MSG_PUB.Add;
6335: */ RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6336: END IF;
6337: END IF;
6338: ELSIF ( l_batch_partners_csr%FOUND ) THEN
6375: RAISE FND_API.G_EXC_ERROR;
6376: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6377: /* FND_MESSAGE.SET_NAME('PV', 'PV_API_FAILED');
6378: FND_MESSAGE.SET_TOKEN('API_NAME', 'PV_BATCH_CHG_PRTNR_PVT.Update_Batch_Chg_Partners');
6379: FND_MSG_PUB.Add;
6380: */ RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6381: END IF;
6382: END IF;
6383: END IF; -- l_chk_partner_exists_csr%FOUND
6395: IF l_batch_partners_csr%ISOPEN THEN
6396: CLOSE l_batch_partners_csr;
6397: END IF;
6398:
6399: FND_MSG_PUB.count_and_get (
6400: p_encoded => FND_API.g_false
6401: ,p_count => l_msg_count
6402: ,p_data => l_msg_data
6403: );
6402: ,p_data => l_msg_data
6403: );
6404:
6405: l_partner_err_cnt := l_partner_err_cnt +1;
6406: apps.fnd_message.set_encoded(apps.fnd_msg_pub.get(l_msg_count));
6407: l_msg_data := substr(apps.fnd_message.get,1,254);
6408:
6409:
6410: -- Debug statement for each partner_id
6414: -- fnd_message.set_token('PARTNER_ID', l_partner_id);
6415: fnd_message.set_token('ERROR', l_msg_data);
6416: Write_log (1, substrb(fnd_message.get, 1, 255));
6417: ROLLBACK TO Process_Partner_Channel_Team;
6418: fnd_msg_pub.Delete_Msg;
6419:
6420: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6421: IF l_batch_partners_csr%ISOPEN THEN
6422: CLOSE l_batch_partners_csr;
6421: IF l_batch_partners_csr%ISOPEN THEN
6422: CLOSE l_batch_partners_csr;
6423: END IF;
6424:
6425: FND_MSG_PUB.count_and_get (
6426: p_encoded => FND_API.g_false
6427: ,p_count => l_msg_count
6428: ,p_data => l_msg_data
6429: );
6428: ,p_data => l_msg_data
6429: );
6430:
6431: l_partner_err_cnt := l_partner_err_cnt +1;
6432: apps.fnd_message.set_encoded(apps.fnd_msg_pub.get(l_msg_count));
6433: l_msg_data := substr(apps.fnd_message.get,1,254);
6434:
6435: -- Debug statement for each partner_id
6436: fnd_message.set_name('PV', 'PV_TAP_CTEAM_ERR');
6439: -- fnd_message.set_token('PARTNER_ID', l_partner_id);
6440: fnd_message.set_token('ERROR', l_msg_data);
6441: Write_log (1, substrb(fnd_message.get, 1, 255));
6442: ROLLBACK TO Process_Partner_Channel_Team;
6443: fnd_msg_pub.Delete_Msg;
6444:
6445: WHEN OTHERS THEN
6446:
6447: IF l_batch_partners_csr%ISOPEN THEN
6447: IF l_batch_partners_csr%ISOPEN THEN
6448: CLOSE l_batch_partners_csr;
6449: END IF;
6450:
6451: FND_MSG_PUB.count_and_get (
6452: p_encoded => FND_API.g_false
6453: ,p_count => l_msg_count
6454: ,p_data => l_msg_data
6455: );
6454: ,p_data => l_msg_data
6455: );
6456:
6457: l_partner_err_cnt := l_partner_err_cnt +1;
6458: apps.fnd_message.set_encoded(apps.fnd_msg_pub.get(l_msg_count));
6459: l_msg_data := substr(apps.fnd_message.get,1,254);
6460:
6461:
6462: -- Debug statement for each partner_id
6466: -- fnd_message.set_token('PARTNER_ID', l_partner_id);
6467: fnd_message.set_token('ERROR', l_msg_data);
6468: Write_log (1, substrb(fnd_message.get, 1, 255));
6469: ROLLBACK TO Process_Partner_Channel_Team;
6470: fnd_msg_pub.Delete_Msg;
6471:
6472: END ;
6473: END LOOP; --FOR i IN 1..l_partner_list_tbl.last
6474: END IF ; -- l_partner_list_tbl.count > 0