[Home] [Help]
PACKAGE BODY: APPS.CSD_DC_DOMAINS_PKG
Source
1 PACKAGE BODY CSD_DC_DOMAINS_PKG as
2 /* $Header: csdtdcdb.pls 115.4 2003/11/05 00:14:16 gilam noship $ */
3 -- Start of Comments
4 -- Package name : CSD_DC_DOMAINS_PKG
5 -- Purpose : To insert, update, delete and lock dc domains
6 -- History : 25-Aug-2003 Gilam created
7 -- NOTE :
8 -- End of Comments
9
10
11 G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSD_DC_DOMAINS_PKG';
12 G_FILE_NAME CONSTANT VARCHAR2(12) := 'csdtdcdb.pls';
13
14 PROCEDURE Insert_Row(
15 px_DC_DOMAIN_ID IN OUT NOCOPY NUMBER
16 ,p_OBJECT_VERSION_NUMBER NUMBER
17 ,p_DIAGNOSTIC_CODE_ID NUMBER
18 ,p_CREATED_BY NUMBER
19 ,p_CREATION_DATE DATE
20 ,p_LAST_UPDATED_BY NUMBER
21 ,p_LAST_UPDATE_DATE DATE
22 ,p_LAST_UPDATE_LOGIN NUMBER
23 ,p_DOMAIN_TYPE_CODE VARCHAR2
24 ,p_INVENTORY_ITEM_ID NUMBER
25 ,p_CATEGORY_ID NUMBER
26 ,p_CATEGORY_SET_ID NUMBER
27 ,p_ATTRIBUTE_CATEGORY VARCHAR2
28 ,p_ATTRIBUTE1 VARCHAR2
29 ,p_ATTRIBUTE2 VARCHAR2
30 ,p_ATTRIBUTE3 VARCHAR2
31 ,p_ATTRIBUTE4 VARCHAR2
32 ,p_ATTRIBUTE5 VARCHAR2
33 ,p_ATTRIBUTE6 VARCHAR2
34 ,p_ATTRIBUTE7 VARCHAR2
35 ,p_ATTRIBUTE8 VARCHAR2
36 ,p_ATTRIBUTE9 VARCHAR2
37 ,p_ATTRIBUTE10 VARCHAR2
38 ,p_ATTRIBUTE11 VARCHAR2
39 ,p_ATTRIBUTE12 VARCHAR2
40 ,p_ATTRIBUTE13 VARCHAR2
41 ,p_ATTRIBUTE14 VARCHAR2
42 ,p_ATTRIBUTE15 VARCHAR2)
43
44 IS
45 CURSOR C2 IS SELECT CSD_DC_DOMAINS_S1.nextval FROM sys.dual;
46 BEGIN
47 If (px_DC_DOMAIN_ID IS NULL) OR (px_DC_DOMAIN_ID = FND_API.G_MISS_NUM) then
48 OPEN C2;
49 FETCH C2 INTO px_DC_DOMAIN_ID;
50 CLOSE C2;
51 End If;
52 INSERT INTO CSD_DC_DOMAINS(
53 DC_DOMAIN_ID
54 ,OBJECT_VERSION_NUMBER
55 ,DIAGNOSTIC_CODE_ID
56 ,CREATED_BY
57 ,CREATION_DATE
58 ,LAST_UPDATED_BY
59 ,LAST_UPDATE_DATE
60 ,LAST_UPDATE_LOGIN
61 ,DOMAIN_TYPE_CODE
62 ,INVENTORY_ITEM_ID
63 ,CATEGORY_ID
64 ,CATEGORY_SET_ID
65 ,ATTRIBUTE_CATEGORY
66 ,ATTRIBUTE1
67 ,ATTRIBUTE2
68 ,ATTRIBUTE3
69 ,ATTRIBUTE4
70 ,ATTRIBUTE5
71 ,ATTRIBUTE6
72 ,ATTRIBUTE7
73 ,ATTRIBUTE8
74 ,ATTRIBUTE9
75 ,ATTRIBUTE10
76 ,ATTRIBUTE11
77 ,ATTRIBUTE12
78 ,ATTRIBUTE13
79 ,ATTRIBUTE14
80 ,ATTRIBUTE15
81 ) VALUES (
82 px_DC_DOMAIN_ID
83 ,decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, NULL, p_OBJECT_VERSION_NUMBER)
84 ,decode( p_DIAGNOSTIC_CODE_ID, FND_API.G_MISS_NUM, NULL, p_DIAGNOSTIC_CODE_ID)
85 ,decode( p_CREATED_BY, FND_API.G_MISS_NUM, NULL, p_CREATED_BY)
86 ,decode( p_CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_CREATION_DATE)
87 ,decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATED_BY)
88 ,decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_LAST_UPDATE_DATE)
89 ,decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATE_LOGIN)
90 ,decode( p_DOMAIN_TYPE_CODE, FND_API.G_MISS_CHAR, NULL, p_DOMAIN_TYPE_CODE)
91 ,decode( p_INVENTORY_ITEM_ID, FND_API.G_MISS_NUM, NULL, p_INVENTORY_ITEM_ID)
92 ,decode( p_CATEGORY_ID, FND_API.G_MISS_NUM, NULL, p_CATEGORY_ID)
93 ,decode( p_CATEGORY_SET_ID, FND_API.G_MISS_NUM, NULL, p_CATEGORY_SET_ID)
94 ,decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE_CATEGORY)
95 ,decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE1)
96 ,decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE2)
97 ,decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE3)
98 ,decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE4)
99 ,decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE5)
100 ,decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE6)
101 ,decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE7)
102 ,decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE8)
103 ,decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE9)
104 ,decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE10)
105 ,decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE11)
106 ,decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE12)
107 ,decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE13)
108 ,decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE14)
109 ,decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE15));
110 End Insert_Row;
111
112 PROCEDURE Update_Row(
113 p_DC_DOMAIN_ID NUMBER
114 ,p_OBJECT_VERSION_NUMBER NUMBER
115 ,p_DIAGNOSTIC_CODE_ID NUMBER
116 ,p_CREATED_BY NUMBER
117 ,p_CREATION_DATE DATE
118 ,p_LAST_UPDATED_BY NUMBER
119 ,p_LAST_UPDATE_DATE DATE
120 ,p_LAST_UPDATE_LOGIN NUMBER
121 ,p_DOMAIN_TYPE_CODE VARCHAR2
122 ,p_INVENTORY_ITEM_ID NUMBER
123 ,p_CATEGORY_ID NUMBER
124 ,p_CATEGORY_SET_ID NUMBER
125 ,p_ATTRIBUTE_CATEGORY VARCHAR2
126 ,p_ATTRIBUTE1 VARCHAR2
127 ,p_ATTRIBUTE2 VARCHAR2
128 ,p_ATTRIBUTE3 VARCHAR2
129 ,p_ATTRIBUTE4 VARCHAR2
130 ,p_ATTRIBUTE5 VARCHAR2
131 ,p_ATTRIBUTE6 VARCHAR2
132 ,p_ATTRIBUTE7 VARCHAR2
133 ,p_ATTRIBUTE8 VARCHAR2
134 ,p_ATTRIBUTE9 VARCHAR2
135 ,p_ATTRIBUTE10 VARCHAR2
136 ,p_ATTRIBUTE11 VARCHAR2
137 ,p_ATTRIBUTE12 VARCHAR2
138 ,p_ATTRIBUTE13 VARCHAR2
139 ,p_ATTRIBUTE14 VARCHAR2
140 ,p_ATTRIBUTE15 VARCHAR2)
141
142 IS
143 BEGIN
144 Update CSD_DC_DOMAINS
145 SET
146 OBJECT_VERSION_NUMBER = decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, NULL, NULL, OBJECT_VERSION_NUMBER, p_OBJECT_VERSION_NUMBER)
147 ,DIAGNOSTIC_CODE_ID = decode( p_DIAGNOSTIC_CODE_ID, FND_API.G_MISS_NUM, NULL, NULL, DIAGNOSTIC_CODE_ID, p_DIAGNOSTIC_CODE_ID)
148 ,CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, NULL, NULL, CREATED_BY, p_CREATED_BY)
149 ,CREATION_DATE = decode( p_CREATION_DATE, FND_API.G_MISS_DATE, NULL, NULL, CREATION_DATE, p_CREATION_DATE)
150 ,LAST_UPDATED_BY = decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL, NULL, LAST_UPDATED_BY, p_LAST_UPDATED_BY)
151 ,LAST_UPDATE_DATE = decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, NULL, NULL, LAST_UPDATE_DATE, p_LAST_UPDATE_DATE)
152 ,LAST_UPDATE_LOGIN = decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL, NULL, LAST_UPDATE_LOGIN, p_LAST_UPDATE_LOGIN)
153 ,DOMAIN_TYPE_CODE = decode( p_DOMAIN_TYPE_CODE, FND_API.G_MISS_CHAR, NULL, NULL, DOMAIN_TYPE_CODE, p_DOMAIN_TYPE_CODE)
154 ,INVENTORY_ITEM_ID = decode( p_INVENTORY_ITEM_ID, FND_API.G_MISS_NUM, NULL, NULL, INVENTORY_ITEM_ID, p_INVENTORY_ITEM_ID)
155 ,CATEGORY_ID = decode( p_CATEGORY_ID, FND_API.G_MISS_NUM, NULL, NULL, CATEGORY_ID, p_CATEGORY_ID)
156 ,CATEGORY_SET_ID = decode( p_CATEGORY_SET_ID, FND_API.G_MISS_NUM, NULL, NULL, CATEGORY_SET_ID, p_CATEGORY_SET_ID)
157 ,ATTRIBUTE_CATEGORY = decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE_CATEGORY, p_ATTRIBUTE_CATEGORY)
158 ,ATTRIBUTE1 = decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE1, p_ATTRIBUTE1)
159 ,ATTRIBUTE2 = decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE2, p_ATTRIBUTE2)
160 ,ATTRIBUTE3 = decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE3, p_ATTRIBUTE3)
161 ,ATTRIBUTE4 = decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE4, p_ATTRIBUTE4)
162 ,ATTRIBUTE5 = decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE5, p_ATTRIBUTE5)
163 ,ATTRIBUTE6 = decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE6, p_ATTRIBUTE6)
164 ,ATTRIBUTE7 = decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE7, p_ATTRIBUTE7)
165 ,ATTRIBUTE8 = decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE8, p_ATTRIBUTE8)
166 ,ATTRIBUTE9 = decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE9, p_ATTRIBUTE9)
167 ,ATTRIBUTE10 = decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE10, p_ATTRIBUTE10)
168 ,ATTRIBUTE11 = decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE11, p_ATTRIBUTE11)
172 ,ATTRIBUTE15 = decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE15, p_ATTRIBUTE15)
169 ,ATTRIBUTE12 = decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE12, p_ATTRIBUTE12)
170 ,ATTRIBUTE13 = decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE13, p_ATTRIBUTE13)
171 ,ATTRIBUTE14 = decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE14, p_ATTRIBUTE14)
173 where DC_DOMAIN_ID = p_DC_DOMAIN_ID;
174
175 If (SQL%NOTFOUND) then
176 RAISE NO_DATA_FOUND;
177 End If;
178 END Update_Row;
179
180 PROCEDURE Delete_Row(
181 p_DC_DOMAIN_ID NUMBER)
182 IS
183 BEGIN
184 DELETE FROM CSD_DC_DOMAINS
185 WHERE DC_DOMAIN_ID = p_DC_DOMAIN_ID;
186 If (SQL%NOTFOUND) then
187 RAISE NO_DATA_FOUND;
188 End If;
189 END Delete_Row;
190
191 PROCEDURE Lock_Row(
192 p_DC_DOMAIN_ID NUMBER
193 ,p_OBJECT_VERSION_NUMBER NUMBER
194
195 --commented out the rest of the record
196 /*
197 ,p_DIAGNOSTIC_CODE_ID NUMBER
198 ,p_CREATED_BY NUMBER
199 ,p_CREATION_DATE DATE
200 ,p_LAST_UPDATED_BY NUMBER
201 ,p_LAST_UPDATE_DATE DATE
202 ,p_LAST_UPDATE_LOGIN NUMBER
203 ,p_DOMAIN_TYPE_CODE VARCHAR2
204 ,p_INVENTORY_ITEM_ID NUMBER
205 ,p_CATEGORY_ID NUMBER
206 ,p_CATEGORY_SET_ID NUMBER
207 ,p_ATTRIBUTE_CATEGORY VARCHAR2
208 ,p_ATTRIBUTE1 VARCHAR2
209 ,p_ATTRIBUTE2 VARCHAR2
210 ,p_ATTRIBUTE3 VARCHAR2
211 ,p_ATTRIBUTE4 VARCHAR2
212 ,p_ATTRIBUTE5 VARCHAR2
213 ,p_ATTRIBUTE6 VARCHAR2
214 ,p_ATTRIBUTE7 VARCHAR2
215 ,p_ATTRIBUTE8 VARCHAR2
216 ,p_ATTRIBUTE9 VARCHAR2
217 ,p_ATTRIBUTE10 VARCHAR2
218 ,p_ATTRIBUTE11 VARCHAR2
219 ,p_ATTRIBUTE12 VARCHAR2
220 ,p_ATTRIBUTE13 VARCHAR2
221 ,p_ATTRIBUTE14 VARCHAR2
222 ,p_ATTRIBUTE15 VARCHAR2
223 */
224 --
225 )
226
227 IS
228 CURSOR C IS
229 SELECT *
230 FROM CSD_DC_DOMAINS
231 WHERE DC_DOMAIN_ID = p_DC_DOMAIN_ID
232 FOR UPDATE of DC_DOMAIN_ID NOWAIT;
233 Recinfo C%ROWTYPE;
234 BEGIN
235 OPEN C;
236 FETCH C INTO Recinfo;
237 If (C%NOTFOUND) then
238 CLOSE C;
239 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
240 APP_EXCEPTION.RAISE_EXCEPTION;
241 End If;
242 CLOSE C;
243 if (
247 AND ( p_OBJECT_VERSION_NUMBER IS NULL )))
244 ( Recinfo.DC_DOMAIN_ID = p_DC_DOMAIN_ID)
245 AND ( ( Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER)
246 OR ( ( Recinfo.OBJECT_VERSION_NUMBER IS NULL )
248
249 --commented out the rest of the record
250 /*
251 AND ( ( Recinfo.DIAGNOSTIC_CODE_ID = p_DIAGNOSTIC_CODE_ID)
252 OR ( ( Recinfo.DIAGNOSTIC_CODE_ID IS NULL )
253 AND ( p_DIAGNOSTIC_CODE_ID IS NULL )))
254 AND ( ( Recinfo.CREATED_BY = p_CREATED_BY)
255 OR ( ( Recinfo.CREATED_BY IS NULL )
256 AND ( p_CREATED_BY IS NULL )))
257 AND ( ( Recinfo.CREATION_DATE = p_CREATION_DATE)
258 OR ( ( Recinfo.CREATION_DATE IS NULL )
259 AND ( p_CREATION_DATE IS NULL )))
260 AND ( ( Recinfo.LAST_UPDATED_BY = p_LAST_UPDATED_BY)
261 OR ( ( Recinfo.LAST_UPDATED_BY IS NULL )
262 AND ( p_LAST_UPDATED_BY IS NULL )))
263 AND ( ( Recinfo.LAST_UPDATE_DATE = p_LAST_UPDATE_DATE)
264 OR ( ( Recinfo.LAST_UPDATE_DATE IS NULL )
265 AND ( p_LAST_UPDATE_DATE IS NULL )))
266 AND ( ( Recinfo.LAST_UPDATE_LOGIN = p_LAST_UPDATE_LOGIN)
267 OR ( ( Recinfo.LAST_UPDATE_LOGIN IS NULL )
268 AND ( p_LAST_UPDATE_LOGIN IS NULL )))
269 AND ( ( Recinfo.DOMAIN_TYPE_CODE = p_DOMAIN_TYPE_CODE)
270 OR ( ( Recinfo.DOMAIN_TYPE_CODE IS NULL )
271 AND ( p_DOMAIN_TYPE_CODE IS NULL )))
272 AND ( ( Recinfo.INVENTORY_ITEM_ID = p_INVENTORY_ITEM_ID)
273 OR ( ( Recinfo.INVENTORY_ITEM_ID IS NULL )
274 AND ( p_INVENTORY_ITEM_ID IS NULL )))
275 AND ( ( Recinfo.CATEGORY_ID = p_CATEGORY_ID)
276 OR ( ( Recinfo.CATEGORY_ID IS NULL )
277 AND ( p_CATEGORY_ID IS NULL )))
278 AND ( ( Recinfo.CATEGORY_SET_ID = p_CATEGORY_SET_ID)
279 OR ( ( Recinfo.CATEGORY_SET_ID IS NULL )
280 AND ( p_CATEGORY_SET_ID IS NULL )))
281 AND ( ( Recinfo.ATTRIBUTE_CATEGORY = p_ATTRIBUTE_CATEGORY)
282 OR ( ( Recinfo.ATTRIBUTE_CATEGORY IS NULL )
283 AND ( p_ATTRIBUTE_CATEGORY IS NULL )))
284 AND ( ( Recinfo.ATTRIBUTE1 = p_ATTRIBUTE1)
285 OR ( ( Recinfo.ATTRIBUTE1 IS NULL )
286 AND ( p_ATTRIBUTE1 IS NULL )))
287 AND ( ( Recinfo.ATTRIBUTE2 = p_ATTRIBUTE2)
288 OR ( ( Recinfo.ATTRIBUTE2 IS NULL )
289 AND ( p_ATTRIBUTE2 IS NULL )))
299 AND ( ( Recinfo.ATTRIBUTE6 = p_ATTRIBUTE6)
290 AND ( ( Recinfo.ATTRIBUTE3 = p_ATTRIBUTE3)
291 OR ( ( Recinfo.ATTRIBUTE3 IS NULL )
292 AND ( p_ATTRIBUTE3 IS NULL )))
293 AND ( ( Recinfo.ATTRIBUTE4 = p_ATTRIBUTE4)
294 OR ( ( Recinfo.ATTRIBUTE4 IS NULL )
295 AND ( p_ATTRIBUTE4 IS NULL )))
296 AND ( ( Recinfo.ATTRIBUTE5 = p_ATTRIBUTE5)
297 OR ( ( Recinfo.ATTRIBUTE5 IS NULL )
298 AND ( p_ATTRIBUTE5 IS NULL )))
300 OR ( ( Recinfo.ATTRIBUTE6 IS NULL )
301 AND ( p_ATTRIBUTE6 IS NULL )))
302 AND ( ( Recinfo.ATTRIBUTE7 = p_ATTRIBUTE7)
303 OR ( ( Recinfo.ATTRIBUTE7 IS NULL )
304 AND ( p_ATTRIBUTE7 IS NULL )))
305 AND ( ( Recinfo.ATTRIBUTE8 = p_ATTRIBUTE8)
306 OR ( ( Recinfo.ATTRIBUTE8 IS NULL )
307 AND ( p_ATTRIBUTE8 IS NULL )))
308 AND ( ( Recinfo.ATTRIBUTE9 = p_ATTRIBUTE9)
309 OR ( ( Recinfo.ATTRIBUTE9 IS NULL )
310 AND ( p_ATTRIBUTE9 IS NULL )))
311 AND ( ( Recinfo.ATTRIBUTE10 = p_ATTRIBUTE10)
312 OR ( ( Recinfo.ATTRIBUTE10 IS NULL )
313 AND ( p_ATTRIBUTE10 IS NULL )))
314 AND ( ( Recinfo.ATTRIBUTE11 = p_ATTRIBUTE11)
315 OR ( ( Recinfo.ATTRIBUTE11 IS NULL )
316 AND ( p_ATTRIBUTE11 IS NULL )))
317 AND ( ( Recinfo.ATTRIBUTE12 = p_ATTRIBUTE12)
318 OR ( ( Recinfo.ATTRIBUTE12 IS NULL )
319 AND ( p_ATTRIBUTE12 IS NULL )))
320 AND ( ( Recinfo.ATTRIBUTE13 = p_ATTRIBUTE13)
321 OR ( ( Recinfo.ATTRIBUTE13 IS NULL )
322 AND ( p_ATTRIBUTE13 IS NULL )))
323 AND ( ( Recinfo.ATTRIBUTE14 = p_ATTRIBUTE14)
324 OR ( ( Recinfo.ATTRIBUTE14 IS NULL )
325 AND ( p_ATTRIBUTE14 IS NULL )))
326 AND ( ( Recinfo.ATTRIBUTE15 = p_ATTRIBUTE15)
327 OR ( ( Recinfo.ATTRIBUTE15 IS NULL )
328 AND ( p_ATTRIBUTE15 IS NULL )))
329 */
330 --
331 ) then
332 return;
333 else
334 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
335 APP_EXCEPTION.RAISE_EXCEPTION;
336 End If;
337 END Lock_Row;
338
339 End CSD_DC_DOMAINS_PKG;