[Home] [Help]
PACKAGE BODY: APPS.CSD_RO_SERVICE_CODES_PKG
Source
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
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
16 ,p_OBJECT_VERSION_NUMBER NUMBER
17 ,p_REPAIR_LINE_ID NUMBER
18 ,p_SERVICE_CODE_ID NUMBER
19 ,p_CREATED_BY NUMBER
20 ,p_CREATION_DATE DATE
21 ,p_LAST_UPDATED_BY NUMBER
22 ,p_LAST_UPDATE_DATE DATE
23 ,p_LAST_UPDATE_LOGIN NUMBER
24 ,p_SOURCE_TYPE_CODE VARCHAR2
25 ,p_SOURCE_SOLUTION_ID NUMBER
26 ,p_APPLICABLE_FLAG VARCHAR2
27 ,p_APPLIED_TO_EST_FLAG VARCHAR2
28 ,p_APPLIED_TO_WORK_FLAG VARCHAR2
29 ,p_ATTRIBUTE_CATEGORY VARCHAR2
30 ,p_ATTRIBUTE1 VARCHAR2
31 ,p_ATTRIBUTE2 VARCHAR2
32 ,p_ATTRIBUTE3 VARCHAR2
33 ,p_ATTRIBUTE4 VARCHAR2
34 ,p_ATTRIBUTE5 VARCHAR2
35 ,p_ATTRIBUTE6 VARCHAR2
36 ,p_ATTRIBUTE7 VARCHAR2
37 ,p_ATTRIBUTE8 VARCHAR2
38 ,p_ATTRIBUTE9 VARCHAR2
39 ,p_ATTRIBUTE10 VARCHAR2
40 ,p_ATTRIBUTE11 VARCHAR2
41 ,p_ATTRIBUTE12 VARCHAR2
42 ,p_ATTRIBUTE13 VARCHAR2
43 ,p_ATTRIBUTE14 VARCHAR2
44 ,p_ATTRIBUTE15 VARCHAR2
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;
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
61 ,CREATED_BY
62 ,CREATION_DATE
63 ,LAST_UPDATED_BY
64 ,LAST_UPDATE_DATE
65 ,LAST_UPDATE_LOGIN
66 ,SOURCE_TYPE_CODE
67 ,SOURCE_SOLUTION_ID
68 ,APPLICABLE_FLAG
69 ,APPLIED_TO_EST_FLAG
70 ,APPLIED_TO_WORK_FLAG
71 ,ATTRIBUTE_CATEGORY
72 ,ATTRIBUTE1
73 ,ATTRIBUTE2
74 ,ATTRIBUTE3
75 ,ATTRIBUTE4
76 ,ATTRIBUTE5
77 ,ATTRIBUTE6
78 ,ATTRIBUTE7
79 ,ATTRIBUTE8
80 ,ATTRIBUTE9
81 ,ATTRIBUTE10
82 ,ATTRIBUTE11
83 ,ATTRIBUTE12
84 ,ATTRIBUTE13
85 ,ATTRIBUTE14
86 ,ATTRIBUTE15
87 ,SERVICE_ITEM_ID
88 ) VALUES (
89 px_RO_SERVICE_CODE_ID
90 ,decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, NULL, p_OBJECT_VERSION_NUMBER)
91 ,decode( p_REPAIR_LINE_ID, FND_API.G_MISS_NUM, NULL, p_REPAIR_LINE_ID)
92 ,decode( p_SERVICE_CODE_ID, FND_API.G_MISS_NUM, NULL, p_SERVICE_CODE_ID)
93 ,decode( p_CREATED_BY, FND_API.G_MISS_NUM, NULL, p_CREATED_BY)
94 ,decode( p_CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_CREATION_DATE)
95 ,decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATED_BY)
96 ,decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_LAST_UPDATE_DATE)
97 ,decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATE_LOGIN)
98 ,decode( p_SOURCE_TYPE_CODE, FND_API.G_MISS_CHAR, NULL, p_SOURCE_TYPE_CODE)
99 ,decode( p_SOURCE_SOLUTION_ID, FND_API.G_MISS_NUM, NULL, p_SOURCE_SOLUTION_ID)
100 ,decode( p_APPLICABLE_FLAG, FND_API.G_MISS_CHAR, NULL, p_APPLICABLE_FLAG)
101 ,decode( p_APPLIED_TO_EST_FLAG, FND_API.G_MISS_CHAR, NULL, p_APPLIED_TO_EST_FLAG)
102 ,decode( p_APPLIED_TO_WORK_FLAG, FND_API.G_MISS_CHAR, NULL, p_APPLIED_TO_WORK_FLAG)
103 ,decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE_CATEGORY)
104 ,decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE1)
105 ,decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE2)
106 ,decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE3)
107 ,decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE4)
108 ,decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE5)
109 ,decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE6)
110 ,decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE7)
111 ,decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE8)
112 ,decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE9)
113 ,decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE10)
114 ,decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE11)
115 ,decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE12)
116 ,decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE13)
117 ,decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE14)
118 ,decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE15)
119 ,decode( p_SERVICE_ITEM_ID, FND_API.G_MISS_NUM, NULL, p_SERVICE_ITEM_ID)
120 );
121 End Insert_Row;
122
123 PROCEDURE Update_Row(
124 p_RO_SERVICE_CODE_ID NUMBER
125 ,p_OBJECT_VERSION_NUMBER NUMBER
126 ,p_REPAIR_LINE_ID NUMBER
127 ,p_SERVICE_CODE_ID NUMBER
128 ,p_CREATED_BY NUMBER
129 ,p_CREATION_DATE DATE
130 ,p_LAST_UPDATED_BY NUMBER
131 ,p_LAST_UPDATE_DATE DATE
132 ,p_LAST_UPDATE_LOGIN NUMBER
133 ,p_SOURCE_TYPE_CODE VARCHAR2
134 ,p_SOURCE_SOLUTION_ID NUMBER
135 ,p_APPLICABLE_FLAG VARCHAR2
136 ,p_APPLIED_TO_EST_FLAG VARCHAR2
137 ,p_APPLIED_TO_WORK_FLAG VARCHAR2
138 ,p_ATTRIBUTE_CATEGORY VARCHAR2
139 ,p_ATTRIBUTE1 VARCHAR2
140 ,p_ATTRIBUTE2 VARCHAR2
141 ,p_ATTRIBUTE3 VARCHAR2
142 ,p_ATTRIBUTE4 VARCHAR2
143 ,p_ATTRIBUTE5 VARCHAR2
144 ,p_ATTRIBUTE6 VARCHAR2
145 ,p_ATTRIBUTE7 VARCHAR2
146 ,p_ATTRIBUTE8 VARCHAR2
147 ,p_ATTRIBUTE9 VARCHAR2
148 ,p_ATTRIBUTE10 VARCHAR2
149 ,p_ATTRIBUTE11 VARCHAR2
150 ,p_ATTRIBUTE12 VARCHAR2
151 ,p_ATTRIBUTE13 VARCHAR2
152 ,p_ATTRIBUTE14 VARCHAR2
153 ,p_ATTRIBUTE15 VARCHAR2
154 ,p_SERVICE_ITEM_ID NUMBER -- rfieldma, 4666403
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)
164 ,CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, NULL, NULL, CREATED_BY, p_CREATED_BY)
165 ,CREATION_DATE = decode( p_CREATION_DATE, FND_API.G_MISS_DATE, NULL, NULL, CREATION_DATE, p_CREATION_DATE)
166 ,LAST_UPDATED_BY = decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL, NULL, LAST_UPDATED_BY, p_LAST_UPDATED_BY)
167 ,LAST_UPDATE_DATE = decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, NULL, NULL, LAST_UPDATE_DATE, p_LAST_UPDATE_DATE)
168 ,LAST_UPDATE_LOGIN = decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL, NULL, LAST_UPDATE_LOGIN, p_LAST_UPDATE_LOGIN)
169 ,SOURCE_TYPE_CODE = decode( p_SOURCE_TYPE_CODE, FND_API.G_MISS_CHAR,NULL, NULL, SOURCE_TYPE_CODE, p_SOURCE_TYPE_CODE)
170 ,SOURCE_SOLUTION_ID = decode( p_SOURCE_SOLUTION_ID, FND_API.G_MISS_NUM, NULL, NULL, SOURCE_SOLUTION_ID, p_SOURCE_SOLUTION_ID)
171 ,APPLICABLE_FLAG = decode( p_APPLICABLE_FLAG, FND_API.G_MISS_CHAR, NULL, NULL, APPLICABLE_FLAG, p_APPLICABLE_FLAG)
172 ,APPLIED_TO_EST_FLAG = decode( p_APPLIED_TO_EST_FLAG, FND_API.G_MISS_CHAR, NULL, NULL, APPLIED_TO_EST_FLAG, p_APPLIED_TO_EST_FLAG)
173 ,APPLIED_TO_WORK_FLAG = decode( p_APPLIED_TO_WORK_FLAG, FND_API.G_MISS_CHAR, NULL, NULL, APPLIED_TO_WORK_FLAG, p_APPLIED_TO_WORK_FLAG)
174 ,ATTRIBUTE_CATEGORY = decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE_CATEGORY, p_ATTRIBUTE_CATEGORY)
175 ,ATTRIBUTE1 = decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE1, p_ATTRIBUTE1)
176 ,ATTRIBUTE2 = decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE2, p_ATTRIBUTE2)
177 ,ATTRIBUTE3 = decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE3, p_ATTRIBUTE3)
178 ,ATTRIBUTE4 = decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE4, p_ATTRIBUTE4)
179 ,ATTRIBUTE5 = decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE5, p_ATTRIBUTE5)
180 ,ATTRIBUTE6 = decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE6, p_ATTRIBUTE6)
181 ,ATTRIBUTE7 = decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE7, p_ATTRIBUTE7)
182 ,ATTRIBUTE8 = decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE8, p_ATTRIBUTE8)
183 ,ATTRIBUTE9 = decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE9, p_ATTRIBUTE9)
184 ,ATTRIBUTE10 = decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE10, p_ATTRIBUTE10)
185 ,ATTRIBUTE11 = decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE11, p_ATTRIBUTE11)
186 ,ATTRIBUTE12 = decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE12, p_ATTRIBUTE12)
187 ,ATTRIBUTE13 = decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE13, p_ATTRIBUTE13)
188 ,ATTRIBUTE14 = decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE14, p_ATTRIBUTE14)
189 ,ATTRIBUTE15 = decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE15, p_ATTRIBUTE15)
190 ,SERVICE_ITEM_ID = decode( p_SERVICE_ITEM_ID, FND_API.G_MISS_NUM, NULL, NULL, SERVICE_ITEM_ID, p_SERVICE_ITEM_ID)
191 where RO_SERVICE_CODE_ID = p_RO_SERVICE_CODE_ID;
192
193 If (SQL%NOTFOUND) then
194 RAISE NO_DATA_FOUND;
195 End If;
196 END Update_Row;
197
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;
207 END Delete_Row;
208
209 PROCEDURE Lock_Row(
210 p_RO_SERVICE_CODE_ID NUMBER
211 ,p_OBJECT_VERSION_NUMBER NUMBER
212
213 --commented out the rest of the record
214 /*
215 ,p_REPAIR_LINE_ID NUMBER
216 ,p_SERVICE_CODE_ID NUMBER
217 ,p_CREATED_BY NUMBER
218 ,p_CREATION_DATE DATE
219 ,p_LAST_UPDATED_BY NUMBER
220 ,p_LAST_UPDATE_DATE DATE
221 ,p_LAST_UPDATE_LOGIN NUMBER
222 ,p_SOURCE_TYPE_CODE VARCHAR2
223 ,p_SOURCE_SOLUTION_ID NUMBER
224 ,p_APPLICABLE_FLAG VARCHAR2
225 ,p_APPLIED_TO_EST_FLAG VARCHAR2
226 ,p_APPLIED_TO_WORK_FLAG VARCHAR2
227 ,p_ATTRIBUTE_CATEGORY VARCHAR2
228 ,p_ATTRIBUTE1 VARCHAR2
229 ,p_ATTRIBUTE2 VARCHAR2
230 ,p_ATTRIBUTE3 VARCHAR2
231 ,p_ATTRIBUTE4 VARCHAR2
232 ,p_ATTRIBUTE5 VARCHAR2
233 ,p_ATTRIBUTE6 VARCHAR2
234 ,p_ATTRIBUTE7 VARCHAR2
235 ,p_ATTRIBUTE8 VARCHAR2
236 ,p_ATTRIBUTE9 VARCHAR2
237 ,p_ATTRIBUTE10 VARCHAR2
238 ,p_ATTRIBUTE11 VARCHAR2
239 ,p_ATTRIBUTE12 VARCHAR2
240 ,p_ATTRIBUTE13 VARCHAR2
241 ,p_ATTRIBUTE14 VARCHAR2
245 )
242 ,p_ATTRIBUTE15 VARCHAR2
243 */
244 --
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
255 OPEN C;
256 FETCH C INTO Recinfo;
257 If (C%NOTFOUND) then
258 CLOSE C;
259 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
260 APP_EXCEPTION.RAISE_EXCEPTION;
261 End If;
262 CLOSE C;
263 if (
264 ( Recinfo.RO_SERVICE_CODE_ID = p_RO_SERVICE_CODE_ID)
265 AND ( ( Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER)
266 OR ( ( Recinfo.OBJECT_VERSION_NUMBER IS NULL )
267 AND ( p_OBJECT_VERSION_NUMBER IS NULL )))
268
269 --commented out the rest of the record
270 /*
271 AND ( ( Recinfo.REPAIR_LINE_ID = p_REPAIR_LINE_ID)
272 OR ( ( Recinfo.REPAIR_LINE_ID IS NULL )
273 AND ( p_REPAIR_LINE_ID IS NULL )))
274 AND ( ( Recinfo.SERVICE_CODE_ID = p_SERVICE_CODE_ID)
275 OR ( ( Recinfo.SERVICE_CODE_ID IS NULL )
276 AND ( p_SERVICE_CODE_ID IS NULL )))
277 AND ( ( Recinfo.CREATED_BY = p_CREATED_BY)
278 OR ( ( Recinfo.CREATED_BY IS NULL )
279 AND ( p_CREATED_BY IS NULL )))
280 AND ( ( Recinfo.CREATION_DATE = p_CREATION_DATE)
281 OR ( ( Recinfo.CREATION_DATE IS NULL )
282 AND ( p_CREATION_DATE IS NULL )))
283 AND ( ( Recinfo.LAST_UPDATED_BY = p_LAST_UPDATED_BY)
284 OR ( ( Recinfo.LAST_UPDATED_BY IS NULL )
285 AND ( p_LAST_UPDATED_BY IS NULL )))
286 AND ( ( Recinfo.LAST_UPDATE_DATE = p_LAST_UPDATE_DATE)
287 OR ( ( Recinfo.LAST_UPDATE_DATE IS NULL )
288 AND ( p_LAST_UPDATE_DATE IS NULL )))
289 AND ( ( Recinfo.LAST_UPDATE_LOGIN = p_LAST_UPDATE_LOGIN)
290 OR ( ( Recinfo.LAST_UPDATE_LOGIN IS NULL )
291 AND ( p_LAST_UPDATE_LOGIN IS NULL )))
292 AND ( ( Recinfo.SOURCE_TYPE_CODE = p_SOURCE_TYPE_CODE)
293 OR ( ( Recinfo.SOURCE_TYPE_CODE IS NULL )
294 AND ( p_SOURCE_TYPE_CODE IS NULL )))
295 AND ( ( Recinfo.SOURCE_SOLUTION_ID = p_SOURCE_SOLUTION_ID)
296 OR ( ( Recinfo.SOURCE_SOLUTION_ID IS NULL )
297 AND ( p_SOURCE_SOLUTION_ID IS NULL )))
298 AND ( ( Recinfo.APPLICABLE_FLAG = p_APPLICABLE_FLAG)
299 OR ( ( Recinfo.APPLICABLE_FLAG IS NULL )
300 AND ( p_APPLICABLE_FLAG IS NULL )))
301 AND ( ( Recinfo.APPLIED_TO_EST_FLAG = p_APPLIED_TO_EST_FLAG)
302 OR ( ( Recinfo.APPLIED_TO_EST_FLAG IS NULL )
303 AND ( p_APPLIED_TO_EST_FLAG IS NULL )))
304 AND ( ( Recinfo.APPLIED_TO_WORK_FLAG = p_APPLIED_TO_WORK_FLAG)
305 OR ( ( Recinfo.APPLIED_TO_WORK_FLAG IS NULL )
306 AND ( p_APPLIED_TO_WORK_FLAG IS NULL )))
307 AND ( ( Recinfo.ATTRIBUTE_CATEGORY = p_ATTRIBUTE_CATEGORY)
308 OR ( ( Recinfo.ATTRIBUTE_CATEGORY IS NULL )
309 AND ( p_ATTRIBUTE_CATEGORY IS NULL )))
310 AND ( ( Recinfo.ATTRIBUTE1 = p_ATTRIBUTE1)
311 OR ( ( Recinfo.ATTRIBUTE1 IS NULL )
312 AND ( p_ATTRIBUTE1 IS NULL )))
313 AND ( ( Recinfo.ATTRIBUTE2 = p_ATTRIBUTE2)
314 OR ( ( Recinfo.ATTRIBUTE2 IS NULL )
315 AND ( p_ATTRIBUTE2 IS NULL )))
316 AND ( ( Recinfo.ATTRIBUTE3 = p_ATTRIBUTE3)
317 OR ( ( Recinfo.ATTRIBUTE3 IS NULL )
318 AND ( p_ATTRIBUTE3 IS NULL )))
319 AND ( ( Recinfo.ATTRIBUTE4 = p_ATTRIBUTE4)
320 OR ( ( Recinfo.ATTRIBUTE4 IS NULL )
321 AND ( p_ATTRIBUTE4 IS NULL )))
322 AND ( ( Recinfo.ATTRIBUTE5 = p_ATTRIBUTE5)
323 OR ( ( Recinfo.ATTRIBUTE5 IS NULL )
324 AND ( p_ATTRIBUTE5 IS NULL )))
325 AND ( ( Recinfo.ATTRIBUTE6 = p_ATTRIBUTE6)
326 OR ( ( Recinfo.ATTRIBUTE6 IS NULL )
327 AND ( p_ATTRIBUTE6 IS NULL )))
328 AND ( ( Recinfo.ATTRIBUTE7 = p_ATTRIBUTE7)
329 OR ( ( Recinfo.ATTRIBUTE7 IS NULL )
330 AND ( p_ATTRIBUTE7 IS NULL )))
331 AND ( ( Recinfo.ATTRIBUTE8 = p_ATTRIBUTE8)
332 OR ( ( Recinfo.ATTRIBUTE8 IS NULL )
333 AND ( p_ATTRIBUTE8 IS NULL )))
334 AND ( ( Recinfo.ATTRIBUTE9 = p_ATTRIBUTE9)
335 OR ( ( Recinfo.ATTRIBUTE9 IS NULL )
336 AND ( p_ATTRIBUTE9 IS NULL )))
337 AND ( ( Recinfo.ATTRIBUTE10 = p_ATTRIBUTE10)
338 OR ( ( Recinfo.ATTRIBUTE10 IS NULL )
339 AND ( p_ATTRIBUTE10 IS NULL )))
340 AND ( ( Recinfo.ATTRIBUTE11 = p_ATTRIBUTE11)
341 OR ( ( Recinfo.ATTRIBUTE11 IS NULL )
342 AND ( p_ATTRIBUTE11 IS NULL )))
343 AND ( ( Recinfo.ATTRIBUTE12 = p_ATTRIBUTE12)
344 OR ( ( Recinfo.ATTRIBUTE12 IS NULL )
345 AND ( p_ATTRIBUTE12 IS NULL )))
346 AND ( ( Recinfo.ATTRIBUTE13 = p_ATTRIBUTE13)
347 OR ( ( Recinfo.ATTRIBUTE13 IS NULL )
348 AND ( p_ATTRIBUTE13 IS NULL )))
349 AND ( ( Recinfo.ATTRIBUTE14 = p_ATTRIBUTE14)
350 OR ( ( Recinfo.ATTRIBUTE14 IS NULL )
351 AND ( p_ATTRIBUTE14 IS NULL )))
352 AND ( ( Recinfo.ATTRIBUTE15 = p_ATTRIBUTE15)
353 OR ( ( Recinfo.ATTRIBUTE15 IS NULL )
354 AND ( p_ATTRIBUTE15 IS NULL )))
355 */
356 --
357 ) then
358 return;
359 else
363 END Lock_Row;
360 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
361 APP_EXCEPTION.RAISE_EXCEPTION;
362 End If;
364
365 End CSD_RO_SERVICE_CODES_PKG;