APPS.CSD_REPAIRS_PKG dependencies on CSD_REPAIRS

Line 1: PACKAGE BODY CSD_REPAIRS_PKG as

1: PACKAGE BODY CSD_REPAIRS_PKG as
2: /* $Header: csdtdrab.pls 120.10.12010000.2 2008/11/06 07:14:57 subhat ship $ */
3: -- Start of Comments
4: -- Package name : CSD_REPAIRS_PKG
5: -- Purpose :

Line 4: -- Package name : CSD_REPAIRS_PKG

1: PACKAGE BODY CSD_REPAIRS_PKG as
2: /* $Header: csdtdrab.pls 120.10.12010000.2 2008/11/06 07:14:57 subhat ship $ */
3: -- Start of Comments
4: -- Package name : CSD_REPAIRS_PKG
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments

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

7: -- NOTE :
8: -- End of Comments
9:
10:
11: G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSD_REPAIRS_PKG';
12: G_FILE_NAME CONSTANT VARCHAR2(12) := 'csdtdrab.pls';
13: l_debug NUMBER ;
14:
15: PROCEDURE Insert_Row(

Line 108: CURSOR C2 IS SELECT CSD_REPAIRS_S1.nextval FROM sys.dual;

104: ,p_REPAIR_YIELD_QUANTITY NUMBER --bug#6692459
105: )
106:
107: IS
108: CURSOR C2 IS SELECT CSD_REPAIRS_S1.nextval FROM sys.dual;
109: BEGIN
110: If (px_REPAIR_LINE_ID IS NULL) OR (px_REPAIR_LINE_ID = FND_API.G_MISS_NUM) then
111: OPEN C2;
112: FETCH C2 INTO px_REPAIR_LINE_ID;

Line 115: INSERT INTO CSD_REPAIRS(

111: OPEN C2;
112: FETCH C2 INTO px_REPAIR_LINE_ID;
113: CLOSE C2;
114: End If;
115: INSERT INTO CSD_REPAIRS(
116: REPAIR_LINE_ID
117: ,REQUEST_ID
118: ,PROGRAM_ID
119: ,PROGRAM_APPLICATION_ID

Line 388: Update CSD_REPAIRS

384: )
385:
386: IS
387: BEGIN
388: Update CSD_REPAIRS
389: SET
390: REQUEST_ID = decode( p_REQUEST_ID, FND_API.G_MISS_NUM, REQUEST_ID, p_REQUEST_ID)
391: ,PROGRAM_ID = decode( p_PROGRAM_ID, FND_API.G_MISS_NUM, PROGRAM_ID, p_PROGRAM_ID)
392: ,PROGRAM_APPLICATION_ID = decode( p_PROGRAM_APPLICATION_ID, FND_API.G_MISS_NUM, PROGRAM_APPLICATION_ID, p_PROGRAM_APPLICATION_ID)

Line 486: DELETE FROM CSD_REPAIRS

482: PROCEDURE Delete_Row(
483: p_REPAIR_LINE_ID NUMBER)
484: IS
485: BEGIN
486: DELETE FROM CSD_REPAIRS
487: WHERE REPAIR_LINE_ID = p_REPAIR_LINE_ID;
488: If (SQL%NOTFOUND) then
489: RAISE NO_DATA_FOUND;
490: End If;

Line 502: FROM CSD_REPAIRS

498:
499: IS
500: CURSOR C IS
501: SELECT *
502: FROM CSD_REPAIRS
503: WHERE REPAIR_LINE_ID = p_REPAIR_LINE_ID
504: FOR UPDATE of REPAIR_LINE_ID NOWAIT;
505: Recinfo C%ROWTYPE;
506: BEGIN

Line 518: csd_gen_utility_pvt.add('CSD_REPAIRS_PKG Recinfo.OBJECT_VERSION_NUMBER : '||Recinfo.OBJECT_VERSION_NUMBER);

514: CLOSE C;
515:
516: l_debug := csd_gen_utility_pvt.g_debug_level;
517: IF l_debug > 0 THEN
518: csd_gen_utility_pvt.add('CSD_REPAIRS_PKG Recinfo.OBJECT_VERSION_NUMBER : '||Recinfo.OBJECT_VERSION_NUMBER);
519: csd_gen_utility_pvt.add('CSD_REPAIRS_PKG p_OBJECT_VERSION_NUMBER : '||p_OBJECT_VERSION_NUMBER);
520: END IF;
521:
522: If ( Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER) then

Line 519: csd_gen_utility_pvt.add('CSD_REPAIRS_PKG p_OBJECT_VERSION_NUMBER : '||p_OBJECT_VERSION_NUMBER);

515:
516: l_debug := csd_gen_utility_pvt.g_debug_level;
517: IF l_debug > 0 THEN
518: csd_gen_utility_pvt.add('CSD_REPAIRS_PKG Recinfo.OBJECT_VERSION_NUMBER : '||Recinfo.OBJECT_VERSION_NUMBER);
519: csd_gen_utility_pvt.add('CSD_REPAIRS_PKG p_OBJECT_VERSION_NUMBER : '||p_OBJECT_VERSION_NUMBER);
520: END IF;
521:
522: If ( Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER) then
523: return;

Line 531: End CSD_REPAIRS_PKG;

527: End If;
528:
529: END Lock_Row;
530:
531: End CSD_REPAIRS_PKG;