DBA Data[Home] [Help]

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.14.12020000.2 2013/01/23 20:53:16 vicli 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.14.12020000.2 2013/01/23 20:53:16 vicli 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 143: CURSOR C2 IS SELECT CSD_REPAIRS_S1.nextval FROM sys.dual;

139: ,p_PARENT_REPAIR_LINE_ID NUMBER -- bug#13698799 auto create ro, parent ro
140: )
141:
142: IS
143: CURSOR C2 IS SELECT CSD_REPAIRS_S1.nextval FROM sys.dual;
144: BEGIN
145: If (px_REPAIR_LINE_ID IS NULL) OR (px_REPAIR_LINE_ID = FND_API.G_MISS_NUM) then
146: OPEN C2;
147: FETCH C2 INTO px_REPAIR_LINE_ID;

Line 150: INSERT INTO CSD_REPAIRS(

146: OPEN C2;
147: FETCH C2 INTO px_REPAIR_LINE_ID;
148: CLOSE C2;
149: End If;
150: INSERT INTO CSD_REPAIRS(
151: REPAIR_LINE_ID
152: ,REQUEST_ID
153: ,PROGRAM_ID
154: ,PROGRAM_APPLICATION_ID

Line 407: Description: Procedure to update a row in the CSD_REPAIRS table,which stores RO information

403:
404:
405: /*
406: Name: Update_Row
407: Description: Procedure to update a row in the CSD_REPAIRS table,which stores RO information
408: Code Change History:
409: -- 3/21/2010 nnadig 120.10.12010000.3 : Bug fix 9291206, Removed code that updated created_by
410: when updating an RO
411: */

Line 537: Update CSD_REPAIRS

533: )
534:
535: IS
536: BEGIN
537: Update CSD_REPAIRS
538: SET
539: REQUEST_ID = decode( p_REQUEST_ID, FND_API.G_MISS_NUM, REQUEST_ID, p_REQUEST_ID)
540: ,PROGRAM_ID = decode( p_PROGRAM_ID, FND_API.G_MISS_NUM, PROGRAM_ID, p_PROGRAM_ID)
541: ,PROGRAM_APPLICATION_ID = decode( p_PROGRAM_APPLICATION_ID, FND_API.G_MISS_NUM, PROGRAM_APPLICATION_ID, p_PROGRAM_APPLICATION_ID)

Line 669: DELETE FROM CSD_REPAIRS

665: PROCEDURE Delete_Row(
666: p_REPAIR_LINE_ID NUMBER)
667: IS
668: BEGIN
669: DELETE FROM CSD_REPAIRS
670: WHERE REPAIR_LINE_ID = p_REPAIR_LINE_ID;
671: If (SQL%NOTFOUND) then
672: RAISE NO_DATA_FOUND;
673: End If;

Line 685: FROM CSD_REPAIRS

681:
682: IS
683: CURSOR C IS
684: SELECT *
685: FROM CSD_REPAIRS
686: WHERE REPAIR_LINE_ID = p_REPAIR_LINE_ID
687: FOR UPDATE of REPAIR_LINE_ID NOWAIT;
688: Recinfo C%ROWTYPE;
689: BEGIN

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

697: CLOSE C;
698:
699: l_debug := csd_gen_utility_pvt.g_debug_level;
700: IF l_debug > 0 THEN
701: csd_gen_utility_pvt.add('CSD_REPAIRS_PKG Recinfo.OBJECT_VERSION_NUMBER : '||Recinfo.OBJECT_VERSION_NUMBER);
702: csd_gen_utility_pvt.add('CSD_REPAIRS_PKG p_OBJECT_VERSION_NUMBER : '||p_OBJECT_VERSION_NUMBER);
703: END IF;
704:
705: If ( Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER) then

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

698:
699: l_debug := csd_gen_utility_pvt.g_debug_level;
700: IF l_debug > 0 THEN
701: csd_gen_utility_pvt.add('CSD_REPAIRS_PKG Recinfo.OBJECT_VERSION_NUMBER : '||Recinfo.OBJECT_VERSION_NUMBER);
702: csd_gen_utility_pvt.add('CSD_REPAIRS_PKG p_OBJECT_VERSION_NUMBER : '||p_OBJECT_VERSION_NUMBER);
703: END IF;
704:
705: If ( Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER) then
706: return;

Line 714: End CSD_REPAIRS_PKG;

710: End If;
711:
712: END Lock_Row;
713:
714: End CSD_REPAIRS_PKG;