[Home] [Help]
PACKAGE BODY: APPS.CSD_AHL_W_CONTRACT_XREF_PKG
Source
1 PACKAGE BODY CSD_AHL_W_CONTRACT_XREF_PKG as
2 /* $Header: csdtawcb.pls 120.2 2011/07/12 00:11:24 yvchen noship $ */
3 -- Start of Comments
4 -- Package name : CSD_AHL_W_CONTRACT_XREF_PKG
5 -- Purpose :
6 -- History :
7 -- NOTE :
8 -- End of Comments
9
10
11 G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSD_AHL_W_CONTRACT_XREF_PKG';
12 G_FILE_NAME CONSTANT VARCHAR2(12) := 'csdtawcb.pls';
13
14 PROCEDURE Insert_Row(
15 px_WARRANTY_CONTRACT_XREF_ID IN OUT NOCOPY NUMBER
16 ,p_OBJECT_VERSION_NUMBER NUMBER
17 ,p_CREATED_BY NUMBER
18 ,p_CREATION_DATE DATE
19 ,p_LAST_UPDATED_BY NUMBER
20 ,p_LAST_UPDATE_DATE DATE
21 ,p_LAST_UPDATE_LOGIN NUMBER
22 ,p_SOURCE_TABLE VARCHAR2
23 ,p_SOURCE_COLUMN VARCHAR2
24 ,p_SOURCE_ID NUMBER
25 ,p_WARRANTY_CONTRACT_ID NUMBER
26 ,p_ATTRIBUTE_CATEGORY VARCHAR2
27 ,p_ATTRIBUTE1 VARCHAR2
28 ,p_ATTRIBUTE2 VARCHAR2
29 ,p_ATTRIBUTE3 VARCHAR2
30 ,p_ATTRIBUTE4 VARCHAR2
31 ,p_ATTRIBUTE5 VARCHAR2
32 ,p_ATTRIBUTE6 VARCHAR2
33 ,p_ATTRIBUTE7 VARCHAR2
34 ,p_ATTRIBUTE8 VARCHAR2
35 ,p_ATTRIBUTE9 VARCHAR2
36 ,p_ATTRIBUTE10 VARCHAR2
37 ,p_ATTRIBUTE11 VARCHAR2
38 ,p_ATTRIBUTE12 VARCHAR2
39 ,p_ATTRIBUTE13 VARCHAR2
40 ,p_ATTRIBUTE14 VARCHAR2
41 ,p_ATTRIBUTE15 VARCHAR2
42 ,p_REPAIR_LINE_ID NUMBER
43 ,p_INSTANCE_ID NUMBER) --yvchen
44
45 IS
46 CURSOR C2 IS SELECT CSD_AHL_W_CONTRACT_XREF_S1.nextval FROM sys.dual;
47 BEGIN
48 If (px_WARRANTY_CONTRACT_XREF_ID IS NULL) OR (px_WARRANTY_CONTRACT_XREF_ID = FND_API.G_MISS_NUM) then
49 OPEN C2;
50 FETCH C2 INTO px_WARRANTY_CONTRACT_XREF_ID;
51 CLOSE C2;
52 End If;
53 INSERT INTO CSD_AHL_W_CONTRACT_XREF(
54 WARRANTY_CONTRACT_XREF_ID
55 ,OBJECT_VERSION_NUMBER
56 ,CREATED_BY
57 ,CREATION_DATE
58 ,LAST_UPDATED_BY
59 ,LAST_UPDATE_DATE
60 ,LAST_UPDATE_LOGIN
61 ,SOURCE_TABLE
62 ,SOURCE_COLUMN
63 ,SOURCE_ID
64 ,WARRANTY_CONTRACT_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 ,REPAIR_LINE_ID
82 ,INSTANCE_ID --yvchen
83 ) VALUES (
84 px_WARRANTY_CONTRACT_XREF_ID
85 ,decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, NULL, p_OBJECT_VERSION_NUMBER)
86 ,decode( p_CREATED_BY, FND_API.G_MISS_NUM, NULL, p_CREATED_BY)
87 ,decode( p_CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_CREATION_DATE)
88 ,decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATED_BY)
89 ,decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_LAST_UPDATE_DATE)
90 ,decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATE_LOGIN)
91 ,decode( p_SOURCE_TABLE, FND_API.G_MISS_CHAR, NULL, p_SOURCE_TABLE)
92 ,decode( p_SOURCE_COLUMN, FND_API.G_MISS_CHAR, NULL, p_SOURCE_COLUMN)
93 ,decode( p_SOURCE_ID, FND_API.G_MISS_NUM, NULL, p_SOURCE_ID)
94 ,decode( p_WARRANTY_CONTRACT_ID, FND_API.G_MISS_NUM, NULL, p_WARRANTY_CONTRACT_ID)
95 ,decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE_CATEGORY)
96 ,decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE1)
97 ,decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE2)
98 ,decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE3)
99 ,decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE4)
100 ,decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE5)
101 ,decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE6)
102 ,decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE7)
103 ,decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE8)
104 ,decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE9)
105 ,decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE10)
106 ,decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE11)
107 ,decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE12)
108 ,decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE13)
109 ,decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE14)
110 ,decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE15)
111 ,decode( p_REPAIR_LINE_ID, FND_API.G_MISS_NUM, NULL, p_REPAIR_LINE_ID)
112 ,decode( p_INSTANCE_ID, FND_API.G_MISS_NUM, NULL, p_INSTANCE_ID)); --yvchen
113 End Insert_Row;
114
115
116 /*This Update_Row is not need for R12.2 project.. this procedure was auto generate.
117 It has not fully testing.. This procedure is not use by any of Depot code
118 any dev plan to use it, please test and make sure it is working */
119 PROCEDURE Update_Row(
120 p_WARRANTY_CONTRACT_XREF_ID NUMBER
121 ,p_OBJECT_VERSION_NUMBER NUMBER
122 ,p_CREATED_BY NUMBER
123 ,p_CREATION_DATE DATE
124 ,p_LAST_UPDATED_BY NUMBER
125 ,p_LAST_UPDATE_DATE DATE
126 ,p_LAST_UPDATE_LOGIN NUMBER
127 ,p_SOURCE_TABLE VARCHAR2
128 ,p_SOURCE_COLUMN VARCHAR2
129 ,p_SOURCE_ID NUMBER
130 ,p_WARRANTY_CONTRACT_ID NUMBER
131 ,p_ATTRIBUTE_CATEGORY VARCHAR2
132 ,p_ATTRIBUTE1 VARCHAR2
133 ,p_ATTRIBUTE2 VARCHAR2
134 ,p_ATTRIBUTE3 VARCHAR2
135 ,p_ATTRIBUTE4 VARCHAR2
136 ,p_ATTRIBUTE5 VARCHAR2
137 ,p_ATTRIBUTE6 VARCHAR2
138 ,p_ATTRIBUTE7 VARCHAR2
139 ,p_ATTRIBUTE8 VARCHAR2
140 ,p_ATTRIBUTE9 VARCHAR2
141 ,p_ATTRIBUTE10 VARCHAR2
142 ,p_ATTRIBUTE11 VARCHAR2
143 ,p_ATTRIBUTE12 VARCHAR2
144 ,p_ATTRIBUTE13 VARCHAR2
145 ,p_ATTRIBUTE14 VARCHAR2
146 ,p_ATTRIBUTE15 VARCHAR2
147 ,p_REPAIR_LINE_ID NUMBER
148 ,p_INSTANCE_ID NUMBER) --yvchen
149
150 IS
151 BEGIN
152 Update CSD_AHL_W_CONTRACT_XREF
153 SET
154 OBJECT_VERSION_NUMBER = decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, OBJECT_VERSION_NUMBER, p_OBJECT_VERSION_NUMBER)
155 ,CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, CREATED_BY, p_CREATED_BY)
156 ,CREATION_DATE = decode( p_CREATION_DATE, FND_API.G_MISS_DATE, CREATION_DATE, p_CREATION_DATE)
157 ,LAST_UPDATED_BY = decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, LAST_UPDATED_BY, p_LAST_UPDATED_BY)
158 ,LAST_UPDATE_DATE = decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, LAST_UPDATE_DATE, p_LAST_UPDATE_DATE)
159 ,LAST_UPDATE_LOGIN = decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, LAST_UPDATE_LOGIN, p_LAST_UPDATE_LOGIN)
160 ,SOURCE_TABLE = decode( p_SOURCE_TABLE, FND_API.G_MISS_CHAR, SOURCE_TABLE, p_SOURCE_TABLE)
161 ,SOURCE_COLUMN = decode( p_SOURCE_COLUMN, FND_API.G_MISS_CHAR, SOURCE_COLUMN, p_SOURCE_COLUMN)
162 ,SOURCE_ID = decode( p_SOURCE_ID, FND_API.G_MISS_NUM, SOURCE_ID, p_SOURCE_ID)
163 ,WARRANTY_CONTRACT_ID = decode( p_WARRANTY_CONTRACT_ID, FND_API.G_MISS_NUM, WARRANTY_CONTRACT_ID, p_WARRANTY_CONTRACT_ID)
164 ,ATTRIBUTE_CATEGORY = decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, ATTRIBUTE_CATEGORY, p_ATTRIBUTE_CATEGORY)
165 ,ATTRIBUTE1 = decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, ATTRIBUTE1, p_ATTRIBUTE1)
166 ,ATTRIBUTE2 = decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, ATTRIBUTE2, p_ATTRIBUTE2)
167 ,ATTRIBUTE3 = decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, ATTRIBUTE3, p_ATTRIBUTE3)
168 ,ATTRIBUTE4 = decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, ATTRIBUTE4, p_ATTRIBUTE4)
169 ,ATTRIBUTE5 = decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, ATTRIBUTE5, p_ATTRIBUTE5)
170 ,ATTRIBUTE6 = decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, ATTRIBUTE6, p_ATTRIBUTE6)
171 ,ATTRIBUTE7 = decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, ATTRIBUTE7, p_ATTRIBUTE7)
172 ,ATTRIBUTE8 = decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, ATTRIBUTE8, p_ATTRIBUTE8)
173 ,ATTRIBUTE9 = decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, ATTRIBUTE9, p_ATTRIBUTE9)
174 ,ATTRIBUTE10 = decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, ATTRIBUTE10, p_ATTRIBUTE10)
175 ,ATTRIBUTE11 = decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, ATTRIBUTE11, p_ATTRIBUTE11)
176 ,ATTRIBUTE12 = decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, ATTRIBUTE12, p_ATTRIBUTE12)
177 ,ATTRIBUTE13 = decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, ATTRIBUTE13, p_ATTRIBUTE13)
178 ,ATTRIBUTE14 = decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, ATTRIBUTE14, p_ATTRIBUTE14)
179 ,ATTRIBUTE15 = decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, ATTRIBUTE15, p_ATTRIBUTE15)
180 ,REPAIR_LINE_ID = decode( p_REPAIR_LINE_ID, FND_API.G_MISS_NUM, REPAIR_LINE_ID, p_REPAIR_LINE_ID)
181 ,INSTANCE_ID = decode( p_INSTANCE_ID, FND_API.G_MISS_NUM, INSTANCE_ID, p_INSTANCE_ID) --yvchen
182 where WARRANTY_CONTRACT_XREF_ID = p_WARRANTY_CONTRACT_XREF_ID;
183
184 If (SQL%NOTFOUND) then
185 RAISE NO_DATA_FOUND;
186 End If;
187 END Update_Row;
188
189 /*This Delete_Row is not need for R12.2 project.. this procedure was auto generate.
190 It has not fully testing.. This procedure is not use by any of Depot code
191 any dev plan to use it, please test and make sure it is working */
192 PROCEDURE Delete_Row(
193 p_WARRANTY_CONTRACT_XREF_ID NUMBER)
194 IS
195 BEGIN
196 DELETE FROM CSD_AHL_W_CONTRACT_XREF
197 WHERE WARRANTY_CONTRACT_XREF_ID = p_WARRANTY_CONTRACT_XREF_ID;
198 If (SQL%NOTFOUND) then
199 RAISE NO_DATA_FOUND;
200 End If;
201 END Delete_Row;
202
203
204 /*This Lock_Row is not need for R12.2 project.. this procedure was auto generate.
205 It has not fully testing.. This procedure is not use by any of Depot code
206 any dev plan to use it, please test and make sure it is working */
207 PROCEDURE Lock_Row(
208 p_WARRANTY_CONTRACT_XREF_ID NUMBER
209 ,p_OBJECT_VERSION_NUMBER NUMBER
210 ,p_CREATED_BY NUMBER
211 ,p_CREATION_DATE DATE
212 ,p_LAST_UPDATED_BY NUMBER
213 ,p_LAST_UPDATE_DATE DATE
214 ,p_LAST_UPDATE_LOGIN NUMBER
215 ,p_SOURCE_TABLE VARCHAR2
216 ,p_SOURCE_COLUMN VARCHAR2
217 ,p_SOURCE_ID NUMBER
218 ,p_WARRANTY_CONTRACT_ID NUMBER
219 ,p_ATTRIBUTE_CATEGORY VARCHAR2
220 ,p_ATTRIBUTE1 VARCHAR2
221 ,p_ATTRIBUTE2 VARCHAR2
222 ,p_ATTRIBUTE3 VARCHAR2
223 ,p_ATTRIBUTE4 VARCHAR2
224 ,p_ATTRIBUTE5 VARCHAR2
225 ,p_ATTRIBUTE6 VARCHAR2
226 ,p_ATTRIBUTE7 VARCHAR2
227 ,p_ATTRIBUTE8 VARCHAR2
228 ,p_ATTRIBUTE9 VARCHAR2
229 ,p_ATTRIBUTE10 VARCHAR2
230 ,p_ATTRIBUTE11 VARCHAR2
231 ,p_ATTRIBUTE12 VARCHAR2
232 ,p_ATTRIBUTE13 VARCHAR2
233 ,p_ATTRIBUTE14 VARCHAR2
234 ,p_ATTRIBUTE15 VARCHAR2
235 ,p_REPAIR_LINE_ID NUMBER
236 ,p_INSTANCE_ID NUMBER) --yvchen
237
238 IS
239 CURSOR C IS
240 SELECT *
241 FROM CSD_AHL_W_CONTRACT_XREF
242 WHERE WARRANTY_CONTRACT_XREF_ID = p_WARRANTY_CONTRACT_XREF_ID
243 FOR UPDATE of WARRANTY_CONTRACT_XREF_ID NOWAIT;
244 Recinfo C%ROWTYPE;
245 BEGIN
246 OPEN C;
247 FETCH C INTO Recinfo;
248 If (C%NOTFOUND) then
249 CLOSE C;
250 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
251 APP_EXCEPTION.RAISE_EXCEPTION;
252 End If;
253 CLOSE C;
254 if (
255 ( Recinfo.WARRANTY_CONTRACT_XREF_ID = p_WARRANTY_CONTRACT_XREF_ID)
256 AND ( ( Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER)
257 OR ( ( Recinfo.OBJECT_VERSION_NUMBER IS NULL )
258 AND ( p_OBJECT_VERSION_NUMBER IS NULL )))
259 AND ( ( Recinfo.CREATED_BY = p_CREATED_BY)
260 OR ( ( Recinfo.CREATED_BY IS NULL )
261 AND ( p_CREATED_BY IS NULL )))
262 AND ( ( Recinfo.CREATION_DATE = p_CREATION_DATE)
263 OR ( ( Recinfo.CREATION_DATE IS NULL )
264 AND ( p_CREATION_DATE IS NULL )))
265 AND ( ( Recinfo.LAST_UPDATED_BY = p_LAST_UPDATED_BY)
266 OR ( ( Recinfo.LAST_UPDATED_BY IS NULL )
267 AND ( p_LAST_UPDATED_BY IS NULL )))
268 AND ( ( Recinfo.LAST_UPDATE_DATE = p_LAST_UPDATE_DATE)
269 OR ( ( Recinfo.LAST_UPDATE_DATE IS NULL )
270 AND ( p_LAST_UPDATE_DATE IS NULL )))
271 AND ( ( Recinfo.LAST_UPDATE_LOGIN = p_LAST_UPDATE_LOGIN)
272 OR ( ( Recinfo.LAST_UPDATE_LOGIN IS NULL )
273 AND ( p_LAST_UPDATE_LOGIN IS NULL )))
274 AND ( ( Recinfo.SOURCE_TABLE = p_SOURCE_TABLE)
275 OR ( ( Recinfo.SOURCE_TABLE IS NULL )
276 AND ( p_SOURCE_TABLE IS NULL )))
277 AND ( ( Recinfo.SOURCE_COLUMN = p_SOURCE_COLUMN)
278 OR ( ( Recinfo.SOURCE_COLUMN IS NULL )
279 AND ( p_SOURCE_COLUMN IS NULL )))
280 AND ( ( Recinfo.SOURCE_ID = p_SOURCE_ID)
281 OR ( ( Recinfo.SOURCE_ID IS NULL )
282 AND ( p_SOURCE_ID IS NULL )))
283 AND ( ( Recinfo.WARRANTY_CONTRACT_ID = p_WARRANTY_CONTRACT_ID)
284 OR ( ( Recinfo.WARRANTY_CONTRACT_ID IS NULL )
285 AND ( p_WARRANTY_CONTRACT_ID IS NULL )))
286 AND ( ( Recinfo.ATTRIBUTE_CATEGORY = p_ATTRIBUTE_CATEGORY)
287 OR ( ( Recinfo.ATTRIBUTE_CATEGORY IS NULL )
288 AND ( p_ATTRIBUTE_CATEGORY IS NULL )))
289 AND ( ( Recinfo.ATTRIBUTE1 = p_ATTRIBUTE1)
290 OR ( ( Recinfo.ATTRIBUTE1 IS NULL )
291 AND ( p_ATTRIBUTE1 IS NULL )))
292 AND ( ( Recinfo.ATTRIBUTE2 = p_ATTRIBUTE2)
293 OR ( ( Recinfo.ATTRIBUTE2 IS NULL )
294 AND ( p_ATTRIBUTE2 IS NULL )))
295 AND ( ( Recinfo.ATTRIBUTE3 = p_ATTRIBUTE3)
296 OR ( ( Recinfo.ATTRIBUTE3 IS NULL )
297 AND ( p_ATTRIBUTE3 IS NULL )))
298 AND ( ( Recinfo.ATTRIBUTE4 = p_ATTRIBUTE4)
299 OR ( ( Recinfo.ATTRIBUTE4 IS NULL )
300 AND ( p_ATTRIBUTE4 IS NULL )))
301 AND ( ( Recinfo.ATTRIBUTE5 = p_ATTRIBUTE5)
302 OR ( ( Recinfo.ATTRIBUTE5 IS NULL )
303 AND ( p_ATTRIBUTE5 IS NULL )))
304 AND ( ( Recinfo.ATTRIBUTE6 = p_ATTRIBUTE6)
305 OR ( ( Recinfo.ATTRIBUTE6 IS NULL )
306 AND ( p_ATTRIBUTE6 IS NULL )))
307 AND ( ( Recinfo.ATTRIBUTE7 = p_ATTRIBUTE7)
308 OR ( ( Recinfo.ATTRIBUTE7 IS NULL )
309 AND ( p_ATTRIBUTE7 IS NULL )))
310 AND ( ( Recinfo.ATTRIBUTE8 = p_ATTRIBUTE8)
311 OR ( ( Recinfo.ATTRIBUTE8 IS NULL )
312 AND ( p_ATTRIBUTE8 IS NULL )))
313 AND ( ( Recinfo.ATTRIBUTE9 = p_ATTRIBUTE9)
314 OR ( ( Recinfo.ATTRIBUTE9 IS NULL )
315 AND ( p_ATTRIBUTE9 IS NULL )))
316 AND ( ( Recinfo.ATTRIBUTE10 = p_ATTRIBUTE10)
317 OR ( ( Recinfo.ATTRIBUTE10 IS NULL )
318 AND ( p_ATTRIBUTE10 IS NULL )))
319 AND ( ( Recinfo.ATTRIBUTE11 = p_ATTRIBUTE11)
320 OR ( ( Recinfo.ATTRIBUTE11 IS NULL )
321 AND ( p_ATTRIBUTE11 IS NULL )))
322 AND ( ( Recinfo.ATTRIBUTE12 = p_ATTRIBUTE12)
323 OR ( ( Recinfo.ATTRIBUTE12 IS NULL )
324 AND ( p_ATTRIBUTE12 IS NULL )))
325 AND ( ( Recinfo.ATTRIBUTE13 = p_ATTRIBUTE13)
326 OR ( ( Recinfo.ATTRIBUTE13 IS NULL )
327 AND ( p_ATTRIBUTE13 IS NULL )))
328 AND ( ( Recinfo.ATTRIBUTE14 = p_ATTRIBUTE14)
329 OR ( ( Recinfo.ATTRIBUTE14 IS NULL )
330 AND ( p_ATTRIBUTE14 IS NULL )))
331 AND ( ( Recinfo.ATTRIBUTE15 = p_ATTRIBUTE15)
332 OR ( ( Recinfo.ATTRIBUTE15 IS NULL )
333 AND ( p_ATTRIBUTE15 IS NULL )))
334 AND ( ( Recinfo.REPAIR_LINE_ID = p_REPAIR_LINE_ID)
335 OR ( ( Recinfo.REPAIR_LINE_ID IS NULL )
336 AND ( p_REPAIR_LINE_ID IS NULL )))
337 AND ( ( Recinfo.INSTANCE_ID = p_INSTANCE_ID) --yvchen
338 OR ( ( Recinfo.INSTANCE_ID IS NULL )
339 AND ( p_INSTANCE_ID IS NULL )))
340 ) then
341 return;
342 else
343 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
344 APP_EXCEPTION.RAISE_EXCEPTION;
345 End If;
346 END Lock_Row;
347
348 End CSD_AHL_W_CONTRACT_XREF_PKG;