APPS.AS_LEAD_COMPETITORS_PKG dependencies on AS_LEAD_COMPETITORS

Line 1: PACKAGE BODY AS_LEAD_COMPETITORS_PKG as

1: PACKAGE BODY AS_LEAD_COMPETITORS_PKG as
2: /* $Header: asxtcmpb.pls 115.8 2004/01/13 10:08:32 gbatra ship $ */
3: -- Start of Comments
4: -- Package name : AS_LEAD_COMPETITORS_PKG
5: -- Purpose :

Line 4: -- Package name : AS_LEAD_COMPETITORS_PKG

1: PACKAGE BODY AS_LEAD_COMPETITORS_PKG as
2: /* $Header: asxtcmpb.pls 115.8 2004/01/13 10:08:32 gbatra ship $ */
3: -- Start of Comments
4: -- Package name : AS_LEAD_COMPETITORS_PKG
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments

Line 11: G_PKG_NAME CONSTANT VARCHAR2(30):= 'AS_LEAD_COMPETITORS_PKG';

7: -- NOTE :
8: -- End of Comments
9:
10:
11: G_PKG_NAME CONSTANT VARCHAR2(30):= 'AS_LEAD_COMPETITORS_PKG';
12: G_FILE_NAME CONSTANT VARCHAR2(12) := 'asxtcmpb.pls';
13:
14: PROCEDURE Insert_Row(
15: px_LEAD_COMPETITOR_ID IN OUT NOCOPY NUMBER,

Line 52: CURSOR C2 IS SELECT AS_LEAD_COMPETITORS_S.nextval FROM sys.dual;

48: p_RELATIONSHIP_PARTY_ID NUMBER,
49: p_COMPETITOR_ID NUMBER)
50:
51: IS
52: CURSOR C2 IS SELECT AS_LEAD_COMPETITORS_S.nextval FROM sys.dual;
53: BEGIN
54: If (px_LEAD_COMPETITOR_ID IS NULL) OR (px_LEAD_COMPETITOR_ID = FND_API.G_MISS_NUM) then
55: OPEN C2;
56: FETCH C2 INTO px_LEAD_COMPETITOR_ID;

Line 59: INSERT INTO AS_LEAD_COMPETITORS(

55: OPEN C2;
56: FETCH C2 INTO px_LEAD_COMPETITOR_ID;
57: CLOSE C2;
58: End If;
59: INSERT INTO AS_LEAD_COMPETITORS(
60: LEAD_COMPETITOR_ID,
61: LAST_UPDATE_DATE,
62: LAST_UPDATED_BY,
63: CREATION_DATE,

Line 172: Update AS_LEAD_COMPETITORS

168: p_COMPETITOR_ID NUMBER)
169:
170: IS
171: BEGIN
172: Update AS_LEAD_COMPETITORS
173: SET object_version_number = nvl(object_version_number,0) + 1,
174: LAST_UPDATE_DATE = decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, LAST_UPDATE_DATE, p_LAST_UPDATE_DATE),
175: LAST_UPDATED_BY = decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, LAST_UPDATED_BY, p_LAST_UPDATED_BY),
176: CREATION_DATE = decode( p_CREATION_DATE, FND_API.G_MISS_DATE, CREATION_DATE, p_CREATION_DATE),

Line 219: DELETE FROM AS_LEAD_COMPETITORS

215: PROCEDURE Delete_Row(
216: p_LEAD_COMPETITOR_ID NUMBER)
217: IS
218: BEGIN
219: DELETE FROM AS_LEAD_COMPETITORS
220: WHERE LEAD_COMPETITOR_ID = p_LEAD_COMPETITOR_ID;
221: If (SQL%NOTFOUND) then
222: RAISE NO_DATA_FOUND;
223: End If;

Line 266: FROM AS_LEAD_COMPETITORS

262:
263: IS
264: CURSOR C IS
265: SELECT *
266: FROM AS_LEAD_COMPETITORS
267: WHERE LEAD_COMPETITOR_ID = p_LEAD_COMPETITOR_ID
268: FOR UPDATE of LEAD_COMPETITOR_ID NOWAIT;
269: Recinfo C%ROWTYPE;
270: BEGIN

Line 391: End AS_LEAD_COMPETITORS_PKG;

387: APP_EXCEPTION.RAISE_EXCEPTION;
388: End If;
389: END Lock_Row;
390:
391: End AS_LEAD_COMPETITORS_PKG;