[Home] [Help]
PACKAGE BODY: APPS.AS_SALES_LEAD_CONTACTS_PKG
Source
1 PACKAGE BODY AS_SALES_LEAD_CONTACTS_PKG as
2 /* $Header: asxtslcb.pls 115.7 2004/04/14 20:39:48 chchandr ship $ */
3 -- Start of Comments
4 -- Package name : AS_SALES_LEAD_CONTACTS_PKG
5 -- Purpose : Sales lead contacts table handlers
6 -- NOTE :
7 -- History : 04/09/2001 FFANG Created.
8 --
9 -- End of Comments
10
11
12 G_PKG_NAME CONSTANT VARCHAR2(30):= 'AS_SALES_LEAD_CONTACTS_PKG';
13 G_FILE_NAME CONSTANT VARCHAR2(12) := 'asxtslcb.pls';
14
15
16 AS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
17 AS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
18 AS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
19 AS_DEBUG_ERROR_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_ERROR);
20
21 PROCEDURE SALES_LEAD_CONTACTS_Insert_Row(
22 px_LEAD_CONTACT_ID IN OUT NOCOPY NUMBER,
23 p_SALES_LEAD_ID NUMBER,
24 p_CONTACT_ID NUMBER,
25 p_CONTACT_PARTY_ID NUMBER,
26 p_LAST_UPDATE_DATE DATE,
27 p_LAST_UPDATED_BY NUMBER,
28 p_CREATION_DATE DATE,
29 p_CREATED_BY NUMBER,
30 p_LAST_UPDATE_LOGIN NUMBER,
31 p_REQUEST_ID NUMBER,
32 p_PROGRAM_APPLICATION_ID NUMBER,
33 p_PROGRAM_ID NUMBER,
34 p_PROGRAM_UPDATE_DATE DATE,
35 p_ENABLED_FLAG VARCHAR2,
36 p_RANK VARCHAR2,
37 p_CUSTOMER_ID NUMBER,
38 p_ADDRESS_ID NUMBER,
39 p_PHONE_ID NUMBER,
40 p_CONTACT_ROLE_CODE VARCHAR2,
41 p_PRIMARY_CONTACT_FLAG VARCHAR2,
42 p_ATTRIBUTE_CATEGORY VARCHAR2,
43 p_ATTRIBUTE1 VARCHAR2,
44 p_ATTRIBUTE2 VARCHAR2,
45 p_ATTRIBUTE3 VARCHAR2,
46 p_ATTRIBUTE4 VARCHAR2,
47 p_ATTRIBUTE5 VARCHAR2,
48 p_ATTRIBUTE6 VARCHAR2,
49 p_ATTRIBUTE7 VARCHAR2,
50 p_ATTRIBUTE8 VARCHAR2,
51 p_ATTRIBUTE9 VARCHAR2,
52 p_ATTRIBUTE10 VARCHAR2,
53 p_ATTRIBUTE11 VARCHAR2,
54 p_ATTRIBUTE12 VARCHAR2,
55 p_ATTRIBUTE13 VARCHAR2,
56 p_ATTRIBUTE14 VARCHAR2,
57 p_ATTRIBUTE15 VARCHAR2)
58 -- p_SECURITY_GROUP_ID NUMBER)
59
60 IS
61 CURSOR C2 IS SELECT AS_SALES_LEAD_CONTACTS_S.nextval FROM sys.dual;
62 BEGIN
63 If (px_LEAD_CONTACT_ID IS NULL) OR (px_LEAD_CONTACT_ID = FND_API.G_MISS_NUM) then
64 OPEN C2;
65 FETCH C2 INTO px_LEAD_CONTACT_ID;
66 CLOSE C2;
67 End If;
68 INSERT INTO AS_SALES_LEAD_CONTACTS(
69 LEAD_CONTACT_ID,
70 SALES_LEAD_ID,
71 CONTACT_ID,
72 CONTACT_PARTY_ID,
73 LAST_UPDATE_DATE,
74 LAST_UPDATED_BY,
75 CREATION_DATE,
76 CREATED_BY,
77 LAST_UPDATE_LOGIN,
78 REQUEST_ID,
79 PROGRAM_APPLICATION_ID,
80 PROGRAM_ID,
81 PROGRAM_UPDATE_DATE,
82 ENABLED_FLAG,
83 RANK,
84 CUSTOMER_ID,
85 ADDRESS_ID,
86 PHONE_ID,
87 CONTACT_ROLE_CODE,
88 PRIMARY_CONTACT_FLAG,
89 ATTRIBUTE_CATEGORY,
90 ATTRIBUTE1,
91 ATTRIBUTE2,
92 ATTRIBUTE3,
93 ATTRIBUTE4,
94 ATTRIBUTE5,
95 ATTRIBUTE6,
96 ATTRIBUTE7,
97 ATTRIBUTE8,
98 ATTRIBUTE9,
99 ATTRIBUTE10,
100 ATTRIBUTE11,
101 ATTRIBUTE12,
102 ATTRIBUTE13,
103 ATTRIBUTE14,
104 ATTRIBUTE15
105 -- SECURITY_GROUP_ID
106 ) VALUES (
107 px_LEAD_CONTACT_ID,
108 decode( p_SALES_LEAD_ID, FND_API.G_MISS_NUM, NULL, p_SALES_LEAD_ID),
109 decode( p_CONTACT_ID, FND_API.G_MISS_NUM, NULL, p_CONTACT_ID),
110 decode( p_CONTACT_PARTY_ID, FND_API.G_MISS_NUM, NULL,
111 p_CONTACT_PARTY_ID),
112 decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),
113 p_LAST_UPDATE_DATE),
114 decode( p_LAST_UPDATED_BY,FND_API.G_MISS_NUM,NULL,p_LAST_UPDATED_BY),
115 decode( p_CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),
116 p_CREATION_DATE),
117 decode( p_CREATED_BY, FND_API.G_MISS_NUM, NULL, p_CREATED_BY),
118 decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,
119 p_LAST_UPDATE_LOGIN),
120 decode( p_REQUEST_ID, FND_API.G_MISS_NUM, NULL, p_REQUEST_ID),
121 decode( p_PROGRAM_APPLICATION_ID, FND_API.G_MISS_NUM, NULL,
122 p_PROGRAM_APPLICATION_ID),
123 decode( p_PROGRAM_ID, FND_API.G_MISS_NUM, NULL, p_PROGRAM_ID),
124 decode( p_PROGRAM_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),
125 p_PROGRAM_UPDATE_DATE),
126 decode( p_ENABLED_FLAG, FND_API.G_MISS_CHAR, NULL, p_ENABLED_FLAG),
127 decode( p_RANK, FND_API.G_MISS_CHAR, NULL, p_RANK),
128 decode( p_CUSTOMER_ID, FND_API.G_MISS_NUM, NULL, p_CUSTOMER_ID),
129 decode( p_ADDRESS_ID, FND_API.G_MISS_NUM, NULL, p_ADDRESS_ID),
130 decode( p_PHONE_ID, FND_API.G_MISS_NUM, NULL, p_PHONE_ID),
131 decode( p_CONTACT_ROLE_CODE, FND_API.G_MISS_CHAR, NULL,
132 p_CONTACT_ROLE_CODE),
133 decode( p_PRIMARY_CONTACT_FLAG, FND_API.G_MISS_CHAR, NULL,
134 p_PRIMARY_CONTACT_FLAG),
135 decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, NULL,
136 p_ATTRIBUTE_CATEGORY),
137 decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE1),
138 decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE2),
139 decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE3),
140 decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE4),
141 decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE5),
142 decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE6),
143 decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE7),
144 decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE8),
145 decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE9),
146 decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE10),
147 decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE11),
148 decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE12),
149 decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE13),
150 decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE14),
151 decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE15));
152 -- decode( p_SECURITY_GROUP_ID, FND_API.G_MISS_NUM, NULL,
153 -- p_SECURITY_GROUP_ID));
154 End SALES_LEAD_CONTACTS_Insert_Row;
155
156 PROCEDURE SALES_LEAD_CONTACTS_Update_Row(
157 p_LEAD_CONTACT_ID NUMBER,
158 p_SALES_LEAD_ID NUMBER,
159 p_CONTACT_ID NUMBER,
160 p_CONTACT_PARTY_ID NUMBER,
161 p_LAST_UPDATE_DATE DATE,
162 p_LAST_UPDATED_BY NUMBER,
163 p_CREATION_DATE DATE,
164 p_CREATED_BY NUMBER,
165 p_LAST_UPDATE_LOGIN NUMBER,
166 p_REQUEST_ID NUMBER,
167 p_PROGRAM_APPLICATION_ID NUMBER,
168 p_PROGRAM_ID NUMBER,
169 p_PROGRAM_UPDATE_DATE DATE,
170 p_ENABLED_FLAG VARCHAR2,
171 p_RANK VARCHAR2,
172 p_CUSTOMER_ID NUMBER,
173 p_ADDRESS_ID NUMBER,
174 p_PHONE_ID NUMBER,
175 p_CONTACT_ROLE_CODE VARCHAR2,
176 p_PRIMARY_CONTACT_FLAG VARCHAR2,
177 p_ATTRIBUTE_CATEGORY VARCHAR2,
178 p_ATTRIBUTE1 VARCHAR2,
179 p_ATTRIBUTE2 VARCHAR2,
180 p_ATTRIBUTE3 VARCHAR2,
181 p_ATTRIBUTE4 VARCHAR2,
182 p_ATTRIBUTE5 VARCHAR2,
183 p_ATTRIBUTE6 VARCHAR2,
184 p_ATTRIBUTE7 VARCHAR2,
185 p_ATTRIBUTE8 VARCHAR2,
186 p_ATTRIBUTE9 VARCHAR2,
187 p_ATTRIBUTE10 VARCHAR2,
188 p_ATTRIBUTE11 VARCHAR2,
189 p_ATTRIBUTE12 VARCHAR2,
190 p_ATTRIBUTE13 VARCHAR2,
191 p_ATTRIBUTE14 VARCHAR2,
192 p_ATTRIBUTE15 VARCHAR2)
193 -- p_SECURITY_GROUP_ID NUMBER)
194
195 IS
196
197 /* l_obj_verno number;
198
199 cursor c_obj_verno is
200 select object_version_number
201 from AS_SALES_LEAD_CONTACTS
202 where LEAD_CONTACT_ID = p_LEAD_CONTACT_ID;
203 */
204 BEGIN
205 Update AS_SALES_LEAD_CONTACTS
206 SET
207 SALES_LEAD_ID = decode( p_SALES_LEAD_ID, FND_API.G_MISS_NUM,
208 SALES_LEAD_ID, p_SALES_LEAD_ID),
209 CONTACT_ID = decode( p_CONTACT_ID, FND_API.G_MISS_NUM, CONTACT_ID,
210 p_CONTACT_ID),
211 CONTACT_PARTY_ID = decode( p_CONTACT_PARTY_ID, FND_API.G_MISS_NUM,
212 CONTACT_PARTY_ID, p_CONTACT_PARTY_ID),
213 LAST_UPDATE_DATE = decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE,
214 LAST_UPDATE_DATE, p_LAST_UPDATE_DATE),
215 LAST_UPDATED_BY = decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM,
216 LAST_UPDATED_BY, p_LAST_UPDATED_BY),
217 CREATION_DATE = decode( p_CREATION_DATE, FND_API.G_MISS_DATE,
218 CREATION_DATE, p_CREATION_DATE),
219 CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, CREATED_BY,
220 p_CREATED_BY),
221 LAST_UPDATE_LOGIN = decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM,
222 LAST_UPDATE_LOGIN, p_LAST_UPDATE_LOGIN),
223 REQUEST_ID = decode( p_REQUEST_ID, FND_API.G_MISS_NUM, REQUEST_ID,
224 p_REQUEST_ID),
225 PROGRAM_APPLICATION_ID = decode( p_PROGRAM_APPLICATION_ID,
226 FND_API.G_MISS_NUM,
227 PROGRAM_APPLICATION_ID,
228 p_PROGRAM_APPLICATION_ID),
229 PROGRAM_ID = decode( p_PROGRAM_ID, FND_API.G_MISS_NUM, PROGRAM_ID,
230 p_PROGRAM_ID),
231 PROGRAM_UPDATE_DATE = decode( p_PROGRAM_UPDATE_DATE, FND_API.G_MISS_DATE,
232 PROGRAM_UPDATE_DATE,p_PROGRAM_UPDATE_DATE),
233 ENABLED_FLAG = decode( p_ENABLED_FLAG, FND_API.G_MISS_CHAR, ENABLED_FLAG,
234 p_ENABLED_FLAG),
235 RANK = decode( p_RANK, FND_API.G_MISS_CHAR, RANK, p_RANK),
236 CUSTOMER_ID = decode( p_CUSTOMER_ID, FND_API.G_MISS_NUM, CUSTOMER_ID,
237 p_CUSTOMER_ID),
238 ADDRESS_ID = decode( p_ADDRESS_ID, FND_API.G_MISS_NUM, ADDRESS_ID,
239 p_ADDRESS_ID),
240 PHONE_ID = decode( p_PHONE_ID, FND_API.G_MISS_NUM, PHONE_ID, p_PHONE_ID),
241 CONTACT_ROLE_CODE = decode( p_CONTACT_ROLE_CODE, FND_API.G_MISS_CHAR,
242 CONTACT_ROLE_CODE, p_CONTACT_ROLE_CODE),
243 PRIMARY_CONTACT_FLAG = decode(p_PRIMARY_CONTACT_FLAG,FND_API.G_MISS_CHAR,
244 PRIMARY_CONTACT_FLAG,p_PRIMARY_CONTACT_FLAG),
245 ATTRIBUTE_CATEGORY = decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR,
246 ATTRIBUTE_CATEGORY, p_ATTRIBUTE_CATEGORY),
247 ATTRIBUTE1 = decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, ATTRIBUTE1,
248 p_ATTRIBUTE1),
249 ATTRIBUTE2 = decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, ATTRIBUTE2,
250 p_ATTRIBUTE2),
251 ATTRIBUTE3 = decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, ATTRIBUTE3,
252 p_ATTRIBUTE3),
253 ATTRIBUTE4 = decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, ATTRIBUTE4,
254 p_ATTRIBUTE4),
255 ATTRIBUTE5 = decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, ATTRIBUTE5,
256 p_ATTRIBUTE5),
257 ATTRIBUTE6 = decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, ATTRIBUTE6,
258 p_ATTRIBUTE6),
259 ATTRIBUTE7 = decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, ATTRIBUTE7,
260 p_ATTRIBUTE7),
264 p_ATTRIBUTE9),
261 ATTRIBUTE8 = decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, ATTRIBUTE8,
262 p_ATTRIBUTE8),
263 ATTRIBUTE9 = decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, ATTRIBUTE9,
265 ATTRIBUTE10 = decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, ATTRIBUTE10,
266 p_ATTRIBUTE10),
267 ATTRIBUTE11 = decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, ATTRIBUTE11,
268 p_ATTRIBUTE11),
269 ATTRIBUTE12 = decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, ATTRIBUTE12,
270 p_ATTRIBUTE12),
271 ATTRIBUTE13 = decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, ATTRIBUTE13,
272 p_ATTRIBUTE13),
273 ATTRIBUTE14 = decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, ATTRIBUTE14,
274 p_ATTRIBUTE14),
275 ATTRIBUTE15 = decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, ATTRIBUTE15,
276 p_ATTRIBUTE15),
277 object_version_number = decode(object_version_number, null, 1, object_version_number+1)
278 -- SECURITY_GROUP_ID = decode( p_SECURITY_GROUP_ID, FND_API.G_MISS_NUM,
279 -- SECURITY_GROUP_ID, p_SECURITY_GROUP_ID)
280 where LEAD_CONTACT_ID = p_LEAD_CONTACT_ID;
281 /*
282 open c_obj_verno;
283 fetch c_obj_verno into l_obj_verno;
284 close c_obj_verno;
285
286 update AS_SALES_LEAD_CONTACTS
287 set object_version_number = decode(l_obj_verno, null, 1, l_obj_verno+1)
288 where LEAD_CONTACT_ID = p_LEAD_CONTACT_ID;
289 */
290 If (SQL%NOTFOUND) then
291 RAISE NO_DATA_FOUND;
292 End If;
293 END SALES_LEAD_CONTACTS_Update_Row;
294
295 PROCEDURE SALES_LEAD_CONTACTS_Delete_Row(
296 p_LEAD_CONTACT_ID NUMBER)
297 IS
298 BEGIN
299 DELETE FROM AS_SALES_LEAD_CONTACTS
300 WHERE LEAD_CONTACT_ID = p_LEAD_CONTACT_ID;
301 If (SQL%NOTFOUND) then
302 RAISE NO_DATA_FOUND;
303 End If;
304 END SALES_LEAD_CONTACTS_Delete_Row;
305
306 PROCEDURE SALES_LEAD_CONTACTS_Lock_Row(
307 p_LEAD_CONTACT_ID NUMBER,
308 p_SALES_LEAD_ID NUMBER,
309 p_CONTACT_ID NUMBER,
310 p_CONTACT_PARTY_ID NUMBER,
311 p_LAST_UPDATE_DATE DATE,
312 p_LAST_UPDATED_BY NUMBER,
313 p_CREATION_DATE DATE,
314 p_CREATED_BY NUMBER,
315 p_LAST_UPDATE_LOGIN NUMBER,
316 p_REQUEST_ID NUMBER,
317 p_PROGRAM_APPLICATION_ID NUMBER,
318 p_PROGRAM_ID NUMBER,
319 p_PROGRAM_UPDATE_DATE DATE,
320 p_ENABLED_FLAG VARCHAR2,
321 p_RANK VARCHAR2,
322 p_CUSTOMER_ID NUMBER,
323 p_ADDRESS_ID NUMBER,
324 p_PHONE_ID NUMBER,
325 p_CONTACT_ROLE_CODE VARCHAR2,
326 p_PRIMARY_CONTACT_FLAG VARCHAR2,
327 p_ATTRIBUTE_CATEGORY VARCHAR2,
328 p_ATTRIBUTE1 VARCHAR2,
329 p_ATTRIBUTE2 VARCHAR2,
330 p_ATTRIBUTE3 VARCHAR2,
331 p_ATTRIBUTE4 VARCHAR2,
332 p_ATTRIBUTE5 VARCHAR2,
333 p_ATTRIBUTE6 VARCHAR2,
334 p_ATTRIBUTE7 VARCHAR2,
335 p_ATTRIBUTE8 VARCHAR2,
336 p_ATTRIBUTE9 VARCHAR2,
337 p_ATTRIBUTE10 VARCHAR2,
338 p_ATTRIBUTE11 VARCHAR2,
339 p_ATTRIBUTE12 VARCHAR2,
340 p_ATTRIBUTE13 VARCHAR2,
341 p_ATTRIBUTE14 VARCHAR2,
342 p_ATTRIBUTE15 VARCHAR2)
343 -- p_SECURITY_GROUP_ID NUMBER)
344
345 IS
346 CURSOR C IS
347 SELECT *
348 FROM AS_SALES_LEAD_CONTACTS
349 WHERE LEAD_CONTACT_ID = p_LEAD_CONTACT_ID
350 FOR UPDATE of LEAD_CONTACT_ID NOWAIT;
351 Recinfo C%ROWTYPE;
352 BEGIN
353 OPEN C;
354 FETCH C INTO Recinfo;
355 If (C%NOTFOUND) then
356 CLOSE C;
357 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
358 APP_EXCEPTION.RAISE_EXCEPTION;
359 End If;
360 CLOSE C;
361 if (
362 ( Recinfo.LEAD_CONTACT_ID = p_LEAD_CONTACT_ID)
363 AND ( ( Recinfo.SALES_LEAD_ID = p_SALES_LEAD_ID)
364 OR ( ( Recinfo.SALES_LEAD_ID IS NULL )
365 AND ( p_SALES_LEAD_ID IS NULL )))
366 AND ( ( Recinfo.CONTACT_ID = p_CONTACT_ID)
367 OR ( ( Recinfo.CONTACT_ID IS NULL )
368 AND ( p_CONTACT_ID IS NULL )))
369 AND ( ( Recinfo.CONTACT_PARTY_ID = p_CONTACT_PARTY_ID)
370 OR ( ( Recinfo.CONTACT_PARTY_ID IS NULL )
371 AND ( p_CONTACT_PARTY_ID IS NULL )))
372 AND ( ( Recinfo.LAST_UPDATE_DATE = p_LAST_UPDATE_DATE)
373 OR ( ( Recinfo.LAST_UPDATE_DATE IS NULL )
374 AND ( p_LAST_UPDATE_DATE IS NULL )))
375 AND ( ( Recinfo.LAST_UPDATED_BY = p_LAST_UPDATED_BY)
376 OR ( ( Recinfo.LAST_UPDATED_BY IS NULL )
377 AND ( p_LAST_UPDATED_BY IS NULL )))
378 AND ( ( Recinfo.CREATION_DATE = p_CREATION_DATE)
379 OR ( ( Recinfo.CREATION_DATE IS NULL )
380 AND ( p_CREATION_DATE IS NULL )))
381 AND ( ( Recinfo.CREATED_BY = p_CREATED_BY)
382 OR ( ( Recinfo.CREATED_BY IS NULL )
383 AND ( p_CREATED_BY IS NULL )))
384 AND ( ( Recinfo.LAST_UPDATE_LOGIN = p_LAST_UPDATE_LOGIN)
385 OR ( ( Recinfo.LAST_UPDATE_LOGIN IS NULL )
386 AND ( p_LAST_UPDATE_LOGIN IS NULL )))
387 AND ( ( Recinfo.REQUEST_ID = p_REQUEST_ID)
388 OR ( ( Recinfo.REQUEST_ID IS NULL )
389 AND ( p_REQUEST_ID IS NULL )))
393 AND ( ( Recinfo.PROGRAM_ID = p_PROGRAM_ID)
390 AND ( ( Recinfo.PROGRAM_APPLICATION_ID = p_PROGRAM_APPLICATION_ID)
391 OR ( ( Recinfo.PROGRAM_APPLICATION_ID IS NULL )
392 AND ( p_PROGRAM_APPLICATION_ID IS NULL )))
394 OR ( ( Recinfo.PROGRAM_ID IS NULL )
395 AND ( p_PROGRAM_ID IS NULL )))
396 AND ( ( Recinfo.PROGRAM_UPDATE_DATE = p_PROGRAM_UPDATE_DATE)
397 OR ( ( Recinfo.PROGRAM_UPDATE_DATE IS NULL )
398 AND ( p_PROGRAM_UPDATE_DATE IS NULL )))
399 AND ( ( Recinfo.ENABLED_FLAG = p_ENABLED_FLAG)
400 OR ( ( Recinfo.ENABLED_FLAG IS NULL )
401 AND ( p_ENABLED_FLAG IS NULL )))
402 AND ( ( Recinfo.RANK = p_RANK)
403 OR ( ( Recinfo.RANK IS NULL )
404 AND ( p_RANK IS NULL )))
405 AND ( ( Recinfo.CUSTOMER_ID = p_CUSTOMER_ID)
406 OR ( ( Recinfo.CUSTOMER_ID IS NULL )
407 AND ( p_CUSTOMER_ID IS NULL )))
408 AND ( ( Recinfo.ADDRESS_ID = p_ADDRESS_ID)
409 OR ( ( Recinfo.ADDRESS_ID IS NULL )
410 AND ( p_ADDRESS_ID IS NULL )))
411 AND ( ( Recinfo.PHONE_ID = p_PHONE_ID)
412 OR ( ( Recinfo.PHONE_ID IS NULL )
413 AND ( p_PHONE_ID IS NULL )))
414 AND ( ( Recinfo.CONTACT_ROLE_CODE = p_CONTACT_ROLE_CODE)
415 OR ( ( Recinfo.CONTACT_ROLE_CODE IS NULL )
416 AND ( p_CONTACT_ROLE_CODE IS NULL )))
417 AND ( ( Recinfo.PRIMARY_CONTACT_FLAG = p_PRIMARY_CONTACT_FLAG)
418 OR ( ( Recinfo.PRIMARY_CONTACT_FLAG IS NULL )
419 AND ( p_PRIMARY_CONTACT_FLAG IS NULL )))
420 AND ( ( Recinfo.ATTRIBUTE_CATEGORY = p_ATTRIBUTE_CATEGORY)
421 OR ( ( Recinfo.ATTRIBUTE_CATEGORY IS NULL )
422 AND ( p_ATTRIBUTE_CATEGORY IS NULL )))
423 AND ( ( Recinfo.ATTRIBUTE1 = p_ATTRIBUTE1)
424 OR ( ( Recinfo.ATTRIBUTE1 IS NULL )
425 AND ( p_ATTRIBUTE1 IS NULL )))
426 AND ( ( Recinfo.ATTRIBUTE2 = p_ATTRIBUTE2)
427 OR ( ( Recinfo.ATTRIBUTE2 IS NULL )
428 AND ( p_ATTRIBUTE2 IS NULL )))
429 AND ( ( Recinfo.ATTRIBUTE3 = p_ATTRIBUTE3)
430 OR ( ( Recinfo.ATTRIBUTE3 IS NULL )
431 AND ( p_ATTRIBUTE3 IS NULL )))
432 AND ( ( Recinfo.ATTRIBUTE4 = p_ATTRIBUTE4)
433 OR ( ( Recinfo.ATTRIBUTE4 IS NULL )
434 AND ( p_ATTRIBUTE4 IS NULL )))
435 AND ( ( Recinfo.ATTRIBUTE5 = p_ATTRIBUTE5)
436 OR ( ( Recinfo.ATTRIBUTE5 IS NULL )
437 AND ( p_ATTRIBUTE5 IS NULL )))
438 AND ( ( Recinfo.ATTRIBUTE6 = p_ATTRIBUTE6)
439 OR ( ( Recinfo.ATTRIBUTE6 IS NULL )
440 AND ( p_ATTRIBUTE6 IS NULL )))
441 AND ( ( Recinfo.ATTRIBUTE7 = p_ATTRIBUTE7)
442 OR ( ( Recinfo.ATTRIBUTE7 IS NULL )
443 AND ( p_ATTRIBUTE7 IS NULL )))
444 AND ( ( Recinfo.ATTRIBUTE8 = p_ATTRIBUTE8)
445 OR ( ( Recinfo.ATTRIBUTE8 IS NULL )
446 AND ( p_ATTRIBUTE8 IS NULL )))
447 AND ( ( Recinfo.ATTRIBUTE9 = p_ATTRIBUTE9)
448 OR ( ( Recinfo.ATTRIBUTE9 IS NULL )
449 AND ( p_ATTRIBUTE9 IS NULL )))
450 AND ( ( Recinfo.ATTRIBUTE10 = p_ATTRIBUTE10)
451 OR ( ( Recinfo.ATTRIBUTE10 IS NULL )
452 AND ( p_ATTRIBUTE10 IS NULL )))
453 AND ( ( Recinfo.ATTRIBUTE11 = p_ATTRIBUTE11)
454 OR ( ( Recinfo.ATTRIBUTE11 IS NULL )
455 AND ( p_ATTRIBUTE11 IS NULL )))
456 AND ( ( Recinfo.ATTRIBUTE12 = p_ATTRIBUTE12)
457 OR ( ( Recinfo.ATTRIBUTE12 IS NULL )
458 AND ( p_ATTRIBUTE12 IS NULL )))
459 AND ( ( Recinfo.ATTRIBUTE13 = p_ATTRIBUTE13)
460 OR ( ( Recinfo.ATTRIBUTE13 IS NULL )
461 AND ( p_ATTRIBUTE13 IS NULL )))
462 AND ( ( Recinfo.ATTRIBUTE14 = p_ATTRIBUTE14)
463 OR ( ( Recinfo.ATTRIBUTE14 IS NULL )
464 AND ( p_ATTRIBUTE14 IS NULL )))
465 AND ( ( Recinfo.ATTRIBUTE15 = p_ATTRIBUTE15)
466 OR ( ( Recinfo.ATTRIBUTE15 IS NULL )
467 AND ( p_ATTRIBUTE15 IS NULL )))
468 -- AND ( ( Recinfo.SECURITY_GROUP_ID = p_SECURITY_GROUP_ID)
469 -- OR ( ( Recinfo.SECURITY_GROUP_ID IS NULL )
470 -- AND ( p_SECURITY_GROUP_ID IS NULL )))
471 ) then
472 return;
473 else
474 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
475 APP_EXCEPTION.RAISE_EXCEPTION;
476 End If;
477 END SALES_LEAD_CONTACTS_Lock_Row;
478
479
480 End AS_SALES_LEAD_CONTACTS_PKG;