APPS.CSD_REPAIR_TYPES_SAR_PKG dependencies on CSD_REPAIR_TYPES_SAR

Line 1: PACKAGE BODY CSD_REPAIR_TYPES_SAR_PKG as

1: PACKAGE BODY CSD_REPAIR_TYPES_SAR_PKG as
2: /* $Header: csdtsarb.pls 115.2 2003/01/07 03:14:50 takwong noship $ */
3: -- Start of Comments
4: -- Package name : CSD_REPAIR_TYPES_SAR_PKG
5: -- Purpose :

Line 4: -- Package name : CSD_REPAIR_TYPES_SAR_PKG

1: PACKAGE BODY CSD_REPAIR_TYPES_SAR_PKG as
2: /* $Header: csdtsarb.pls 115.2 2003/01/07 03:14:50 takwong noship $ */
3: -- Start of Comments
4: -- Package name : CSD_REPAIR_TYPES_SAR_PKG
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments

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

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

Line 26: CURSOR C2 IS SELECT CSD_REPAIR_TYPES_SAR_S1.nextval FROM sys.dual;

22: ,p_LAST_UPDATE_LOGIN NUMBER
23: ,p_OBJECT_VERSION_NUMBER NUMBER
24: )
25: IS
26: CURSOR C2 IS SELECT CSD_REPAIR_TYPES_SAR_S1.nextval FROM sys.dual;
27: BEGIN
28: If (px_REPAIR_TXN_BILLING_TYPE_ID IS NULL) OR (px_REPAIR_TXN_BILLING_TYPE_ID = FND_API.G_MISS_NUM) then
29: OPEN C2;
30: FETCH C2 INTO px_REPAIR_TXN_BILLING_TYPE_ID;

Line 33: INSERT INTO CSD_REPAIR_TYPES_SAR(

29: OPEN C2;
30: FETCH C2 INTO px_REPAIR_TXN_BILLING_TYPE_ID;
31: CLOSE C2;
32: End If;
33: INSERT INTO CSD_REPAIR_TYPES_SAR(
34: REPAIR_TXN_BILLING_TYPE_ID
35: ,REPAIR_TYPE_ID
36: ,TXN_BILLING_TYPE_ID
37: ,CREATED_BY

Line 69: Update CSD_REPAIR_TYPES_SAR

65: ,p_OBJECT_VERSION_NUMBER NUMBER
66: )
67: IS
68: BEGIN
69: Update CSD_REPAIR_TYPES_SAR
70: SET
71: REPAIR_TYPE_ID = decode( p_REPAIR_TYPE_ID, FND_API.G_MISS_NUM, REPAIR_TYPE_ID, p_REPAIR_TYPE_ID)
72: ,TXN_BILLING_TYPE_ID = decode( p_TXN_BILLING_TYPE_ID, FND_API.G_MISS_NUM, TXN_BILLING_TYPE_ID, p_TXN_BILLING_TYPE_ID)
73: ,CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, CREATED_BY, p_CREATED_BY)

Line 90: DELETE FROM CSD_REPAIR_TYPES_SAR

86: PROCEDURE Delete_Row(
87: p_REPAIR_TXN_BILLING_TYPE_ID NUMBER)
88: IS
89: BEGIN
90: DELETE FROM CSD_REPAIR_TYPES_SAR
91: WHERE REPAIR_TXN_BILLING_TYPE_ID = p_REPAIR_TXN_BILLING_TYPE_ID;
92: If (SQL%NOTFOUND) then
93: RAISE NO_DATA_FOUND;
94: End If;

Line 104: FROM CSD_REPAIR_TYPES_SAR

100: )
101: IS
102: CURSOR C IS
103: SELECT object_version_number
104: FROM CSD_REPAIR_TYPES_SAR
105: WHERE REPAIR_TXN_BILLING_TYPE_ID = p_REPAIR_TXN_BILLING_TYPE_ID
106: FOR UPDATE of REPAIR_TXN_BILLING_TYPE_ID NOWAIT;
107: Recinfo C%ROWTYPE;
108: BEGIN

Line 130: End CSD_REPAIR_TYPES_SAR_PKG;

126: End If;
127:
128: END Lock_Row;
129:
130: End CSD_REPAIR_TYPES_SAR_PKG;