APPS.CSP_PACKLIST_SERIAL_LOTS_PKG dependencies on CSP_PACKLIST_SERIAL_LOTS

Line 1: PACKAGE BODY CSP_PACKLIST_SERIAL_LOTS_PKG AS

1: PACKAGE BODY CSP_PACKLIST_SERIAL_LOTS_PKG AS
2: /* $Header: cspttspb.pls 115.5 2002/11/26 07:14:46 hhaugeru ship $ */
3: -- Start of Comments
4: -- Package name : CSP_PACKLIST_SERIAL_LOTS_PKG
5: -- Purpose :

Line 4: -- Package name : CSP_PACKLIST_SERIAL_LOTS_PKG

1: PACKAGE BODY CSP_PACKLIST_SERIAL_LOTS_PKG AS
2: /* $Header: cspttspb.pls 115.5 2002/11/26 07:14:46 hhaugeru ship $ */
3: -- Start of Comments
4: -- Package name : CSP_PACKLIST_SERIAL_LOTS_PKG
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments

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

7: -- NOTE :
8: -- End of Comments
9:
10:
11: G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSP_PACKLIST_SERIAL_LOTS_PKG';
12: G_FILE_NAME CONSTANT VARCHAR2(12) := 'cspttspb.pls';
13: G_USER_ID NUMBER := FND_GLOBAL.USER_ID;
14: G_LOGIN_ID NUMBER := FND_GLOBAL.CONC_LOGIN_ID;
15:

Line 31: CURSOR C2 IS SELECT CSP_PACKLIST_SERIAL_LOTS_S1.nextval FROM sys.dual;

27: p_LOT_NUMBER VARCHAR2,
28: p_SERIAL_NUMBER VARCHAR2)
29:
30: IS
31: CURSOR C2 IS SELECT CSP_PACKLIST_SERIAL_LOTS_S1.nextval FROM sys.dual;
32: BEGIN
33: If (px_PACKLIST_SERIAL_LOT_ID IS NULL) OR (px_PACKLIST_SERIAL_LOT_ID = FND_API.G_MISS_NUM) then
34: OPEN C2;
35: FETCH C2 INTO px_PACKLIST_SERIAL_LOT_ID;

Line 38: INSERT INTO CSP_PACKLIST_SERIAL_LOTS(

34: OPEN C2;
35: FETCH C2 INTO px_PACKLIST_SERIAL_LOT_ID;
36: CLOSE C2;
37: End If;
38: INSERT INTO CSP_PACKLIST_SERIAL_LOTS(
39: PACKLIST_SERIAL_LOT_ID,
40: CREATED_BY,
41: CREATION_DATE,
42: LAST_UPDATED_BY,

Line 82: Update CSP_PACKLIST_SERIAL_LOTS

78: p_SERIAL_NUMBER VARCHAR2)
79:
80: IS
81: BEGIN
82: Update CSP_PACKLIST_SERIAL_LOTS
83: SET
84: CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, CREATED_BY, p_CREATED_BY),
85: CREATION_DATE = decode(p_CREATION_DATE,fnd_api.g_miss_date,creation_date,p_creation_date),
86: LAST_UPDATED_BY = G_USER_ID,

Line 106: DELETE FROM CSP_PACKLIST_SERIAL_LOTS

102: PROCEDURE Delete_Row(
103: p_PACKLIST_SERIAL_LOT_ID NUMBER)
104: IS
105: BEGIN
106: DELETE FROM CSP_PACKLIST_SERIAL_LOTS
107: WHERE PACKLIST_SERIAL_LOT_ID = p_PACKLIST_SERIAL_LOT_ID;
108: If (SQL%NOTFOUND) then
109: RAISE NO_DATA_FOUND;
110: End If;

Line 130: FROM CSP_PACKLIST_SERIAL_LOTS

126:
127: IS
128: CURSOR C IS
129: SELECT *
130: FROM CSP_PACKLIST_SERIAL_LOTS
131: WHERE PACKLIST_SERIAL_LOT_ID = p_PACKLIST_SERIAL_LOT_ID
132: FOR UPDATE of PACKLIST_SERIAL_LOT_ID NOWAIT;
133: Recinfo C%ROWTYPE;
134: BEGIN

Line 186: End CSP_PACKLIST_SERIAL_LOTS_PKG;

182: APP_EXCEPTION.RAISE_EXCEPTION;
183: End If;
184: END Lock_Row;
185:
186: End CSP_PACKLIST_SERIAL_LOTS_PKG;