APPS.CSD_REPAIR_ORDER_GROUPS_PKG dependencies on CSD_REPAIR_ORDER_GROUPS

Line 1: PACKAGE BODY CSD_REPAIR_ORDER_GROUPS_PKG as

1: PACKAGE BODY CSD_REPAIR_ORDER_GROUPS_PKG as
2: /* $Header: csdtgrgb.pls 115.11 2003/01/14 20:14:24 takwong noship $ */
3: -- Start of Comments
4: -- Package name : CSD_REPAIR_ORDER_GROUPS_PKG
5: -- Purpose :

Line 4: -- Package name : CSD_REPAIR_ORDER_GROUPS_PKG

1: PACKAGE BODY CSD_REPAIR_ORDER_GROUPS_PKG as
2: /* $Header: csdtgrgb.pls 115.11 2003/01/14 20:14:24 takwong noship $ */
3: -- Start of Comments
4: -- Package name : CSD_REPAIR_ORDER_GROUPS_PKG
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments

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

7: -- NOTE :
8: -- End of Comments
9:
10:
11: G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSD_REPAIR_ORDER_GROUPS_PKG';
12: G_FILE_NAME CONSTANT VARCHAR2(12) := 'csdtgrgb.pls';
13: g_debug NUMBER := csd_gen_utility_pvt.g_debug_level;
14:
15: PROCEDURE Insert_Row(

Line 59: CURSOR C2 IS SELECT CSD_REPAIR_ORDER_GROUPS_S1.nextval FROM sys.dual;

55: ,p_GROUP_APPROVAL_STATUS VARCHAR2
56: ,p_REPAIR_MODE VARCHAR2)
57:
58: IS
59: CURSOR C2 IS SELECT CSD_REPAIR_ORDER_GROUPS_S1.nextval FROM sys.dual;
60: BEGIN
61: If (px_REPAIR_GROUP_ID IS NULL) OR (px_REPAIR_GROUP_ID = FND_API.G_MISS_NUM) then
62: OPEN C2;
63: FETCH C2 INTO px_REPAIR_GROUP_ID;

Line 66: INSERT INTO CSD_REPAIR_ORDER_GROUPS(

62: OPEN C2;
63: FETCH C2 INTO px_REPAIR_GROUP_ID;
64: CLOSE C2;
65: End If;
66: INSERT INTO CSD_REPAIR_ORDER_GROUPS(
67: REPAIR_GROUP_ID
68: ,INCIDENT_ID
69: ,REPAIR_GROUP_NUMBER
70: ,REPAIR_TYPE_ID

Line 197: Update CSD_REPAIR_ORDER_GROUPS

193: ,p_REPAIR_MODE VARCHAR2)
194:
195: IS
196: BEGIN
197: Update CSD_REPAIR_ORDER_GROUPS
198: SET
199: INCIDENT_ID = decode( p_INCIDENT_ID, FND_API.G_MISS_NUM, NULL, NULL, INCIDENT_ID, p_INCIDENT_ID)
200: ,REPAIR_GROUP_NUMBER = decode( p_REPAIR_GROUP_NUMBER, FND_API.G_MISS_CHAR, NULL, NULL, REPAIR_GROUP_NUMBER, p_REPAIR_GROUP_NUMBER)
201: ,REPAIR_TYPE_ID = decode( p_REPAIR_TYPE_ID, FND_API.G_MISS_NUM, NULL, NULL, REPAIR_TYPE_ID, p_REPAIR_TYPE_ID)

Line 250: DELETE FROM CSD_REPAIR_ORDER_GROUPS

246: PROCEDURE Delete_Row(
247: p_REPAIR_GROUP_ID NUMBER)
248: IS
249: BEGIN
250: DELETE FROM CSD_REPAIR_ORDER_GROUPS
251: WHERE REPAIR_GROUP_ID = p_REPAIR_GROUP_ID;
252: If (SQL%NOTFOUND) then
253: RAISE NO_DATA_FOUND;
254: End If;

Line 264: FROM CSD_REPAIR_ORDER_GROUPS

260:
261: IS
262: CURSOR C IS
263: SELECT *
264: FROM CSD_REPAIR_ORDER_GROUPS
265: WHERE REPAIR_GROUP_ID = p_REPAIR_GROUP_ID
266: FOR UPDATE of REPAIR_GROUP_ID NOWAIT;
267: Recinfo C%ROWTYPE;
268: BEGIN

Line 279: csd_gen_utility_pvt.add('CSD_REPAIR_ORDER_GROUPS_PKG Recinfo.OBJECT_VERSION_NUMBER : '||Recinfo.OBJECT_VERSION_NUMBER);

275: End If;
276: CLOSE C;
277:
278: IF g_debug > 0 THEN
279: csd_gen_utility_pvt.add('CSD_REPAIR_ORDER_GROUPS_PKG Recinfo.OBJECT_VERSION_NUMBER : '||Recinfo.OBJECT_VERSION_NUMBER);
280: csd_gen_utility_pvt.add('CSD_REPAIR_ORDER_GROUPS_PKG p_OBJECT_VERSION_NUMBER : '||p_OBJECT_VERSION_NUMBER);
281: END IF;
282:
283: If ( Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER) then

Line 280: csd_gen_utility_pvt.add('CSD_REPAIR_ORDER_GROUPS_PKG p_OBJECT_VERSION_NUMBER : '||p_OBJECT_VERSION_NUMBER);

276: CLOSE C;
277:
278: IF g_debug > 0 THEN
279: csd_gen_utility_pvt.add('CSD_REPAIR_ORDER_GROUPS_PKG Recinfo.OBJECT_VERSION_NUMBER : '||Recinfo.OBJECT_VERSION_NUMBER);
280: csd_gen_utility_pvt.add('CSD_REPAIR_ORDER_GROUPS_PKG p_OBJECT_VERSION_NUMBER : '||p_OBJECT_VERSION_NUMBER);
281: END IF;
282:
283: If ( Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER) then
284: return;

Line 291: End CSD_REPAIR_ORDER_GROUPS_PKG;

287: APP_EXCEPTION.RAISE_EXCEPTION;
288: End If;
289: END Lock_Row;
290:
291: End CSD_REPAIR_ORDER_GROUPS_PKG;