APPS.AS_SALES_LEAD_CONTACTS_PKG dependencies on AS_SALES_LEAD_CONTACTS

Line 1: PACKAGE BODY AS_SALES_LEAD_CONTACTS_PKG as

1: PACKAGE BODY AS_SALES_LEAD_CONTACTS_PKG as
2: /* $Header: asxtslcb.pls 115.7 2004/04/14 20:39:48 chchandr ship $ */
3: -- Start of Comments
4: -- Package name : AS_SALES_LEAD_CONTACTS_PKG
5: -- Purpose : Sales lead contacts table handlers

Line 4: -- Package name : AS_SALES_LEAD_CONTACTS_PKG

1: PACKAGE BODY AS_SALES_LEAD_CONTACTS_PKG as
2: /* $Header: asxtslcb.pls 115.7 2004/04/14 20:39:48 chchandr ship $ */
3: -- Start of Comments
4: -- Package name : AS_SALES_LEAD_CONTACTS_PKG
5: -- Purpose : Sales lead contacts table handlers
6: -- NOTE :
7: -- History : 04/09/2001 FFANG Created.
8: --

Line 12: G_PKG_NAME CONSTANT VARCHAR2(30):= 'AS_SALES_LEAD_CONTACTS_PKG';

8: --
9: -- End of Comments
10:
11:
12: G_PKG_NAME CONSTANT VARCHAR2(30):= 'AS_SALES_LEAD_CONTACTS_PKG';
13: G_FILE_NAME CONSTANT VARCHAR2(12) := 'asxtslcb.pls';
14:
15:
16: AS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);

Line 61: CURSOR C2 IS SELECT AS_SALES_LEAD_CONTACTS_S.nextval FROM sys.dual;

57: p_ATTRIBUTE15 VARCHAR2)
58: -- p_SECURITY_GROUP_ID NUMBER)
59:
60: IS
61: CURSOR C2 IS SELECT AS_SALES_LEAD_CONTACTS_S.nextval FROM sys.dual;
62: BEGIN
63: If (px_LEAD_CONTACT_ID IS NULL) OR (px_LEAD_CONTACT_ID = FND_API.G_MISS_NUM) then
64: OPEN C2;
65: FETCH C2 INTO px_LEAD_CONTACT_ID;

Line 68: INSERT INTO AS_SALES_LEAD_CONTACTS(

64: OPEN C2;
65: FETCH C2 INTO px_LEAD_CONTACT_ID;
66: CLOSE C2;
67: End If;
68: INSERT INTO AS_SALES_LEAD_CONTACTS(
69: LEAD_CONTACT_ID,
70: SALES_LEAD_ID,
71: CONTACT_ID,
72: CONTACT_PARTY_ID,

Line 201: from AS_SALES_LEAD_CONTACTS

197: /* l_obj_verno number;
198:
199: cursor c_obj_verno is
200: select object_version_number
201: from AS_SALES_LEAD_CONTACTS
202: where LEAD_CONTACT_ID = p_LEAD_CONTACT_ID;
203: */
204: BEGIN
205: Update AS_SALES_LEAD_CONTACTS

Line 205: Update AS_SALES_LEAD_CONTACTS

201: from AS_SALES_LEAD_CONTACTS
202: where LEAD_CONTACT_ID = p_LEAD_CONTACT_ID;
203: */
204: BEGIN
205: Update AS_SALES_LEAD_CONTACTS
206: SET
207: SALES_LEAD_ID = decode( p_SALES_LEAD_ID, FND_API.G_MISS_NUM,
208: SALES_LEAD_ID, p_SALES_LEAD_ID),
209: CONTACT_ID = decode( p_CONTACT_ID, FND_API.G_MISS_NUM, CONTACT_ID,

Line 286: update AS_SALES_LEAD_CONTACTS

282: open c_obj_verno;
283: fetch c_obj_verno into l_obj_verno;
284: close c_obj_verno;
285:
286: update AS_SALES_LEAD_CONTACTS
287: set object_version_number = decode(l_obj_verno, null, 1, l_obj_verno+1)
288: where LEAD_CONTACT_ID = p_LEAD_CONTACT_ID;
289: */
290: If (SQL%NOTFOUND) then

Line 299: DELETE FROM AS_SALES_LEAD_CONTACTS

295: PROCEDURE SALES_LEAD_CONTACTS_Delete_Row(
296: p_LEAD_CONTACT_ID NUMBER)
297: IS
298: BEGIN
299: DELETE FROM AS_SALES_LEAD_CONTACTS
300: WHERE LEAD_CONTACT_ID = p_LEAD_CONTACT_ID;
301: If (SQL%NOTFOUND) then
302: RAISE NO_DATA_FOUND;
303: End If;

Line 348: FROM AS_SALES_LEAD_CONTACTS

344:
345: IS
346: CURSOR C IS
347: SELECT *
348: FROM AS_SALES_LEAD_CONTACTS
349: WHERE LEAD_CONTACT_ID = p_LEAD_CONTACT_ID
350: FOR UPDATE of LEAD_CONTACT_ID NOWAIT;
351: Recinfo C%ROWTYPE;
352: BEGIN

Line 480: End AS_SALES_LEAD_CONTACTS_PKG;

476: End If;
477: END SALES_LEAD_CONTACTS_Lock_Row;
478:
479:
480: End AS_SALES_LEAD_CONTACTS_PKG;