APPS.CSD_RO_SERVICE_CODES_PKG dependencies on CSD_RO_SERVICE_CODES

Line 1: PACKAGE BODY CSD_RO_SERVICE_CODES_PKG as

1: PACKAGE BODY CSD_RO_SERVICE_CODES_PKG as
2: /* $Header: csdtrscb.pls 120.1 2006/09/19 23:07:55 rfieldma noship $ */
3: -- Start of Comments
4: -- Package name : CSD_RO_SERVICE_CODES_PKG
5: -- Purpose : To insert, update, delete and lock ro service code

Line 4: -- Package name : CSD_RO_SERVICE_CODES_PKG

1: PACKAGE BODY CSD_RO_SERVICE_CODES_PKG as
2: /* $Header: csdtrscb.pls 120.1 2006/09/19 23:07:55 rfieldma noship $ */
3: -- Start of Comments
4: -- Package name : CSD_RO_SERVICE_CODES_PKG
5: -- Purpose : To insert, update, delete and lock ro service code
6: -- History : 21-Aug-2003 Gilam created
7: -- NOTE :
8: -- End of Comments

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

7: -- NOTE :
8: -- End of Comments
9:
10:
11: G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSD_RO_SERVICE_CODES_PKG';
12: G_FILE_NAME CONSTANT VARCHAR2(12) := 'csdtrscb.pls';
13:
14: PROCEDURE Insert_Row(
15: px_RO_SERVICE_CODE_ID IN OUT NOCOPY NUMBER

Line 49: CURSOR C2 IS SELECT CSD_RO_SERVICE_CODES_S1.nextval FROM sys.dual;

45: ,p_SERVICE_ITEM_ID NUMBER -- rfieldma 4666403
46: )
47:
48: IS
49: CURSOR C2 IS SELECT CSD_RO_SERVICE_CODES_S1.nextval FROM sys.dual;
50: BEGIN
51: If (px_RO_SERVICE_CODE_ID IS NULL) OR (px_RO_SERVICE_CODE_ID = FND_API.G_MISS_NUM) then
52: OPEN C2;
53: FETCH C2 INTO px_RO_SERVICE_CODE_ID;

Line 56: INSERT INTO CSD_RO_SERVICE_CODES(

52: OPEN C2;
53: FETCH C2 INTO px_RO_SERVICE_CODE_ID;
54: CLOSE C2;
55: End If;
56: INSERT INTO CSD_RO_SERVICE_CODES(
57: RO_SERVICE_CODE_ID
58: ,OBJECT_VERSION_NUMBER
59: ,REPAIR_LINE_ID
60: ,SERVICE_CODE_ID

Line 159: Update CSD_RO_SERVICE_CODES

155: )
156:
157: IS
158: BEGIN
159: Update CSD_RO_SERVICE_CODES
160: SET
161: OBJECT_VERSION_NUMBER = decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, NULL, NULL, OBJECT_VERSION_NUMBER, p_OBJECT_VERSION_NUMBER)
162: ,REPAIR_LINE_ID = decode( p_REPAIR_LINE_ID, FND_API.G_MISS_NUM, NULL, NULL, REPAIR_LINE_ID, p_REPAIR_LINE_ID)
163: ,SERVICE_CODE_ID = decode( p_SERVICE_CODE_ID, FND_API.G_MISS_NUM, NULL, NULL, SERVICE_CODE_ID, p_SERVICE_CODE_ID)

Line 202: DELETE FROM CSD_RO_SERVICE_CODES

198: PROCEDURE Delete_Row(
199: p_RO_SERVICE_CODE_ID NUMBER)
200: IS
201: BEGIN
202: DELETE FROM CSD_RO_SERVICE_CODES
203: WHERE RO_SERVICE_CODE_ID = p_RO_SERVICE_CODE_ID;
204: If (SQL%NOTFOUND) then
205: RAISE NO_DATA_FOUND;
206: End If;

Line 250: FROM CSD_RO_SERVICE_CODES

246:
247: IS
248: CURSOR C IS
249: SELECT *
250: FROM CSD_RO_SERVICE_CODES
251: WHERE RO_SERVICE_CODE_ID = p_RO_SERVICE_CODE_ID
252: FOR UPDATE of RO_SERVICE_CODE_ID NOWAIT;
253: Recinfo C%ROWTYPE;
254: BEGIN

Line 365: End CSD_RO_SERVICE_CODES_PKG;

361: APP_EXCEPTION.RAISE_EXCEPTION;
362: End If;
363: END Lock_Row;
364:
365: End CSD_RO_SERVICE_CODES_PKG;