117: END IF;
118: CLOSE C_CONTACT_ID_Exists;
119: END IF;
120:
121: -- Standard call to get message count and if count is 1, get message info.
122: FND_MSG_PUB.Count_And_Get
123: ( p_count => x_msg_count,
124: p_data => x_msg_data
125: );
230: END IF;
231: END IF;
232: -- end ffang 092000 for bug 1406761
233:
234: -- Standard call to get message count and if count is 1, get message info.
235:
236: FND_MSG_PUB.Count_And_Get
237: ( p_count => x_msg_count,
238: p_data => x_msg_data
301: END IF;
302: CLOSE C_PHONE_ID_Exists;
303: END IF;
304:
305: -- Standard call to get message count and if count is 1, get message info.
306: FND_MSG_PUB.Count_And_Get
307: ( p_count => x_msg_count,
308: p_data => x_msg_data
309: );
363: END IF;
364: CLOSE C_Lookup_Exists;
365: END IF;
366:
367: -- Standard call to get message count and IF count is 1, get message info.
368: FND_MSG_PUB.Count_And_Get
369: ( p_count => x_msg_count,
370: p_data => x_msg_data );
371: END Validate_CONTACT_ROLE_CODE;
594: l_contact_party_id NUMBER;
595: l_cnt_person_party_id NUMBER;
596: l_contact_phone_id NUMBER;
597: BEGIN
598: -- Standard Start of API savepoint
599: SAVEPOINT CREATE_SALES_LEAD_CONTACTS_PVT;
600: -- Standard call to check for call compatibility.
601: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
602: p_api_version_number,
596: l_contact_phone_id NUMBER;
597: BEGIN
598: -- Standard Start of API savepoint
599: SAVEPOINT CREATE_SALES_LEAD_CONTACTS_PVT;
600: -- Standard call to check for call compatibility.
601: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
602: p_api_version_number,
603: l_api_name,
604: G_PKG_NAME)
948: --
949: -- END of API body
950: --
951:
952: -- Standard check for p_commit
953: IF FND_API.to_Boolean( p_commit )
954: THEN
955: COMMIT WORK;
956: END IF;
963: 'PVT: ' || l_api_name || ' End');
964: END IF;
965:
966:
967: -- Standard call to get message count and IF count is 1, get message info.
968: FND_MSG_PUB.Count_And_Get
969: ( p_count => x_msg_count,
970: p_data => x_msg_data
971: );
1058: and r.party_id = slc.contact_party_id
1059: and r.object_id = slc.customer_id;
1060:
1061: BEGIN
1062: -- Standard Start of API savepoint
1063: SAVEPOINT UPDATE_SALES_LEAD_CONTACTS_PVT;
1064:
1065: -- Standard call to check for call compatibility.
1066: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1061: BEGIN
1062: -- Standard Start of API savepoint
1063: SAVEPOINT UPDATE_SALES_LEAD_CONTACTS_PVT;
1064:
1065: -- Standard call to check for call compatibility.
1066: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1067: p_api_version_number,
1068: l_api_name,
1069: G_PKG_NAME)
1450: --
1451: -- END of API body.
1452: --
1453:
1454: -- Standard check for p_commit
1455: IF FND_API.to_Boolean( p_commit )
1456: THEN
1457: COMMIT WORK;
1458: END IF;
1463: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1464: 'PVT: ' || l_api_name || ' End');
1465: END IF;
1466:
1467: -- Standard call to get message count and IF count is 1, get message info.
1468: FND_MSG_PUB.Count_And_Get
1469: ( p_count => x_msg_count,
1470: p_data => x_msg_data );
1471:
1544: l_update_access_flag VARCHAR2(1);
1545: l_member_role VARCHAR2(5);
1546: l_member_access VARCHAR2(5);
1547: BEGIN
1548: -- Standard Start of API savepoint
1549: SAVEPOINT DELETE_SALES_LEAD_CONTACTS_PVT;
1550:
1551: -- Standard call to check for call compatibility.
1552: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1547: BEGIN
1548: -- Standard Start of API savepoint
1549: SAVEPOINT DELETE_SALES_LEAD_CONTACTS_PVT;
1550:
1551: -- Standard call to check for call compatibility.
1552: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1553: p_api_version_number,
1554: l_api_name,
1555: G_PKG_NAME)
1764: --
1765: -- END of API body
1766: --
1767:
1768: -- Standard check for p_commit
1769: IF FND_API.to_Boolean( p_commit )
1770: THEN
1771: COMMIT WORK;
1772: END IF;
1778: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1779: 'PVT: ' || l_api_name || ' End');
1780: END IF;
1781:
1782: -- Standard call to get message count and IF count is 1, get message info.
1783: FND_MSG_PUB.Count_And_Get
1784: ( p_count => x_msg_count,
1785: p_data => x_msg_data );
1786:
1928: --
1929: -- END of API body
1930: --
1931:
1932: -- Standard check for p_commit
1933: IF FND_API.to_Boolean( p_commit )
1934: THEN
1935: COMMIT WORK;
1936: END IF;
1942: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1943: 'PVT: ' || l_api_name || ' End');
1944: END IF;
1945:
1946: -- Standard call to get message count and IF count is 1, get message info.
1947: FND_MSG_PUB.Count_And_Get
1948: ( p_count => x_msg_count,
1949: p_data => x_msg_data
1950: );