DBA Data[Home] [Help]

APPS.CSP_TASK_PARTS_PKG dependencies on CSP_TASK_PARTS

Line 1: PACKAGE BODY CSP_TASK_PARTS_PKG as

1: PACKAGE BODY CSP_TASK_PARTS_PKG as
2: /* $Header: cspttapb.pls 115.3 2002/11/26 07:42:33 hhaugeru noship $ */
3: -- Start of Comments
4: -- Package name : CSP_TASK_PARTS_PKG
5: -- Purpose :

Line 4: -- Package name : CSP_TASK_PARTS_PKG

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

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

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

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

44: P_ROLLUP_QUANTITY_USED NUMBER,
45: P_ROLLUP_TIMES_USED NUMBER,
46: P_SUBSTITUTE_ITEM NUMBER)
47: IS
48: CURSOR C2 IS SELECT CSP_TASK_PARTS_S1.nextval FROM sys.dual;
49: BEGIN
50: If (px_TASK_PART_ID IS NULL) OR (px_TASK_PART_ID = FND_API.G_MISS_NUM) then
51: OPEN C2;
52: FETCH C2 INTO px_TASK_PART_ID;

Line 55: INSERT INTO CSP_TASK_PARTS(

51: OPEN C2;
52: FETCH C2 INTO px_TASK_PART_ID;
53: CLOSE C2;
54: End If;
55: INSERT INTO CSP_TASK_PARTS(
56: TASK_PART_ID,
57: PRODUCT_TASK_ID,
58: INVENTORY_ITEM_ID,
59: MANUAL_QUANTITY,

Line 167: Update CSP_TASK_PARTS

163: P_ROLLUP_TIMES_USED NUMBER,
164: P_SUBSTITUTE_ITEM NUMBER)
165: IS
166: BEGIN
167: Update CSP_TASK_PARTS
168: SET
169: PRODUCT_TASK_ID = decode( p_PRODUCT_TASK_ID, FND_API.G_MISS_NUM, PRODUCT_TASK_ID, p_PRODUCT_TASK_ID),
170: INVENTORY_ITEM_ID = decode( p_INVENTORY_ITEM_ID, FND_API.G_MISS_NUM, INVENTORY_ITEM_ID, p_INVENTORY_ITEM_ID),
171: MANUAL_QUANTITY = decode( p_MANUAL_QUANTITY, FND_API.G_MISS_NUM, MANUAL_QUANTITY, p_MANUAL_QUANTITY),

Line 212: DELETE FROM CSP_TASK_PARTS

208: PROCEDURE Delete_Row(
209: p_TASK_PART_ID NUMBER)
210: IS
211: BEGIN
212: DELETE FROM CSP_TASK_PARTS
213: WHERE TASK_PART_ID = p_TASK_PART_ID;
214: If (SQL%NOTFOUND) then
215: RAISE NO_DATA_FOUND;
216: End If;

Line 257: FROM CSP_TASK_PARTS

253: P_SUBSTITUTE_ITEM NUMBER)
254: IS
255: CURSOR C IS
256: SELECT *
257: FROM CSP_TASK_PARTS
258: WHERE TASK_PART_ID = p_TASK_PART_ID
259: FOR UPDATE of TASK_PART_ID NOWAIT;
260: Recinfo C%ROWTYPE;
261: BEGIN

Line 381: End CSP_TASK_PARTS_PKG;

377: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
378: APP_EXCEPTION.RAISE_EXCEPTION;
379: End If;
380: END Lock_Row;
381: End CSP_TASK_PARTS_PKG;