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