APPS.CSP_EXCESS_LISTS_PKG dependencies on CSP_EXCESS_LISTS

Line 1: PACKAGE BODY CSP_EXCESS_LISTS_PKG as

1: PACKAGE BODY CSP_EXCESS_LISTS_PKG as
2: /* $Header: csptexcb.pls 115.3 2002/11/26 07:28:08 hhaugeru noship $ */
3: -- Start of Comments
4: -- Package name : CSP_EXCESS_LISTS_PKG
5: -- Purpose :

Line 4: -- Package name : CSP_EXCESS_LISTS_PKG

1: PACKAGE BODY CSP_EXCESS_LISTS_PKG as
2: /* $Header: csptexcb.pls 115.3 2002/11/26 07:28:08 hhaugeru noship $ */
3: -- Start of Comments
4: -- Package name : CSP_EXCESS_LISTS_PKG
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments

Line 9: G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSP_EXCESS_LISTS_PKG';

5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments
9: G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSP_EXCESS_LISTS_PKG';
10: G_FILE_NAME CONSTANT VARCHAR2(12) := 'csptexcb.pls';
11: PROCEDURE Insert_Row(
12: px_EXCESS_LINE_ID IN OUT NOCOPY NUMBER,
13: p_CREATED_BY NUMBER,

Line 44: CURSOR C2 IS SELECT CSP_EXCESS_LISTS_S1.nextval FROM sys.dual;

40: p_ATTRIBUTE13 VARCHAR2,
41: p_ATTRIBUTE14 VARCHAR2,
42: p_ATTRIBUTE15 VARCHAR2)
43: IS
44: CURSOR C2 IS SELECT CSP_EXCESS_LISTS_S1.nextval FROM sys.dual;
45: BEGIN
46: If (px_EXCESS_LINE_ID IS NULL) OR (px_EXCESS_LINE_ID = FND_API.G_MISS_NUM) then
47: OPEN C2;
48: FETCH C2 INTO px_EXCESS_LINE_ID;

Line 51: INSERT INTO CSP_EXCESS_LISTS(

47: OPEN C2;
48: FETCH C2 INTO px_EXCESS_LINE_ID;
49: CLOSE C2;
50: End If;
51: INSERT INTO CSP_EXCESS_LISTS(
52: EXCESS_LINE_ID,
53: CREATED_BY,
54: CREATION_DATE,
55: LAST_UPDATED_BY,

Line 149: Update CSP_EXCESS_LISTS

145: p_ATTRIBUTE14 VARCHAR2,
146: p_ATTRIBUTE15 VARCHAR2)
147: IS
148: BEGIN
149: Update CSP_EXCESS_LISTS
150: SET
151: CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, CREATED_BY, p_CREATED_BY),
152: CREATION_DATE = decode( p_CREATION_DATE, FND_API.G_MISS_DATE, CREATION_DATE, p_CREATION_DATE),
153: LAST_UPDATED_BY = decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, LAST_UPDATED_BY, p_LAST_UPDATED_BY),

Line 189: DELETE FROM CSP_EXCESS_LISTS

185: PROCEDURE Delete_Row(
186: p_EXCESS_LINE_ID NUMBER)
187: IS
188: BEGIN
189: DELETE FROM CSP_EXCESS_LISTS
190: WHERE EXCESS_LINE_ID = p_EXCESS_LINE_ID;
191: If (SQL%NOTFOUND) then
192: RAISE NO_DATA_FOUND;
193: End If;

Line 229: FROM CSP_EXCESS_LISTS

225: p_ATTRIBUTE15 VARCHAR2)
226: IS
227: CURSOR C IS
228: SELECT *
229: FROM CSP_EXCESS_LISTS
230: WHERE EXCESS_LINE_ID = p_EXCESS_LINE_ID
231: FOR UPDATE of EXCESS_LINE_ID NOWAIT;
232: Recinfo C%ROWTYPE;
233: BEGIN

Line 338: End CSP_EXCESS_LISTS_PKG;

334: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
335: APP_EXCEPTION.RAISE_EXCEPTION;
336: End If;
337: END Lock_Row;
338: End CSP_EXCESS_LISTS_PKG;