1: PACKAGE BODY AS_LEAD_CONTACTS_PKG as
2: /* $Header: asxtlcnb.pls 115.5 2002/12/13 11:20:38 nkamble ship $ */
3: -- Start of Comments
4: -- Package name : AS_LEAD_CONTACTS_PKG
5: -- Purpose :
1: PACKAGE BODY AS_LEAD_CONTACTS_PKG as
2: /* $Header: asxtlcnb.pls 115.5 2002/12/13 11:20:38 nkamble ship $ */
3: -- Start of Comments
4: -- Package name : AS_LEAD_CONTACTS_PKG
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments
7: -- NOTE :
8: -- End of Comments
9:
10:
11: G_PKG_NAME CONSTANT VARCHAR2(30):= 'AS_LEAD_CONTACTS_PKG';
12: G_FILE_NAME CONSTANT VARCHAR2(12) := 'asxtlcnb.pls';
13:
14: PROCEDURE Insert_Row(
15: px_LEAD_CONTACT_ID IN OUT NOCOPY NUMBER,
405: APP_EXCEPTION.RAISE_EXCEPTION;
406: End If;
407: END Lock_Row;
408:
409: End AS_LEAD_CONTACTS_PKG;