1: PACKAGE BODY CSD_GROUP_JOB_PARAM_TEMP_PKG as
2: /* $Header: csdtjprb.pls 115.6 2002/12/02 23:42:30 takwong noship $ */
3: -- Start of Comments
4: -- Package name : CSD_GROUP_JOB_PARAM_TEMP_PKG
5: -- Purpose :
1: PACKAGE BODY CSD_GROUP_JOB_PARAM_TEMP_PKG as
2: /* $Header: csdtjprb.pls 115.6 2002/12/02 23:42:30 takwong noship $ */
3: -- Start of Comments
4: -- Package name : CSD_GROUP_JOB_PARAM_TEMP_PKG
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments
7: -- NOTE :
8: -- End of Comments
9:
10:
11: G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSD_GROUP_JOB_PARAM_TEMP_PKG';
12: G_FILE_NAME CONSTANT VARCHAR2(12) := 'csdtjprb.pls';
13: l_debug NUMBER := csd_gen_utility_pvt.g_debug_level;
14:
15: PROCEDURE Insert_Row(
36: ,p_INCIDENT_ID NUMBER
37: ,p_PROCESS_ID NUMBER)
38:
39: IS
40: CURSOR C2 IS SELECT CSD_GROUP_JOB_PARAM_TEMP_S1.nextval FROM sys.dual;
41: BEGIN
42: If (px_GROUP_JOB_ID IS NULL) OR (px_GROUP_JOB_ID = FND_API.G_MISS_NUM) then
43: OPEN C2;
44: FETCH C2 INTO px_GROUP_JOB_ID;
43: OPEN C2;
44: FETCH C2 INTO px_GROUP_JOB_ID;
45: CLOSE C2;
46: End If;
47: INSERT INTO CSD_GROUP_JOB_PARAM_TEMP(
48: GROUP_JOB_ID
49: ,REPAIR_GROUP_ID
50: ,INVENTORY_ITEM_ID
51: ,ORGANIZATION_ID
117: ,p_PROCESS_ID NUMBER)
118:
119: IS
120: BEGIN
121: Update CSD_GROUP_JOB_PARAM_TEMP
122: SET
123: REPAIR_GROUP_ID = decode( p_REPAIR_GROUP_ID, FND_API.G_MISS_NUM, REPAIR_GROUP_ID, p_REPAIR_GROUP_ID)
124: ,INVENTORY_ITEM_ID = decode( p_INVENTORY_ITEM_ID, FND_API.G_MISS_NUM, INVENTORY_ITEM_ID, p_INVENTORY_ITEM_ID)
125: ,ORGANIZATION_ID = decode( p_ORGANIZATION_ID, FND_API.G_MISS_NUM, ORGANIZATION_ID, p_ORGANIZATION_ID)
151: PROCEDURE Delete_Row(
152: p_GROUP_JOB_ID NUMBER)
153: IS
154: BEGIN
155: DELETE FROM CSD_GROUP_JOB_PARAM_TEMP
156: WHERE GROUP_JOB_ID = p_GROUP_JOB_ID;
157: If (SQL%NOTFOUND) then
158: RAISE NO_DATA_FOUND;
159: End If;
165:
166: IS
167: CURSOR C IS
168: SELECT *
169: FROM CSD_GROUP_JOB_PARAM_TEMP
170: WHERE GROUP_JOB_ID = p_GROUP_JOB_ID
171: FOR UPDATE of GROUP_JOB_ID NOWAIT;
172:
173: Recinfo C%ROWTYPE;
190: End If;
191:
192: END Lock_Row;
193:
194: End CSD_GROUP_JOB_PARAM_TEMP_PKG;