APPS.CSP_EXCESS_RULES_B_PKG dependencies on CSP_EXCESS_RULES_B

Line 1: PACKAGE BODY CSP_EXCESS_RULES_B_PKG as

1: PACKAGE BODY CSP_EXCESS_RULES_B_PKG as
2: /* $Header: csptexrb.pls 115.5 2002/11/26 07:26:56 hhaugeru noship $ */
3: -- Start of Comments
4: -- Package name : CSP_EXCESS_RULES_B_PKG
5: -- Purpose :

Line 4: -- Package name : CSP_EXCESS_RULES_B_PKG

1: PACKAGE BODY CSP_EXCESS_RULES_B_PKG as
2: /* $Header: csptexrb.pls 115.5 2002/11/26 07:26:56 hhaugeru noship $ */
3: -- Start of Comments
4: -- Package name : CSP_EXCESS_RULES_B_PKG
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments

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

8: -- End of Comments
9:
10:
11:
12: G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSP_EXCESS_RULES_B_PKG';
13: G_FILE_NAME CONSTANT VARCHAR2(12) := 'csptexrb.pls';
14:
15: PROCEDURE Insert_Row(
16: px_EXCESS_RULE_ID IN OUT NOCOPY NUMBER,

Line 48: CURSOR C2 IS SELECT CSP_EXCESS_RULES_B_S1.nextval FROM sys.dual;

44: p_ATTRIBUTE14 VARCHAR2,
45: p_ATTRIBUTE15 VARCHAR2,
46: p_DESCRIPTION VARCHAR2)
47: IS
48: CURSOR C2 IS SELECT CSP_EXCESS_RULES_B_S1.nextval FROM sys.dual;
49: BEGIN
50: If (px_EXCESS_RULE_ID IS NULL) OR (px_EXCESS_RULE_ID = FND_API.G_MISS_NUM) then
51: OPEN C2;
52: FETCH C2 INTO px_EXCESS_RULE_ID;

Line 55: INSERT INTO CSP_EXCESS_RULES_B(

51: OPEN C2;
52: FETCH C2 INTO px_EXCESS_RULE_ID;
53: CLOSE C2;
54: End If;
55: INSERT INTO CSP_EXCESS_RULES_B(
56: EXCESS_RULE_ID,
57: CREATED_BY,
58: CREATION_DATE,
59: LAST_UPDATED_BY,

Line 181: Update CSP_EXCESS_RULES_B

177: p_ATTRIBUTE15 VARCHAR2,
178: p_DESCRIPTION VARCHAR2)
179: IS
180: BEGIN
181: Update CSP_EXCESS_RULES_B
182: SET
183: CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, CREATED_BY, p_CREATED_BY),
184: CREATION_DATE = decode( p_CREATION_DATE, FND_API.G_MISS_DATE, CREATION_DATE, p_CREATION_DATE),
185: LAST_UPDATED_BY = decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, LAST_UPDATED_BY, p_LAST_UPDATED_BY),

Line 236: DELETE FROM CSP_EXCESS_RULES_B

232: PROCEDURE Delete_Row(
233: p_EXCESS_RULE_ID NUMBER)
234: IS
235: BEGIN
236: DELETE FROM CSP_EXCESS_RULES_B
237: WHERE EXCESS_RULE_ID = p_EXCESS_RULE_ID;
238: If (SQL%NOTFOUND) then
239: RAISE NO_DATA_FOUND;
240: End If;

Line 283: FROM CSP_EXCESS_RULES_B

279: p_DESCRIPTION VARCHAR2)
280: IS
281: CURSOR C IS
282: SELECT *
283: FROM CSP_EXCESS_RULES_B
284: WHERE EXCESS_RULE_ID = p_EXCESS_RULE_ID
285: FOR UPDATE of EXCESS_RULE_ID NOWAIT;
286: CURSOR c1 is select
287: DESCRIPTION,

Line 419: from CSP_EXCESS_RULES_B B

415: begin
416: delete from CSP_EXCESS_RULES_TL T
417: where not exists
418: (select NULL
419: from CSP_EXCESS_RULES_B B
420: where B.EXCESS_RULE_ID = T.EXCESS_RULE_ID
421: );
422:
423: update CSP_EXCESS_RULES_TL T set (

Line 603: End CSP_EXCESS_RULES_B_PKG;

599: END IF;
600: RAISE;
601:
602: END Load_Row;
603: End CSP_EXCESS_RULES_B_PKG;