1: PACKAGE BODY CSC_COLOR_CODES_PKG as
2: /* $Header: csctpccb.pls 120.2 2005/08/24 04:07:05 vshastry ship $ */
3: -- Start of Comments
4: -- Package name : CSC_COLOR_CODES_PKG
5: -- Purpose :
1: PACKAGE BODY CSC_COLOR_CODES_PKG as
2: /* $Header: csctpccb.pls 120.2 2005/08/24 04:07:05 vshastry ship $ */
3: -- Start of Comments
4: -- Package name : CSC_COLOR_CODES_PKG
5: -- Purpose :
6: -- History :
7: -- 03 Nov 00 axsubram Added Load_row for NLS (#1487340)
8: -- 27 Nov 02 jamose For Fnd_Api_G_Miss* and NOCOPY changes
13: -- NOTE :
14: -- End of Comments
15:
16:
17: G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSC_COLOR_CODES_PKG';
18: G_FILE_NAME CONSTANT VARCHAR2(12) := 'csctpccb.pls';
19:
20: PROCEDURE Insert_Row(
21: px_COLOR_CODE IN OUT NOCOPY VARCHAR2,
27: p_LAST_UPDATE_LOGIN NUMBER)
28:
29: IS
30: BEGIN
31: INSERT INTO CSC_COLOR_CODES(
32: COLOR_CODE,
33: RATING_CODE,
34: LAST_UPDATE_DATE,
35: LAST_UPDATED_BY,
54: p_LAST_UPDATE_LOGIN NUMBER)
55:
56: IS
57: BEGIN
58: Update CSC_COLOR_CODES
59: SET
60: COLOR_CODE = p_COLOR_CODE,
61: LAST_UPDATE_DATE =p_LAST_UPDATE_DATE,
62: LAST_UPDATED_BY = p_LAST_UPDATED_BY,
71: PROCEDURE Delete_Row(
72: p_COLOR_CODE VARCHAR2)
73: IS
74: BEGIN
75: DELETE FROM CSC_COLOR_CODES
76: WHERE COLOR_CODE = p_COLOR_CODE;
77: If (SQL%NOTFOUND) then
78: RAISE NO_DATA_FOUND;
79: End If;
90:
91: IS
92: CURSOR C IS
93: SELECT *
94: FROM CSC_COLOR_CODES
95: WHERE RATING_CODE = p_RATING_CODE
96: FOR UPDATE of RATING_CODE NOWAIT;
97: Recinfo C%ROWTYPE;
98: BEGIN
145: Begin
146:
147: l_color_code := p_color_code ;
148:
149: Csc_Color_Codes_Pkg.Update_Row(
150: p_COLOR_CODE => p_color_code,
151: p_RATING_CODE => p_rating_code,
152: p_LAST_UPDATE_DATE => p_last_update_date,
153: p_LAST_UPDATED_BY => p_last_updated_by,
155:
156: EXCEPTION
157: WHEN NO_DATA_FOUND THEN
158:
159: Csc_Color_Codes_Pkg.Insert_Row(
160: px_COLOR_CODE => l_color_code,
161: p_RATING_CODE => p_rating_code,
162: p_LAST_UPDATE_DATE => p_last_update_date,
163: p_LAST_UPDATED_BY => p_last_updated_by,
167:
168:
169: End Load_Row;
170:
171: End CSC_COLOR_CODES_PKG;