DBA Data[Home] [Help]

PACKAGE BODY: APPS.CS_SR_CONTACTS_EXT_PKG

Source


1 package body CS_SR_CONTACTS_EXT_PKG as
2 /* $Header: csextapb.pls 120.0 2008/02/01 20:17:43 rtripath noship $ */
3 procedure INSERT_ROW (
4   X_ROWID in out nocopy VARCHAR2,
5   X_EXTENSION_ID in NUMBER,
6   X_D_EXT_ATTR10 in DATE,
7   X_D_EXT_ATTR11 in DATE,
8   X_D_EXT_ATTR12 in DATE,
9   X_D_EXT_ATTR13 in DATE,
10   X_D_EXT_ATTR14 in DATE,
11   X_D_EXT_ATTR15 in DATE,
12   X_D_EXT_ATTR16 in DATE,
13   X_D_EXT_ATTR17 in DATE,
14   X_D_EXT_ATTR18 in DATE,
15   X_D_EXT_ATTR19 in DATE,
16   X_D_EXT_ATTR20 in DATE,
17   X_D_EXT_ATTR21 in DATE,
18   X_D_EXT_ATTR22 in DATE,
19   X_D_EXT_ATTR23 in DATE,
20   X_D_EXT_ATTR24 in DATE,
21   X_D_EXT_ATTR25 in DATE,
22   X_UOM_EXT_ATTR1 in VARCHAR2,
23   X_UOM_EXT_ATTR2 in VARCHAR2,
24   X_UOM_EXT_ATTR3 in VARCHAR2,
25   X_UOM_EXT_ATTR4 in VARCHAR2,
26   X_UOM_EXT_ATTR5 in VARCHAR2,
27   X_UOM_EXT_ATTR6 in VARCHAR2,
28   X_UOM_EXT_ATTR7 in VARCHAR2,
29   X_UOM_EXT_ATTR8 in VARCHAR2,
30   X_UOM_EXT_ATTR9 in VARCHAR2,
31   X_UOM_EXT_ATTR10 in VARCHAR2,
32   X_UOM_EXT_ATTR11 in VARCHAR2,
33   X_UOM_EXT_ATTR12 in VARCHAR2,
34   X_UOM_EXT_ATTR13 in VARCHAR2,
35   X_UOM_EXT_ATTR14 in VARCHAR2,
36   X_UOM_EXT_ATTR15 in VARCHAR2,
37   X_UOM_EXT_ATTR16 in VARCHAR2,
38   X_UOM_EXT_ATTR17 in VARCHAR2,
39   X_UOM_EXT_ATTR18 in VARCHAR2,
40   X_UOM_EXT_ATTR19 in VARCHAR2,
41   X_UOM_EXT_ATTR20 in VARCHAR2,
42   X_UOM_EXT_ATTR21 in VARCHAR2,
43   X_UOM_EXT_ATTR22 in VARCHAR2,
44   X_UOM_EXT_ATTR23 in VARCHAR2,
45   X_UOM_EXT_ATTR24 in VARCHAR2,
46   X_UOM_EXT_ATTR25 in VARCHAR2,
47   X_PARTY_ID in NUMBER,
48   X_CONTACT_TYPE in VARCHAR2,
49   X_PARTY_ROLE_CODE in VARCHAR2,
50   X_C_EXT_ATTR5 in VARCHAR2,
51   X_C_EXT_ATTR6 in VARCHAR2,
52   X_C_EXT_ATTR7 in VARCHAR2,
53   X_C_EXT_ATTR8 in VARCHAR2,
54   X_C_EXT_ATTR9 in VARCHAR2,
55   X_C_EXT_ATTR10 in VARCHAR2,
56   X_C_EXT_ATTR11 in VARCHAR2,
57   X_C_EXT_ATTR12 in VARCHAR2,
58   X_C_EXT_ATTR13 in VARCHAR2,
59   X_C_EXT_ATTR14 in VARCHAR2,
60   X_C_EXT_ATTR15 in VARCHAR2,
61   X_C_EXT_ATTR16 in VARCHAR2,
62   X_C_EXT_ATTR17 in VARCHAR2,
63   X_C_EXT_ATTR18 in VARCHAR2,
64   X_C_EXT_ATTR19 in VARCHAR2,
65   X_C_EXT_ATTR20 in VARCHAR2,
66   X_C_EXT_ATTR21 in VARCHAR2,
67   X_C_EXT_ATTR22 in VARCHAR2,
68   X_C_EXT_ATTR23 in VARCHAR2,
69   X_C_EXT_ATTR24 in VARCHAR2,
70   X_C_EXT_ATTR25 in VARCHAR2,
71   X_C_EXT_ATTR26 in VARCHAR2,
72   X_C_EXT_ATTR27 in VARCHAR2,
73   X_C_EXT_ATTR28 in VARCHAR2,
74   X_C_EXT_ATTR29 in VARCHAR2,
75   X_C_EXT_ATTR30 in VARCHAR2,
76   X_C_EXT_ATTR31 in VARCHAR2,
77   X_C_EXT_ATTR32 in VARCHAR2,
78   X_C_EXT_ATTR33 in VARCHAR2,
79   X_C_EXT_ATTR34 in VARCHAR2,
80   X_C_EXT_ATTR35 in VARCHAR2,
81   X_C_EXT_ATTR36 in VARCHAR2,
82   X_C_EXT_ATTR37 in VARCHAR2,
83   X_C_EXT_ATTR38 in VARCHAR2,
84   X_C_EXT_ATTR39 in VARCHAR2,
85   X_C_EXT_ATTR40 in VARCHAR2,
86   X_C_EXT_ATTR41 in VARCHAR2,
87   X_C_EXT_ATTR42 in VARCHAR2,
88   X_C_EXT_ATTR43 in VARCHAR2,
89   X_C_EXT_ATTR44 in VARCHAR2,
90   X_C_EXT_ATTR45 in VARCHAR2,
91   X_C_EXT_ATTR46 in VARCHAR2,
92   X_C_EXT_ATTR47 in VARCHAR2,
93   X_C_EXT_ATTR48 in VARCHAR2,
94   X_C_EXT_ATTR49 in VARCHAR2,
95   X_C_EXT_ATTR50 in VARCHAR2,
96   X_N_EXT_ATTR1 in NUMBER,
97   X_N_EXT_ATTR2 in NUMBER,
98   X_N_EXT_ATTR3 in NUMBER,
99   X_N_EXT_ATTR4 in NUMBER,
100   X_N_EXT_ATTR5 in NUMBER,
101   X_N_EXT_ATTR6 in NUMBER,
102   X_N_EXT_ATTR7 in NUMBER,
103   X_N_EXT_ATTR8 in NUMBER,
104   X_N_EXT_ATTR9 in NUMBER,
105   X_N_EXT_ATTR10 in NUMBER,
106   X_N_EXT_ATTR11 in NUMBER,
107   X_N_EXT_ATTR12 in NUMBER,
108   X_N_EXT_ATTR13 in NUMBER,
109   X_N_EXT_ATTR14 in NUMBER,
110   X_N_EXT_ATTR15 in NUMBER,
111   X_N_EXT_ATTR16 in NUMBER,
112   X_N_EXT_ATTR17 in NUMBER,
113   X_N_EXT_ATTR18 in NUMBER,
114   X_N_EXT_ATTR19 in NUMBER,
115   X_N_EXT_ATTR20 in NUMBER,
116   X_N_EXT_ATTR21 in NUMBER,
117   X_N_EXT_ATTR22 in NUMBER,
118   X_N_EXT_ATTR23 in NUMBER,
119   X_N_EXT_ATTR24 in NUMBER,
120   X_N_EXT_ATTR25 in NUMBER,
121   X_D_EXT_ATTR1 in DATE,
122   X_D_EXT_ATTR2 in DATE,
123   X_D_EXT_ATTR3 in DATE,
124   X_D_EXT_ATTR4 in DATE,
125   X_D_EXT_ATTR5 in DATE,
126   X_D_EXT_ATTR6 in DATE,
127   X_D_EXT_ATTR7 in DATE,
128   X_D_EXT_ATTR8 in DATE,
129   X_D_EXT_ATTR9 in DATE,
130   X_INCIDENT_ID in NUMBER,
131   X_CONTEXT in VARCHAR2,
132   X_ATTR_GROUP_ID in NUMBER,
133   X_C_EXT_ATTR1 in VARCHAR2,
134   X_C_EXT_ATTR2 in VARCHAR2,
135   X_C_EXT_ATTR3 in VARCHAR2,
136   X_C_EXT_ATTR4 in VARCHAR2,
137   X_TL_EXT_ATTR1 in VARCHAR2,
138   X_TL_EXT_ATTR2 in VARCHAR2,
139   X_TL_EXT_ATTR3 in VARCHAR2,
140   X_TL_EXT_ATTR4 in VARCHAR2,
141   X_TL_EXT_ATTR5 in VARCHAR2,
142   X_TL_EXT_ATTR6 in VARCHAR2,
143   X_TL_EXT_ATTR7 in VARCHAR2,
144   X_TL_EXT_ATTR8 in VARCHAR2,
145   X_TL_EXT_ATTR9 in VARCHAR2,
146   X_TL_EXT_ATTR10 in VARCHAR2,
147   X_CREATION_DATE in DATE,
148   X_CREATED_BY in NUMBER,
149   X_LAST_UPDATE_DATE in DATE,
150   X_LAST_UPDATED_BY in NUMBER,
151   X_LAST_UPDATE_LOGIN in NUMBER
152 ) is
153   cursor C is select ROWID from CS_SR_CONTACTS_EXT_B
154     where EXTENSION_ID = X_EXTENSION_ID
155     ;
156 begin
157   insert into CS_SR_CONTACTS_EXT_B (
158     D_EXT_ATTR10,
159     D_EXT_ATTR11,
160     D_EXT_ATTR12,
161     D_EXT_ATTR13,
162     D_EXT_ATTR14,
163     D_EXT_ATTR15,
164     D_EXT_ATTR16,
165     D_EXT_ATTR17,
166     D_EXT_ATTR18,
167     D_EXT_ATTR19,
168     D_EXT_ATTR20,
169     D_EXT_ATTR21,
170     D_EXT_ATTR22,
171     D_EXT_ATTR23,
172     D_EXT_ATTR24,
173     D_EXT_ATTR25,
174     UOM_EXT_ATTR1,
175     UOM_EXT_ATTR2,
176     UOM_EXT_ATTR3,
177     UOM_EXT_ATTR4,
178     UOM_EXT_ATTR5,
179     UOM_EXT_ATTR6,
180     UOM_EXT_ATTR7,
181     UOM_EXT_ATTR8,
182     UOM_EXT_ATTR9,
183     UOM_EXT_ATTR10,
184     UOM_EXT_ATTR11,
185     UOM_EXT_ATTR12,
186     UOM_EXT_ATTR13,
187     UOM_EXT_ATTR14,
188     UOM_EXT_ATTR15,
189     UOM_EXT_ATTR16,
190     UOM_EXT_ATTR17,
191     UOM_EXT_ATTR18,
192     UOM_EXT_ATTR19,
193     UOM_EXT_ATTR20,
194     UOM_EXT_ATTR21,
195     UOM_EXT_ATTR22,
196     UOM_EXT_ATTR23,
197     UOM_EXT_ATTR24,
198     UOM_EXT_ATTR25,
199     PARTY_ID,
200     CONTACT_TYPE,
201     PARTY_ROLE_CODE,
202     C_EXT_ATTR5,
203     C_EXT_ATTR6,
204     C_EXT_ATTR7,
205     C_EXT_ATTR8,
206     C_EXT_ATTR9,
207     C_EXT_ATTR10,
208     C_EXT_ATTR11,
209     C_EXT_ATTR12,
210     C_EXT_ATTR13,
211     C_EXT_ATTR14,
212     C_EXT_ATTR15,
213     C_EXT_ATTR16,
214     C_EXT_ATTR17,
215     C_EXT_ATTR18,
216     C_EXT_ATTR19,
217     C_EXT_ATTR20,
218     C_EXT_ATTR21,
219     C_EXT_ATTR22,
220     C_EXT_ATTR23,
221     C_EXT_ATTR24,
222     C_EXT_ATTR25,
223     C_EXT_ATTR26,
224     C_EXT_ATTR27,
225     C_EXT_ATTR28,
226     C_EXT_ATTR29,
227     C_EXT_ATTR30,
228     C_EXT_ATTR31,
229     C_EXT_ATTR32,
230     C_EXT_ATTR33,
231     C_EXT_ATTR34,
232     C_EXT_ATTR35,
233     C_EXT_ATTR36,
234     C_EXT_ATTR37,
235     C_EXT_ATTR38,
236     C_EXT_ATTR39,
237     C_EXT_ATTR40,
238     C_EXT_ATTR41,
239     C_EXT_ATTR42,
240     C_EXT_ATTR43,
241     C_EXT_ATTR44,
242     C_EXT_ATTR45,
243     C_EXT_ATTR46,
244     C_EXT_ATTR47,
245     C_EXT_ATTR48,
246     C_EXT_ATTR49,
247     C_EXT_ATTR50,
248     N_EXT_ATTR1,
249     N_EXT_ATTR2,
250     N_EXT_ATTR3,
251     N_EXT_ATTR4,
252     N_EXT_ATTR5,
253     N_EXT_ATTR6,
254     N_EXT_ATTR7,
255     N_EXT_ATTR8,
256     N_EXT_ATTR9,
257     N_EXT_ATTR10,
258     N_EXT_ATTR11,
259     N_EXT_ATTR12,
260     N_EXT_ATTR13,
261     N_EXT_ATTR14,
262     N_EXT_ATTR15,
263     N_EXT_ATTR16,
264     N_EXT_ATTR17,
265     N_EXT_ATTR18,
266     N_EXT_ATTR19,
267     N_EXT_ATTR20,
268     N_EXT_ATTR21,
269     N_EXT_ATTR22,
270     N_EXT_ATTR23,
271     N_EXT_ATTR24,
272     N_EXT_ATTR25,
273     D_EXT_ATTR1,
274     D_EXT_ATTR2,
275     D_EXT_ATTR3,
276     D_EXT_ATTR4,
277     D_EXT_ATTR5,
278     D_EXT_ATTR6,
279     D_EXT_ATTR7,
280     D_EXT_ATTR8,
281     D_EXT_ATTR9,
282     EXTENSION_ID,
283     INCIDENT_ID,
284     CONTEXT,
285     ATTR_GROUP_ID,
286     C_EXT_ATTR1,
287     C_EXT_ATTR2,
288     C_EXT_ATTR3,
289     C_EXT_ATTR4,
290     CREATION_DATE,
291     CREATED_BY,
292     LAST_UPDATE_DATE,
293     LAST_UPDATED_BY,
294     LAST_UPDATE_LOGIN
295   ) values (
296     X_D_EXT_ATTR10,
297     X_D_EXT_ATTR11,
298     X_D_EXT_ATTR12,
299     X_D_EXT_ATTR13,
300     X_D_EXT_ATTR14,
301     X_D_EXT_ATTR15,
302     X_D_EXT_ATTR16,
303     X_D_EXT_ATTR17,
304     X_D_EXT_ATTR18,
305     X_D_EXT_ATTR19,
306     X_D_EXT_ATTR20,
307     X_D_EXT_ATTR21,
308     X_D_EXT_ATTR22,
309     X_D_EXT_ATTR23,
310     X_D_EXT_ATTR24,
311     X_D_EXT_ATTR25,
312     X_UOM_EXT_ATTR1,
313     X_UOM_EXT_ATTR2,
314     X_UOM_EXT_ATTR3,
315     X_UOM_EXT_ATTR4,
316     X_UOM_EXT_ATTR5,
317     X_UOM_EXT_ATTR6,
318     X_UOM_EXT_ATTR7,
319     X_UOM_EXT_ATTR8,
320     X_UOM_EXT_ATTR9,
321     X_UOM_EXT_ATTR10,
322     X_UOM_EXT_ATTR11,
323     X_UOM_EXT_ATTR12,
324     X_UOM_EXT_ATTR13,
325     X_UOM_EXT_ATTR14,
326     X_UOM_EXT_ATTR15,
327     X_UOM_EXT_ATTR16,
328     X_UOM_EXT_ATTR17,
329     X_UOM_EXT_ATTR18,
330     X_UOM_EXT_ATTR19,
331     X_UOM_EXT_ATTR20,
332     X_UOM_EXT_ATTR21,
333     X_UOM_EXT_ATTR22,
334     X_UOM_EXT_ATTR23,
335     X_UOM_EXT_ATTR24,
336     X_UOM_EXT_ATTR25,
337     X_PARTY_ID,
338     X_CONTACT_TYPE,
339     X_PARTY_ROLE_CODE,
340     X_C_EXT_ATTR5,
341     X_C_EXT_ATTR6,
342     X_C_EXT_ATTR7,
343     X_C_EXT_ATTR8,
344     X_C_EXT_ATTR9,
345     X_C_EXT_ATTR10,
346     X_C_EXT_ATTR11,
347     X_C_EXT_ATTR12,
348     X_C_EXT_ATTR13,
349     X_C_EXT_ATTR14,
350     X_C_EXT_ATTR15,
351     X_C_EXT_ATTR16,
352     X_C_EXT_ATTR17,
353     X_C_EXT_ATTR18,
354     X_C_EXT_ATTR19,
355     X_C_EXT_ATTR20,
356     X_C_EXT_ATTR21,
357     X_C_EXT_ATTR22,
358     X_C_EXT_ATTR23,
359     X_C_EXT_ATTR24,
360     X_C_EXT_ATTR25,
361     X_C_EXT_ATTR26,
362     X_C_EXT_ATTR27,
363     X_C_EXT_ATTR28,
364     X_C_EXT_ATTR29,
365     X_C_EXT_ATTR30,
366     X_C_EXT_ATTR31,
367     X_C_EXT_ATTR32,
368     X_C_EXT_ATTR33,
369     X_C_EXT_ATTR34,
370     X_C_EXT_ATTR35,
371     X_C_EXT_ATTR36,
372     X_C_EXT_ATTR37,
373     X_C_EXT_ATTR38,
374     X_C_EXT_ATTR39,
375     X_C_EXT_ATTR40,
376     X_C_EXT_ATTR41,
377     X_C_EXT_ATTR42,
378     X_C_EXT_ATTR43,
379     X_C_EXT_ATTR44,
380     X_C_EXT_ATTR45,
381     X_C_EXT_ATTR46,
382     X_C_EXT_ATTR47,
383     X_C_EXT_ATTR48,
384     X_C_EXT_ATTR49,
385     X_C_EXT_ATTR50,
386     X_N_EXT_ATTR1,
387     X_N_EXT_ATTR2,
388     X_N_EXT_ATTR3,
389     X_N_EXT_ATTR4,
390     X_N_EXT_ATTR5,
391     X_N_EXT_ATTR6,
392     X_N_EXT_ATTR7,
393     X_N_EXT_ATTR8,
394     X_N_EXT_ATTR9,
395     X_N_EXT_ATTR10,
396     X_N_EXT_ATTR11,
397     X_N_EXT_ATTR12,
398     X_N_EXT_ATTR13,
399     X_N_EXT_ATTR14,
400     X_N_EXT_ATTR15,
401     X_N_EXT_ATTR16,
402     X_N_EXT_ATTR17,
403     X_N_EXT_ATTR18,
404     X_N_EXT_ATTR19,
405     X_N_EXT_ATTR20,
406     X_N_EXT_ATTR21,
407     X_N_EXT_ATTR22,
408     X_N_EXT_ATTR23,
409     X_N_EXT_ATTR24,
410     X_N_EXT_ATTR25,
411     X_D_EXT_ATTR1,
412     X_D_EXT_ATTR2,
413     X_D_EXT_ATTR3,
414     X_D_EXT_ATTR4,
415     X_D_EXT_ATTR5,
416     X_D_EXT_ATTR6,
417     X_D_EXT_ATTR7,
418     X_D_EXT_ATTR8,
419     X_D_EXT_ATTR9,
420     X_EXTENSION_ID,
421     X_INCIDENT_ID,
422     X_CONTEXT,
423     X_ATTR_GROUP_ID,
424     X_C_EXT_ATTR1,
425     X_C_EXT_ATTR2,
426     X_C_EXT_ATTR3,
427     X_C_EXT_ATTR4,
428     X_CREATION_DATE,
429     X_CREATED_BY,
430     X_LAST_UPDATE_DATE,
431     X_LAST_UPDATED_BY,
432     X_LAST_UPDATE_LOGIN
433   );
434 
435   insert into CS_SR_CONTACTS_EXT_TL (
436     PARTY_ROLE_CODE,
437     CONTACT_TYPE,
438     PARTY_ID,
439     EXTENSION_ID,
440     INCIDENT_ID,
441     CONTEXT,
442     ATTR_GROUP_ID,
443     LAST_UPDATE_DATE,
444     LAST_UPDATED_BY,
445     LAST_UPDATE_LOGIN,
446     CREATED_BY,
447     CREATION_DATE,
448     TL_EXT_ATTR1,
449     TL_EXT_ATTR2,
450     TL_EXT_ATTR3,
451     TL_EXT_ATTR4,
452     TL_EXT_ATTR5,
453     TL_EXT_ATTR6,
454     TL_EXT_ATTR7,
455     TL_EXT_ATTR8,
456     TL_EXT_ATTR9,
457     TL_EXT_ATTR10,
458     LANGUAGE,
459     SOURCE_LANG
460   ) select
461     X_PARTY_ROLE_CODE,
462     X_CONTACT_TYPE,
463     X_PARTY_ID,
464     X_EXTENSION_ID,
465     X_INCIDENT_ID,
466     X_CONTEXT,
467     X_ATTR_GROUP_ID,
468     X_LAST_UPDATE_DATE,
469     X_LAST_UPDATED_BY,
470     X_LAST_UPDATE_LOGIN,
471     X_CREATED_BY,
472     X_CREATION_DATE,
473     X_TL_EXT_ATTR1,
474     X_TL_EXT_ATTR2,
475     X_TL_EXT_ATTR3,
476     X_TL_EXT_ATTR4,
477     X_TL_EXT_ATTR5,
478     X_TL_EXT_ATTR6,
479     X_TL_EXT_ATTR7,
480     X_TL_EXT_ATTR8,
481     X_TL_EXT_ATTR9,
482     X_TL_EXT_ATTR10,
483     L.LANGUAGE_CODE,
484     userenv('LANG')
485   from FND_LANGUAGES L
486   where L.INSTALLED_FLAG in ('I', 'B')
487   and not exists
488     (select NULL
489     from CS_SR_CONTACTS_EXT_TL T
490     where T.EXTENSION_ID = X_EXTENSION_ID
491     and T.LANGUAGE = L.LANGUAGE_CODE);
492 
493   open c;
494   fetch c into X_ROWID;
495   if (c%notfound) then
496     close c;
497     raise no_data_found;
498   end if;
499   close c;
500 
501 end INSERT_ROW;
502 
503 procedure LOCK_ROW (
504   X_EXTENSION_ID in NUMBER,
505   X_D_EXT_ATTR10 in DATE,
506   X_D_EXT_ATTR11 in DATE,
507   X_D_EXT_ATTR12 in DATE,
508   X_D_EXT_ATTR13 in DATE,
509   X_D_EXT_ATTR14 in DATE,
510   X_D_EXT_ATTR15 in DATE,
511   X_D_EXT_ATTR16 in DATE,
512   X_D_EXT_ATTR17 in DATE,
513   X_D_EXT_ATTR18 in DATE,
514   X_D_EXT_ATTR19 in DATE,
515   X_D_EXT_ATTR20 in DATE,
519   X_D_EXT_ATTR24 in DATE,
516   X_D_EXT_ATTR21 in DATE,
517   X_D_EXT_ATTR22 in DATE,
518   X_D_EXT_ATTR23 in DATE,
520   X_D_EXT_ATTR25 in DATE,
521   X_UOM_EXT_ATTR1 in VARCHAR2,
522   X_UOM_EXT_ATTR2 in VARCHAR2,
523   X_UOM_EXT_ATTR3 in VARCHAR2,
524   X_UOM_EXT_ATTR4 in VARCHAR2,
525   X_UOM_EXT_ATTR5 in VARCHAR2,
526   X_UOM_EXT_ATTR6 in VARCHAR2,
527   X_UOM_EXT_ATTR7 in VARCHAR2,
528   X_UOM_EXT_ATTR8 in VARCHAR2,
529   X_UOM_EXT_ATTR9 in VARCHAR2,
530   X_UOM_EXT_ATTR10 in VARCHAR2,
531   X_UOM_EXT_ATTR11 in VARCHAR2,
532   X_UOM_EXT_ATTR12 in VARCHAR2,
533   X_UOM_EXT_ATTR13 in VARCHAR2,
534   X_UOM_EXT_ATTR14 in VARCHAR2,
535   X_UOM_EXT_ATTR15 in VARCHAR2,
536   X_UOM_EXT_ATTR16 in VARCHAR2,
537   X_UOM_EXT_ATTR17 in VARCHAR2,
538   X_UOM_EXT_ATTR18 in VARCHAR2,
539   X_UOM_EXT_ATTR19 in VARCHAR2,
540   X_UOM_EXT_ATTR20 in VARCHAR2,
541   X_UOM_EXT_ATTR21 in VARCHAR2,
542   X_UOM_EXT_ATTR22 in VARCHAR2,
543   X_UOM_EXT_ATTR23 in VARCHAR2,
544   X_UOM_EXT_ATTR24 in VARCHAR2,
545   X_UOM_EXT_ATTR25 in VARCHAR2,
546   X_PARTY_ID in NUMBER,
547   X_CONTACT_TYPE in VARCHAR2,
548   X_PARTY_ROLE_CODE in VARCHAR2,
549   X_C_EXT_ATTR5 in VARCHAR2,
550   X_C_EXT_ATTR6 in VARCHAR2,
551   X_C_EXT_ATTR7 in VARCHAR2,
552   X_C_EXT_ATTR8 in VARCHAR2,
553   X_C_EXT_ATTR9 in VARCHAR2,
554   X_C_EXT_ATTR10 in VARCHAR2,
555   X_C_EXT_ATTR11 in VARCHAR2,
556   X_C_EXT_ATTR12 in VARCHAR2,
557   X_C_EXT_ATTR13 in VARCHAR2,
558   X_C_EXT_ATTR14 in VARCHAR2,
559   X_C_EXT_ATTR15 in VARCHAR2,
560   X_C_EXT_ATTR16 in VARCHAR2,
561   X_C_EXT_ATTR17 in VARCHAR2,
562   X_C_EXT_ATTR18 in VARCHAR2,
563   X_C_EXT_ATTR19 in VARCHAR2,
564   X_C_EXT_ATTR20 in VARCHAR2,
565   X_C_EXT_ATTR21 in VARCHAR2,
566   X_C_EXT_ATTR22 in VARCHAR2,
567   X_C_EXT_ATTR23 in VARCHAR2,
568   X_C_EXT_ATTR24 in VARCHAR2,
569   X_C_EXT_ATTR25 in VARCHAR2,
570   X_C_EXT_ATTR26 in VARCHAR2,
571   X_C_EXT_ATTR27 in VARCHAR2,
572   X_C_EXT_ATTR28 in VARCHAR2,
573   X_C_EXT_ATTR29 in VARCHAR2,
574   X_C_EXT_ATTR30 in VARCHAR2,
575   X_C_EXT_ATTR31 in VARCHAR2,
576   X_C_EXT_ATTR32 in VARCHAR2,
577   X_C_EXT_ATTR33 in VARCHAR2,
578   X_C_EXT_ATTR34 in VARCHAR2,
579   X_C_EXT_ATTR35 in VARCHAR2,
580   X_C_EXT_ATTR36 in VARCHAR2,
581   X_C_EXT_ATTR37 in VARCHAR2,
582   X_C_EXT_ATTR38 in VARCHAR2,
583   X_C_EXT_ATTR39 in VARCHAR2,
584   X_C_EXT_ATTR40 in VARCHAR2,
585   X_C_EXT_ATTR41 in VARCHAR2,
586   X_C_EXT_ATTR42 in VARCHAR2,
587   X_C_EXT_ATTR43 in VARCHAR2,
588   X_C_EXT_ATTR44 in VARCHAR2,
589   X_C_EXT_ATTR45 in VARCHAR2,
590   X_C_EXT_ATTR46 in VARCHAR2,
591   X_C_EXT_ATTR47 in VARCHAR2,
592   X_C_EXT_ATTR48 in VARCHAR2,
593   X_C_EXT_ATTR49 in VARCHAR2,
594   X_C_EXT_ATTR50 in VARCHAR2,
595   X_N_EXT_ATTR1 in NUMBER,
596   X_N_EXT_ATTR2 in NUMBER,
597   X_N_EXT_ATTR3 in NUMBER,
598   X_N_EXT_ATTR4 in NUMBER,
599   X_N_EXT_ATTR5 in NUMBER,
600   X_N_EXT_ATTR6 in NUMBER,
601   X_N_EXT_ATTR7 in NUMBER,
602   X_N_EXT_ATTR8 in NUMBER,
603   X_N_EXT_ATTR9 in NUMBER,
604   X_N_EXT_ATTR10 in NUMBER,
605   X_N_EXT_ATTR11 in NUMBER,
606   X_N_EXT_ATTR12 in NUMBER,
607   X_N_EXT_ATTR13 in NUMBER,
608   X_N_EXT_ATTR14 in NUMBER,
609   X_N_EXT_ATTR15 in NUMBER,
610   X_N_EXT_ATTR16 in NUMBER,
611   X_N_EXT_ATTR17 in NUMBER,
612   X_N_EXT_ATTR18 in NUMBER,
613   X_N_EXT_ATTR19 in NUMBER,
614   X_N_EXT_ATTR20 in NUMBER,
615   X_N_EXT_ATTR21 in NUMBER,
616   X_N_EXT_ATTR22 in NUMBER,
617   X_N_EXT_ATTR23 in NUMBER,
618   X_N_EXT_ATTR24 in NUMBER,
619   X_N_EXT_ATTR25 in NUMBER,
620   X_D_EXT_ATTR1 in DATE,
621   X_D_EXT_ATTR2 in DATE,
622   X_D_EXT_ATTR3 in DATE,
623   X_D_EXT_ATTR4 in DATE,
624   X_D_EXT_ATTR5 in DATE,
625   X_D_EXT_ATTR6 in DATE,
626   X_D_EXT_ATTR7 in DATE,
627   X_D_EXT_ATTR8 in DATE,
628   X_D_EXT_ATTR9 in DATE,
629   X_INCIDENT_ID in NUMBER,
630   X_CONTEXT in VARCHAR2,
631   X_ATTR_GROUP_ID in NUMBER,
632   X_C_EXT_ATTR1 in VARCHAR2,
633   X_C_EXT_ATTR2 in VARCHAR2,
634   X_C_EXT_ATTR3 in VARCHAR2,
635   X_C_EXT_ATTR4 in VARCHAR2,
636   X_TL_EXT_ATTR1 in VARCHAR2,
637   X_TL_EXT_ATTR2 in VARCHAR2,
638   X_TL_EXT_ATTR3 in VARCHAR2,
639   X_TL_EXT_ATTR4 in VARCHAR2,
640   X_TL_EXT_ATTR5 in VARCHAR2,
641   X_TL_EXT_ATTR6 in VARCHAR2,
642   X_TL_EXT_ATTR7 in VARCHAR2,
643   X_TL_EXT_ATTR8 in VARCHAR2,
644   X_TL_EXT_ATTR9 in VARCHAR2,
645   X_TL_EXT_ATTR10 in VARCHAR2
646 ) is
647   cursor c is select
648       D_EXT_ATTR10,
649       D_EXT_ATTR11,
650       D_EXT_ATTR12,
651       D_EXT_ATTR13,
652       D_EXT_ATTR14,
653       D_EXT_ATTR15,
654       D_EXT_ATTR16,
655       D_EXT_ATTR17,
656       D_EXT_ATTR18,
657       D_EXT_ATTR19,
658       D_EXT_ATTR20,
659       D_EXT_ATTR21,
660       D_EXT_ATTR22,
661       D_EXT_ATTR23,
662       D_EXT_ATTR24,
663       D_EXT_ATTR25,
664       UOM_EXT_ATTR1,
665       UOM_EXT_ATTR2,
666       UOM_EXT_ATTR3,
667       UOM_EXT_ATTR4,
668       UOM_EXT_ATTR5,
669       UOM_EXT_ATTR6,
670       UOM_EXT_ATTR7,
671       UOM_EXT_ATTR8,
672       UOM_EXT_ATTR9,
673       UOM_EXT_ATTR10,
674       UOM_EXT_ATTR11,
675       UOM_EXT_ATTR12,
676       UOM_EXT_ATTR13,
677       UOM_EXT_ATTR14,
678       UOM_EXT_ATTR15,
679       UOM_EXT_ATTR16,
680       UOM_EXT_ATTR17,
681       UOM_EXT_ATTR18,
682       UOM_EXT_ATTR19,
683       UOM_EXT_ATTR20,
684       UOM_EXT_ATTR21,
685       UOM_EXT_ATTR22,
686       UOM_EXT_ATTR23,
687       UOM_EXT_ATTR24,
688       UOM_EXT_ATTR25,
692       C_EXT_ATTR5,
689       PARTY_ID,
690       CONTACT_TYPE,
691       PARTY_ROLE_CODE,
693       C_EXT_ATTR6,
694       C_EXT_ATTR7,
695       C_EXT_ATTR8,
696       C_EXT_ATTR9,
697       C_EXT_ATTR10,
698       C_EXT_ATTR11,
699       C_EXT_ATTR12,
700       C_EXT_ATTR13,
701       C_EXT_ATTR14,
702       C_EXT_ATTR15,
703       C_EXT_ATTR16,
704       C_EXT_ATTR17,
705       C_EXT_ATTR18,
706       C_EXT_ATTR19,
707       C_EXT_ATTR20,
708       C_EXT_ATTR21,
709       C_EXT_ATTR22,
710       C_EXT_ATTR23,
711       C_EXT_ATTR24,
712       C_EXT_ATTR25,
713       C_EXT_ATTR26,
714       C_EXT_ATTR27,
715       C_EXT_ATTR28,
716       C_EXT_ATTR29,
717       C_EXT_ATTR30,
718       C_EXT_ATTR31,
719       C_EXT_ATTR32,
720       C_EXT_ATTR33,
721       C_EXT_ATTR34,
722       C_EXT_ATTR35,
723       C_EXT_ATTR36,
724       C_EXT_ATTR37,
725       C_EXT_ATTR38,
726       C_EXT_ATTR39,
727       C_EXT_ATTR40,
728       C_EXT_ATTR41,
729       C_EXT_ATTR42,
730       C_EXT_ATTR43,
731       C_EXT_ATTR44,
732       C_EXT_ATTR45,
733       C_EXT_ATTR46,
734       C_EXT_ATTR47,
735       C_EXT_ATTR48,
736       C_EXT_ATTR49,
737       C_EXT_ATTR50,
738       N_EXT_ATTR1,
739       N_EXT_ATTR2,
740       N_EXT_ATTR3,
741       N_EXT_ATTR4,
742       N_EXT_ATTR5,
743       N_EXT_ATTR6,
744       N_EXT_ATTR7,
745       N_EXT_ATTR8,
746       N_EXT_ATTR9,
747       N_EXT_ATTR10,
748       N_EXT_ATTR11,
749       N_EXT_ATTR12,
750       N_EXT_ATTR13,
751       N_EXT_ATTR14,
752       N_EXT_ATTR15,
753       N_EXT_ATTR16,
754       N_EXT_ATTR17,
755       N_EXT_ATTR18,
756       N_EXT_ATTR19,
757       N_EXT_ATTR20,
758       N_EXT_ATTR21,
759       N_EXT_ATTR22,
760       N_EXT_ATTR23,
761       N_EXT_ATTR24,
762       N_EXT_ATTR25,
763       D_EXT_ATTR1,
764       D_EXT_ATTR2,
765       D_EXT_ATTR3,
766       D_EXT_ATTR4,
767       D_EXT_ATTR5,
768       D_EXT_ATTR6,
769       D_EXT_ATTR7,
770       D_EXT_ATTR8,
771       D_EXT_ATTR9,
772       INCIDENT_ID,
773       CONTEXT,
774       ATTR_GROUP_ID,
775       C_EXT_ATTR1,
776       C_EXT_ATTR2,
777       C_EXT_ATTR3,
778       C_EXT_ATTR4
779     from CS_SR_CONTACTS_EXT_B
780     where EXTENSION_ID = X_EXTENSION_ID
781     for update of EXTENSION_ID nowait;
782   recinfo c%rowtype;
783 
784   cursor c1 is select
785       TL_EXT_ATTR1,
786       TL_EXT_ATTR2,
787       TL_EXT_ATTR3,
788       TL_EXT_ATTR4,
789       TL_EXT_ATTR5,
790       TL_EXT_ATTR6,
791       TL_EXT_ATTR7,
792       TL_EXT_ATTR8,
793       TL_EXT_ATTR9,
794       TL_EXT_ATTR10,
795       decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
796     from CS_SR_CONTACTS_EXT_TL
797     where EXTENSION_ID = X_EXTENSION_ID
798     and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
799     for update of EXTENSION_ID nowait;
800 begin
801   open c;
802   fetch c into recinfo;
803   if (c%notfound) then
804     close c;
805     fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
806     app_exception.raise_exception;
807   end if;
808   close c;
809   if (    ((recinfo.D_EXT_ATTR10 = X_D_EXT_ATTR10)
810            OR ((recinfo.D_EXT_ATTR10 is null) AND (X_D_EXT_ATTR10 is null)))
811       AND ((recinfo.D_EXT_ATTR11 = X_D_EXT_ATTR11)
812            OR ((recinfo.D_EXT_ATTR11 is null) AND (X_D_EXT_ATTR11 is null)))
813       AND ((recinfo.D_EXT_ATTR12 = X_D_EXT_ATTR12)
814            OR ((recinfo.D_EXT_ATTR12 is null) AND (X_D_EXT_ATTR12 is null)))
815       AND ((recinfo.D_EXT_ATTR13 = X_D_EXT_ATTR13)
816            OR ((recinfo.D_EXT_ATTR13 is null) AND (X_D_EXT_ATTR13 is null)))
817       AND ((recinfo.D_EXT_ATTR14 = X_D_EXT_ATTR14)
818            OR ((recinfo.D_EXT_ATTR14 is null) AND (X_D_EXT_ATTR14 is null)))
819       AND ((recinfo.D_EXT_ATTR15 = X_D_EXT_ATTR15)
820            OR ((recinfo.D_EXT_ATTR15 is null) AND (X_D_EXT_ATTR15 is null)))
821       AND ((recinfo.D_EXT_ATTR16 = X_D_EXT_ATTR16)
822            OR ((recinfo.D_EXT_ATTR16 is null) AND (X_D_EXT_ATTR16 is null)))
823       AND ((recinfo.D_EXT_ATTR17 = X_D_EXT_ATTR17)
824            OR ((recinfo.D_EXT_ATTR17 is null) AND (X_D_EXT_ATTR17 is null)))
825       AND ((recinfo.D_EXT_ATTR18 = X_D_EXT_ATTR18)
826            OR ((recinfo.D_EXT_ATTR18 is null) AND (X_D_EXT_ATTR18 is null)))
827       AND ((recinfo.D_EXT_ATTR19 = X_D_EXT_ATTR19)
828            OR ((recinfo.D_EXT_ATTR19 is null) AND (X_D_EXT_ATTR19 is null)))
829       AND ((recinfo.D_EXT_ATTR20 = X_D_EXT_ATTR20)
830            OR ((recinfo.D_EXT_ATTR20 is null) AND (X_D_EXT_ATTR20 is null)))
831       AND ((recinfo.D_EXT_ATTR21 = X_D_EXT_ATTR21)
832            OR ((recinfo.D_EXT_ATTR21 is null) AND (X_D_EXT_ATTR21 is null)))
833       AND ((recinfo.D_EXT_ATTR22 = X_D_EXT_ATTR22)
834            OR ((recinfo.D_EXT_ATTR22 is null) AND (X_D_EXT_ATTR22 is null)))
835       AND ((recinfo.D_EXT_ATTR23 = X_D_EXT_ATTR23)
836            OR ((recinfo.D_EXT_ATTR23 is null) AND (X_D_EXT_ATTR23 is null)))
837       AND ((recinfo.D_EXT_ATTR24 = X_D_EXT_ATTR24)
838            OR ((recinfo.D_EXT_ATTR24 is null) AND (X_D_EXT_ATTR24 is null)))
839       AND ((recinfo.D_EXT_ATTR25 = X_D_EXT_ATTR25)
840            OR ((recinfo.D_EXT_ATTR25 is null) AND (X_D_EXT_ATTR25 is null)))
841       AND ((recinfo.UOM_EXT_ATTR1 = X_UOM_EXT_ATTR1)
842            OR ((recinfo.UOM_EXT_ATTR1 is null) AND (X_UOM_EXT_ATTR1 is null)))
843       AND ((recinfo.UOM_EXT_ATTR2 = X_UOM_EXT_ATTR2)
844            OR ((recinfo.UOM_EXT_ATTR2 is null) AND (X_UOM_EXT_ATTR2 is null)))
845       AND ((recinfo.UOM_EXT_ATTR3 = X_UOM_EXT_ATTR3)
849       AND ((recinfo.UOM_EXT_ATTR5 = X_UOM_EXT_ATTR5)
846            OR ((recinfo.UOM_EXT_ATTR3 is null) AND (X_UOM_EXT_ATTR3 is null)))
847       AND ((recinfo.UOM_EXT_ATTR4 = X_UOM_EXT_ATTR4)
848            OR ((recinfo.UOM_EXT_ATTR4 is null) AND (X_UOM_EXT_ATTR4 is null)))
850            OR ((recinfo.UOM_EXT_ATTR5 is null) AND (X_UOM_EXT_ATTR5 is null)))
851       AND ((recinfo.UOM_EXT_ATTR6 = X_UOM_EXT_ATTR6)
852            OR ((recinfo.UOM_EXT_ATTR6 is null) AND (X_UOM_EXT_ATTR6 is null)))
853       AND ((recinfo.UOM_EXT_ATTR7 = X_UOM_EXT_ATTR7)
854            OR ((recinfo.UOM_EXT_ATTR7 is null) AND (X_UOM_EXT_ATTR7 is null)))
855       AND ((recinfo.UOM_EXT_ATTR8 = X_UOM_EXT_ATTR8)
856            OR ((recinfo.UOM_EXT_ATTR8 is null) AND (X_UOM_EXT_ATTR8 is null)))
857       AND ((recinfo.UOM_EXT_ATTR9 = X_UOM_EXT_ATTR9)
858            OR ((recinfo.UOM_EXT_ATTR9 is null) AND (X_UOM_EXT_ATTR9 is null)))
859       AND ((recinfo.UOM_EXT_ATTR10 = X_UOM_EXT_ATTR10)
860            OR ((recinfo.UOM_EXT_ATTR10 is null) AND (X_UOM_EXT_ATTR10 is null)))
861       AND ((recinfo.UOM_EXT_ATTR11 = X_UOM_EXT_ATTR11)
862            OR ((recinfo.UOM_EXT_ATTR11 is null) AND (X_UOM_EXT_ATTR11 is null)))
863       AND ((recinfo.UOM_EXT_ATTR12 = X_UOM_EXT_ATTR12)
864            OR ((recinfo.UOM_EXT_ATTR12 is null) AND (X_UOM_EXT_ATTR12 is null)))
865       AND ((recinfo.UOM_EXT_ATTR13 = X_UOM_EXT_ATTR13)
866            OR ((recinfo.UOM_EXT_ATTR13 is null) AND (X_UOM_EXT_ATTR13 is null)))
867       AND ((recinfo.UOM_EXT_ATTR14 = X_UOM_EXT_ATTR14)
868            OR ((recinfo.UOM_EXT_ATTR14 is null) AND (X_UOM_EXT_ATTR14 is null)))
869       AND ((recinfo.UOM_EXT_ATTR15 = X_UOM_EXT_ATTR15)
870            OR ((recinfo.UOM_EXT_ATTR15 is null) AND (X_UOM_EXT_ATTR15 is null)))
871       AND ((recinfo.UOM_EXT_ATTR16 = X_UOM_EXT_ATTR16)
872            OR ((recinfo.UOM_EXT_ATTR16 is null) AND (X_UOM_EXT_ATTR16 is null)))
873       AND ((recinfo.UOM_EXT_ATTR17 = X_UOM_EXT_ATTR17)
874            OR ((recinfo.UOM_EXT_ATTR17 is null) AND (X_UOM_EXT_ATTR17 is null)))
875       AND ((recinfo.UOM_EXT_ATTR18 = X_UOM_EXT_ATTR18)
876            OR ((recinfo.UOM_EXT_ATTR18 is null) AND (X_UOM_EXT_ATTR18 is null)))
877       AND ((recinfo.UOM_EXT_ATTR19 = X_UOM_EXT_ATTR19)
878            OR ((recinfo.UOM_EXT_ATTR19 is null) AND (X_UOM_EXT_ATTR19 is null)))
879       AND ((recinfo.UOM_EXT_ATTR20 = X_UOM_EXT_ATTR20)
880            OR ((recinfo.UOM_EXT_ATTR20 is null) AND (X_UOM_EXT_ATTR20 is null)))
881       AND ((recinfo.UOM_EXT_ATTR21 = X_UOM_EXT_ATTR21)
882            OR ((recinfo.UOM_EXT_ATTR21 is null) AND (X_UOM_EXT_ATTR21 is null)))
883       AND ((recinfo.UOM_EXT_ATTR22 = X_UOM_EXT_ATTR22)
884            OR ((recinfo.UOM_EXT_ATTR22 is null) AND (X_UOM_EXT_ATTR22 is null)))
885       AND ((recinfo.UOM_EXT_ATTR23 = X_UOM_EXT_ATTR23)
886            OR ((recinfo.UOM_EXT_ATTR23 is null) AND (X_UOM_EXT_ATTR23 is null)))
887       AND ((recinfo.UOM_EXT_ATTR24 = X_UOM_EXT_ATTR24)
888            OR ((recinfo.UOM_EXT_ATTR24 is null) AND (X_UOM_EXT_ATTR24 is null)))
889       AND ((recinfo.UOM_EXT_ATTR25 = X_UOM_EXT_ATTR25)
890            OR ((recinfo.UOM_EXT_ATTR25 is null) AND (X_UOM_EXT_ATTR25 is null)))
891       AND (recinfo.PARTY_ID = X_PARTY_ID)
892       AND (recinfo.CONTACT_TYPE = X_CONTACT_TYPE)
893       AND (recinfo.PARTY_ROLE_CODE = X_PARTY_ROLE_CODE)
894       AND ((recinfo.C_EXT_ATTR5 = X_C_EXT_ATTR5)
895            OR ((recinfo.C_EXT_ATTR5 is null) AND (X_C_EXT_ATTR5 is null)))
896       AND ((recinfo.C_EXT_ATTR6 = X_C_EXT_ATTR6)
897            OR ((recinfo.C_EXT_ATTR6 is null) AND (X_C_EXT_ATTR6 is null)))
898       AND ((recinfo.C_EXT_ATTR7 = X_C_EXT_ATTR7)
899            OR ((recinfo.C_EXT_ATTR7 is null) AND (X_C_EXT_ATTR7 is null)))
900       AND ((recinfo.C_EXT_ATTR8 = X_C_EXT_ATTR8)
901            OR ((recinfo.C_EXT_ATTR8 is null) AND (X_C_EXT_ATTR8 is null)))
902       AND ((recinfo.C_EXT_ATTR9 = X_C_EXT_ATTR9)
903            OR ((recinfo.C_EXT_ATTR9 is null) AND (X_C_EXT_ATTR9 is null)))
904       AND ((recinfo.C_EXT_ATTR10 = X_C_EXT_ATTR10)
905            OR ((recinfo.C_EXT_ATTR10 is null) AND (X_C_EXT_ATTR10 is null)))
906       AND ((recinfo.C_EXT_ATTR11 = X_C_EXT_ATTR11)
907            OR ((recinfo.C_EXT_ATTR11 is null) AND (X_C_EXT_ATTR11 is null)))
908       AND ((recinfo.C_EXT_ATTR12 = X_C_EXT_ATTR12)
909            OR ((recinfo.C_EXT_ATTR12 is null) AND (X_C_EXT_ATTR12 is null)))
910       AND ((recinfo.C_EXT_ATTR13 = X_C_EXT_ATTR13)
911            OR ((recinfo.C_EXT_ATTR13 is null) AND (X_C_EXT_ATTR13 is null)))
912       AND ((recinfo.C_EXT_ATTR14 = X_C_EXT_ATTR14)
913            OR ((recinfo.C_EXT_ATTR14 is null) AND (X_C_EXT_ATTR14 is null)))
914       AND ((recinfo.C_EXT_ATTR15 = X_C_EXT_ATTR15)
915            OR ((recinfo.C_EXT_ATTR15 is null) AND (X_C_EXT_ATTR15 is null)))
916       AND ((recinfo.C_EXT_ATTR16 = X_C_EXT_ATTR16)
917            OR ((recinfo.C_EXT_ATTR16 is null) AND (X_C_EXT_ATTR16 is null)))
918       AND ((recinfo.C_EXT_ATTR17 = X_C_EXT_ATTR17)
919            OR ((recinfo.C_EXT_ATTR17 is null) AND (X_C_EXT_ATTR17 is null)))
920       AND ((recinfo.C_EXT_ATTR18 = X_C_EXT_ATTR18)
921            OR ((recinfo.C_EXT_ATTR18 is null) AND (X_C_EXT_ATTR18 is null)))
922       AND ((recinfo.C_EXT_ATTR19 = X_C_EXT_ATTR19)
923            OR ((recinfo.C_EXT_ATTR19 is null) AND (X_C_EXT_ATTR19 is null)))
924       AND ((recinfo.C_EXT_ATTR20 = X_C_EXT_ATTR20)
925            OR ((recinfo.C_EXT_ATTR20 is null) AND (X_C_EXT_ATTR20 is null)))
926       AND ((recinfo.C_EXT_ATTR21 = X_C_EXT_ATTR21)
927            OR ((recinfo.C_EXT_ATTR21 is null) AND (X_C_EXT_ATTR21 is null)))
928       AND ((recinfo.C_EXT_ATTR22 = X_C_EXT_ATTR22)
929            OR ((recinfo.C_EXT_ATTR22 is null) AND (X_C_EXT_ATTR22 is null)))
930       AND ((recinfo.C_EXT_ATTR23 = X_C_EXT_ATTR23)
931            OR ((recinfo.C_EXT_ATTR23 is null) AND (X_C_EXT_ATTR23 is null)))
932       AND ((recinfo.C_EXT_ATTR24 = X_C_EXT_ATTR24)
933            OR ((recinfo.C_EXT_ATTR24 is null) AND (X_C_EXT_ATTR24 is null)))
934       AND ((recinfo.C_EXT_ATTR25 = X_C_EXT_ATTR25)
935            OR ((recinfo.C_EXT_ATTR25 is null) AND (X_C_EXT_ATTR25 is null)))
936       AND ((recinfo.C_EXT_ATTR26 = X_C_EXT_ATTR26)
940       AND ((recinfo.C_EXT_ATTR28 = X_C_EXT_ATTR28)
937            OR ((recinfo.C_EXT_ATTR26 is null) AND (X_C_EXT_ATTR26 is null)))
938       AND ((recinfo.C_EXT_ATTR27 = X_C_EXT_ATTR27)
939            OR ((recinfo.C_EXT_ATTR27 is null) AND (X_C_EXT_ATTR27 is null)))
941            OR ((recinfo.C_EXT_ATTR28 is null) AND (X_C_EXT_ATTR28 is null)))
942       AND ((recinfo.C_EXT_ATTR29 = X_C_EXT_ATTR29)
943            OR ((recinfo.C_EXT_ATTR29 is null) AND (X_C_EXT_ATTR29 is null)))
944       AND ((recinfo.C_EXT_ATTR30 = X_C_EXT_ATTR30)
945            OR ((recinfo.C_EXT_ATTR30 is null) AND (X_C_EXT_ATTR30 is null)))
946       AND ((recinfo.C_EXT_ATTR31 = X_C_EXT_ATTR31)
947            OR ((recinfo.C_EXT_ATTR31 is null) AND (X_C_EXT_ATTR31 is null)))
948       AND ((recinfo.C_EXT_ATTR32 = X_C_EXT_ATTR32)
949            OR ((recinfo.C_EXT_ATTR32 is null) AND (X_C_EXT_ATTR32 is null)))
950       AND ((recinfo.C_EXT_ATTR33 = X_C_EXT_ATTR33)
951            OR ((recinfo.C_EXT_ATTR33 is null) AND (X_C_EXT_ATTR33 is null)))
952       AND ((recinfo.C_EXT_ATTR34 = X_C_EXT_ATTR34)
953            OR ((recinfo.C_EXT_ATTR34 is null) AND (X_C_EXT_ATTR34 is null)))
954       AND ((recinfo.C_EXT_ATTR35 = X_C_EXT_ATTR35)
955            OR ((recinfo.C_EXT_ATTR35 is null) AND (X_C_EXT_ATTR35 is null)))
956       AND ((recinfo.C_EXT_ATTR36 = X_C_EXT_ATTR36)
957            OR ((recinfo.C_EXT_ATTR36 is null) AND (X_C_EXT_ATTR36 is null)))
958       AND ((recinfo.C_EXT_ATTR37 = X_C_EXT_ATTR37)
959            OR ((recinfo.C_EXT_ATTR37 is null) AND (X_C_EXT_ATTR37 is null)))
960       AND ((recinfo.C_EXT_ATTR38 = X_C_EXT_ATTR38)
961            OR ((recinfo.C_EXT_ATTR38 is null) AND (X_C_EXT_ATTR38 is null)))
962       AND ((recinfo.C_EXT_ATTR39 = X_C_EXT_ATTR39)
963            OR ((recinfo.C_EXT_ATTR39 is null) AND (X_C_EXT_ATTR39 is null)))
964       AND ((recinfo.C_EXT_ATTR40 = X_C_EXT_ATTR40)
965            OR ((recinfo.C_EXT_ATTR40 is null) AND (X_C_EXT_ATTR40 is null)))
966       AND ((recinfo.C_EXT_ATTR41 = X_C_EXT_ATTR41)
967            OR ((recinfo.C_EXT_ATTR41 is null) AND (X_C_EXT_ATTR41 is null)))
968       AND ((recinfo.C_EXT_ATTR42 = X_C_EXT_ATTR42)
969            OR ((recinfo.C_EXT_ATTR42 is null) AND (X_C_EXT_ATTR42 is null)))
970       AND ((recinfo.C_EXT_ATTR43 = X_C_EXT_ATTR43)
971            OR ((recinfo.C_EXT_ATTR43 is null) AND (X_C_EXT_ATTR43 is null)))
972       AND ((recinfo.C_EXT_ATTR44 = X_C_EXT_ATTR44)
973            OR ((recinfo.C_EXT_ATTR44 is null) AND (X_C_EXT_ATTR44 is null)))
974       AND ((recinfo.C_EXT_ATTR45 = X_C_EXT_ATTR45)
975            OR ((recinfo.C_EXT_ATTR45 is null) AND (X_C_EXT_ATTR45 is null)))
976       AND ((recinfo.C_EXT_ATTR46 = X_C_EXT_ATTR46)
977            OR ((recinfo.C_EXT_ATTR46 is null) AND (X_C_EXT_ATTR46 is null)))
978       AND ((recinfo.C_EXT_ATTR47 = X_C_EXT_ATTR47)
979            OR ((recinfo.C_EXT_ATTR47 is null) AND (X_C_EXT_ATTR47 is null)))
980       AND ((recinfo.C_EXT_ATTR48 = X_C_EXT_ATTR48)
981            OR ((recinfo.C_EXT_ATTR48 is null) AND (X_C_EXT_ATTR48 is null)))
982       AND ((recinfo.C_EXT_ATTR49 = X_C_EXT_ATTR49)
983            OR ((recinfo.C_EXT_ATTR49 is null) AND (X_C_EXT_ATTR49 is null)))
984       AND ((recinfo.C_EXT_ATTR50 = X_C_EXT_ATTR50)
985            OR ((recinfo.C_EXT_ATTR50 is null) AND (X_C_EXT_ATTR50 is null)))
986       AND ((recinfo.N_EXT_ATTR1 = X_N_EXT_ATTR1)
987            OR ((recinfo.N_EXT_ATTR1 is null) AND (X_N_EXT_ATTR1 is null)))
988       AND ((recinfo.N_EXT_ATTR2 = X_N_EXT_ATTR2)
989            OR ((recinfo.N_EXT_ATTR2 is null) AND (X_N_EXT_ATTR2 is null)))
990       AND ((recinfo.N_EXT_ATTR3 = X_N_EXT_ATTR3)
991            OR ((recinfo.N_EXT_ATTR3 is null) AND (X_N_EXT_ATTR3 is null)))
992       AND ((recinfo.N_EXT_ATTR4 = X_N_EXT_ATTR4)
993            OR ((recinfo.N_EXT_ATTR4 is null) AND (X_N_EXT_ATTR4 is null)))
994       AND ((recinfo.N_EXT_ATTR5 = X_N_EXT_ATTR5)
995            OR ((recinfo.N_EXT_ATTR5 is null) AND (X_N_EXT_ATTR5 is null)))
996       AND ((recinfo.N_EXT_ATTR6 = X_N_EXT_ATTR6)
997            OR ((recinfo.N_EXT_ATTR6 is null) AND (X_N_EXT_ATTR6 is null)))
998       AND ((recinfo.N_EXT_ATTR7 = X_N_EXT_ATTR7)
999            OR ((recinfo.N_EXT_ATTR7 is null) AND (X_N_EXT_ATTR7 is null)))
1000       AND ((recinfo.N_EXT_ATTR8 = X_N_EXT_ATTR8)
1001            OR ((recinfo.N_EXT_ATTR8 is null) AND (X_N_EXT_ATTR8 is null)))
1002       AND ((recinfo.N_EXT_ATTR9 = X_N_EXT_ATTR9)
1003            OR ((recinfo.N_EXT_ATTR9 is null) AND (X_N_EXT_ATTR9 is null)))
1004       AND ((recinfo.N_EXT_ATTR10 = X_N_EXT_ATTR10)
1005            OR ((recinfo.N_EXT_ATTR10 is null) AND (X_N_EXT_ATTR10 is null)))
1006       AND ((recinfo.N_EXT_ATTR11 = X_N_EXT_ATTR11)
1007            OR ((recinfo.N_EXT_ATTR11 is null) AND (X_N_EXT_ATTR11 is null)))
1008       AND ((recinfo.N_EXT_ATTR12 = X_N_EXT_ATTR12)
1009            OR ((recinfo.N_EXT_ATTR12 is null) AND (X_N_EXT_ATTR12 is null)))
1010       AND ((recinfo.N_EXT_ATTR13 = X_N_EXT_ATTR13)
1011            OR ((recinfo.N_EXT_ATTR13 is null) AND (X_N_EXT_ATTR13 is null)))
1012       AND ((recinfo.N_EXT_ATTR14 = X_N_EXT_ATTR14)
1013            OR ((recinfo.N_EXT_ATTR14 is null) AND (X_N_EXT_ATTR14 is null)))
1014       AND ((recinfo.N_EXT_ATTR15 = X_N_EXT_ATTR15)
1015            OR ((recinfo.N_EXT_ATTR15 is null) AND (X_N_EXT_ATTR15 is null)))
1016       AND ((recinfo.N_EXT_ATTR16 = X_N_EXT_ATTR16)
1017            OR ((recinfo.N_EXT_ATTR16 is null) AND (X_N_EXT_ATTR16 is null)))
1018       AND ((recinfo.N_EXT_ATTR17 = X_N_EXT_ATTR17)
1019            OR ((recinfo.N_EXT_ATTR17 is null) AND (X_N_EXT_ATTR17 is null)))
1020       AND ((recinfo.N_EXT_ATTR18 = X_N_EXT_ATTR18)
1021            OR ((recinfo.N_EXT_ATTR18 is null) AND (X_N_EXT_ATTR18 is null)))
1022       AND ((recinfo.N_EXT_ATTR19 = X_N_EXT_ATTR19)
1023            OR ((recinfo.N_EXT_ATTR19 is null) AND (X_N_EXT_ATTR19 is null)))
1024       AND ((recinfo.N_EXT_ATTR20 = X_N_EXT_ATTR20)
1025            OR ((recinfo.N_EXT_ATTR20 is null) AND (X_N_EXT_ATTR20 is null)))
1026       AND ((recinfo.N_EXT_ATTR21 = X_N_EXT_ATTR21)
1027            OR ((recinfo.N_EXT_ATTR21 is null) AND (X_N_EXT_ATTR21 is null)))
1028       AND ((recinfo.N_EXT_ATTR22 = X_N_EXT_ATTR22)
1032       AND ((recinfo.N_EXT_ATTR24 = X_N_EXT_ATTR24)
1029            OR ((recinfo.N_EXT_ATTR22 is null) AND (X_N_EXT_ATTR22 is null)))
1030       AND ((recinfo.N_EXT_ATTR23 = X_N_EXT_ATTR23)
1031            OR ((recinfo.N_EXT_ATTR23 is null) AND (X_N_EXT_ATTR23 is null)))
1033            OR ((recinfo.N_EXT_ATTR24 is null) AND (X_N_EXT_ATTR24 is null)))
1034       AND ((recinfo.N_EXT_ATTR25 = X_N_EXT_ATTR25)
1035            OR ((recinfo.N_EXT_ATTR25 is null) AND (X_N_EXT_ATTR25 is null)))
1036       AND ((recinfo.D_EXT_ATTR1 = X_D_EXT_ATTR1)
1037            OR ((recinfo.D_EXT_ATTR1 is null) AND (X_D_EXT_ATTR1 is null)))
1038       AND ((recinfo.D_EXT_ATTR2 = X_D_EXT_ATTR2)
1039            OR ((recinfo.D_EXT_ATTR2 is null) AND (X_D_EXT_ATTR2 is null)))
1040       AND ((recinfo.D_EXT_ATTR3 = X_D_EXT_ATTR3)
1041            OR ((recinfo.D_EXT_ATTR3 is null) AND (X_D_EXT_ATTR3 is null)))
1042       AND ((recinfo.D_EXT_ATTR4 = X_D_EXT_ATTR4)
1043            OR ((recinfo.D_EXT_ATTR4 is null) AND (X_D_EXT_ATTR4 is null)))
1044       AND ((recinfo.D_EXT_ATTR5 = X_D_EXT_ATTR5)
1045            OR ((recinfo.D_EXT_ATTR5 is null) AND (X_D_EXT_ATTR5 is null)))
1046       AND ((recinfo.D_EXT_ATTR6 = X_D_EXT_ATTR6)
1047            OR ((recinfo.D_EXT_ATTR6 is null) AND (X_D_EXT_ATTR6 is null)))
1048       AND ((recinfo.D_EXT_ATTR7 = X_D_EXT_ATTR7)
1049            OR ((recinfo.D_EXT_ATTR7 is null) AND (X_D_EXT_ATTR7 is null)))
1050       AND ((recinfo.D_EXT_ATTR8 = X_D_EXT_ATTR8)
1051            OR ((recinfo.D_EXT_ATTR8 is null) AND (X_D_EXT_ATTR8 is null)))
1052       AND ((recinfo.D_EXT_ATTR9 = X_D_EXT_ATTR9)
1053            OR ((recinfo.D_EXT_ATTR9 is null) AND (X_D_EXT_ATTR9 is null)))
1054       AND (recinfo.INCIDENT_ID = X_INCIDENT_ID)
1055       AND (recinfo.CONTEXT = X_CONTEXT)
1056       AND (recinfo.ATTR_GROUP_ID = X_ATTR_GROUP_ID)
1057       AND ((recinfo.C_EXT_ATTR1 = X_C_EXT_ATTR1)
1058            OR ((recinfo.C_EXT_ATTR1 is null) AND (X_C_EXT_ATTR1 is null)))
1059       AND ((recinfo.C_EXT_ATTR2 = X_C_EXT_ATTR2)
1060            OR ((recinfo.C_EXT_ATTR2 is null) AND (X_C_EXT_ATTR2 is null)))
1061       AND ((recinfo.C_EXT_ATTR3 = X_C_EXT_ATTR3)
1062            OR ((recinfo.C_EXT_ATTR3 is null) AND (X_C_EXT_ATTR3 is null)))
1063       AND ((recinfo.C_EXT_ATTR4 = X_C_EXT_ATTR4)
1064            OR ((recinfo.C_EXT_ATTR4 is null) AND (X_C_EXT_ATTR4 is null)))
1065   ) then
1066     null;
1067   else
1068     fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
1069     app_exception.raise_exception;
1070   end if;
1071 
1072   for tlinfo in c1 loop
1073     if (tlinfo.BASELANG = 'Y') then
1074       if (    ((tlinfo.TL_EXT_ATTR1 = X_TL_EXT_ATTR1)
1075                OR ((tlinfo.TL_EXT_ATTR1 is null) AND (X_TL_EXT_ATTR1 is null)))
1076           AND ((tlinfo.TL_EXT_ATTR2 = X_TL_EXT_ATTR2)
1077                OR ((tlinfo.TL_EXT_ATTR2 is null) AND (X_TL_EXT_ATTR2 is null)))
1078           AND ((tlinfo.TL_EXT_ATTR3 = X_TL_EXT_ATTR3)
1079                OR ((tlinfo.TL_EXT_ATTR3 is null) AND (X_TL_EXT_ATTR3 is null)))
1080           AND ((tlinfo.TL_EXT_ATTR4 = X_TL_EXT_ATTR4)
1081                OR ((tlinfo.TL_EXT_ATTR4 is null) AND (X_TL_EXT_ATTR4 is null)))
1082           AND ((tlinfo.TL_EXT_ATTR5 = X_TL_EXT_ATTR5)
1083                OR ((tlinfo.TL_EXT_ATTR5 is null) AND (X_TL_EXT_ATTR5 is null)))
1084           AND ((tlinfo.TL_EXT_ATTR6 = X_TL_EXT_ATTR6)
1085                OR ((tlinfo.TL_EXT_ATTR6 is null) AND (X_TL_EXT_ATTR6 is null)))
1086           AND ((tlinfo.TL_EXT_ATTR7 = X_TL_EXT_ATTR7)
1087                OR ((tlinfo.TL_EXT_ATTR7 is null) AND (X_TL_EXT_ATTR7 is null)))
1088           AND ((tlinfo.TL_EXT_ATTR8 = X_TL_EXT_ATTR8)
1089                OR ((tlinfo.TL_EXT_ATTR8 is null) AND (X_TL_EXT_ATTR8 is null)))
1090           AND ((tlinfo.TL_EXT_ATTR9 = X_TL_EXT_ATTR9)
1091                OR ((tlinfo.TL_EXT_ATTR9 is null) AND (X_TL_EXT_ATTR9 is null)))
1092           AND ((tlinfo.TL_EXT_ATTR10 = X_TL_EXT_ATTR10)
1093                OR ((tlinfo.TL_EXT_ATTR10 is null) AND (X_TL_EXT_ATTR10 is null)))
1094       ) then
1095         null;
1096       else
1097         fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
1098         app_exception.raise_exception;
1099       end if;
1100     end if;
1101   end loop;
1102   return;
1103 end LOCK_ROW;
1104 
1105 procedure UPDATE_ROW (
1106   X_EXTENSION_ID in NUMBER,
1107   X_D_EXT_ATTR10 in DATE,
1108   X_D_EXT_ATTR11 in DATE,
1109   X_D_EXT_ATTR12 in DATE,
1110   X_D_EXT_ATTR13 in DATE,
1111   X_D_EXT_ATTR14 in DATE,
1112   X_D_EXT_ATTR15 in DATE,
1113   X_D_EXT_ATTR16 in DATE,
1114   X_D_EXT_ATTR17 in DATE,
1115   X_D_EXT_ATTR18 in DATE,
1116   X_D_EXT_ATTR19 in DATE,
1117   X_D_EXT_ATTR20 in DATE,
1118   X_D_EXT_ATTR21 in DATE,
1119   X_D_EXT_ATTR22 in DATE,
1120   X_D_EXT_ATTR23 in DATE,
1121   X_D_EXT_ATTR24 in DATE,
1122   X_D_EXT_ATTR25 in DATE,
1123   X_UOM_EXT_ATTR1 in VARCHAR2,
1124   X_UOM_EXT_ATTR2 in VARCHAR2,
1125   X_UOM_EXT_ATTR3 in VARCHAR2,
1126   X_UOM_EXT_ATTR4 in VARCHAR2,
1127   X_UOM_EXT_ATTR5 in VARCHAR2,
1128   X_UOM_EXT_ATTR6 in VARCHAR2,
1129   X_UOM_EXT_ATTR7 in VARCHAR2,
1130   X_UOM_EXT_ATTR8 in VARCHAR2,
1131   X_UOM_EXT_ATTR9 in VARCHAR2,
1132   X_UOM_EXT_ATTR10 in VARCHAR2,
1133   X_UOM_EXT_ATTR11 in VARCHAR2,
1134   X_UOM_EXT_ATTR12 in VARCHAR2,
1135   X_UOM_EXT_ATTR13 in VARCHAR2,
1136   X_UOM_EXT_ATTR14 in VARCHAR2,
1137   X_UOM_EXT_ATTR15 in VARCHAR2,
1138   X_UOM_EXT_ATTR16 in VARCHAR2,
1139   X_UOM_EXT_ATTR17 in VARCHAR2,
1140   X_UOM_EXT_ATTR18 in VARCHAR2,
1141   X_UOM_EXT_ATTR19 in VARCHAR2,
1142   X_UOM_EXT_ATTR20 in VARCHAR2,
1143   X_UOM_EXT_ATTR21 in VARCHAR2,
1144   X_UOM_EXT_ATTR22 in VARCHAR2,
1145   X_UOM_EXT_ATTR23 in VARCHAR2,
1146   X_UOM_EXT_ATTR24 in VARCHAR2,
1147   X_UOM_EXT_ATTR25 in VARCHAR2,
1148   X_PARTY_ID in NUMBER,
1149   X_CONTACT_TYPE in VARCHAR2,
1150   X_PARTY_ROLE_CODE in VARCHAR2,
1151   X_C_EXT_ATTR5 in VARCHAR2,
1152   X_C_EXT_ATTR6 in VARCHAR2,
1153   X_C_EXT_ATTR7 in VARCHAR2,
1157   X_C_EXT_ATTR11 in VARCHAR2,
1154   X_C_EXT_ATTR8 in VARCHAR2,
1155   X_C_EXT_ATTR9 in VARCHAR2,
1156   X_C_EXT_ATTR10 in VARCHAR2,
1158   X_C_EXT_ATTR12 in VARCHAR2,
1159   X_C_EXT_ATTR13 in VARCHAR2,
1160   X_C_EXT_ATTR14 in VARCHAR2,
1161   X_C_EXT_ATTR15 in VARCHAR2,
1162   X_C_EXT_ATTR16 in VARCHAR2,
1163   X_C_EXT_ATTR17 in VARCHAR2,
1164   X_C_EXT_ATTR18 in VARCHAR2,
1165   X_C_EXT_ATTR19 in VARCHAR2,
1166   X_C_EXT_ATTR20 in VARCHAR2,
1167   X_C_EXT_ATTR21 in VARCHAR2,
1168   X_C_EXT_ATTR22 in VARCHAR2,
1169   X_C_EXT_ATTR23 in VARCHAR2,
1170   X_C_EXT_ATTR24 in VARCHAR2,
1171   X_C_EXT_ATTR25 in VARCHAR2,
1172   X_C_EXT_ATTR26 in VARCHAR2,
1173   X_C_EXT_ATTR27 in VARCHAR2,
1174   X_C_EXT_ATTR28 in VARCHAR2,
1175   X_C_EXT_ATTR29 in VARCHAR2,
1176   X_C_EXT_ATTR30 in VARCHAR2,
1177   X_C_EXT_ATTR31 in VARCHAR2,
1178   X_C_EXT_ATTR32 in VARCHAR2,
1179   X_C_EXT_ATTR33 in VARCHAR2,
1180   X_C_EXT_ATTR34 in VARCHAR2,
1181   X_C_EXT_ATTR35 in VARCHAR2,
1182   X_C_EXT_ATTR36 in VARCHAR2,
1183   X_C_EXT_ATTR37 in VARCHAR2,
1184   X_C_EXT_ATTR38 in VARCHAR2,
1185   X_C_EXT_ATTR39 in VARCHAR2,
1186   X_C_EXT_ATTR40 in VARCHAR2,
1187   X_C_EXT_ATTR41 in VARCHAR2,
1188   X_C_EXT_ATTR42 in VARCHAR2,
1189   X_C_EXT_ATTR43 in VARCHAR2,
1190   X_C_EXT_ATTR44 in VARCHAR2,
1191   X_C_EXT_ATTR45 in VARCHAR2,
1192   X_C_EXT_ATTR46 in VARCHAR2,
1193   X_C_EXT_ATTR47 in VARCHAR2,
1194   X_C_EXT_ATTR48 in VARCHAR2,
1195   X_C_EXT_ATTR49 in VARCHAR2,
1196   X_C_EXT_ATTR50 in VARCHAR2,
1197   X_N_EXT_ATTR1 in NUMBER,
1198   X_N_EXT_ATTR2 in NUMBER,
1199   X_N_EXT_ATTR3 in NUMBER,
1200   X_N_EXT_ATTR4 in NUMBER,
1201   X_N_EXT_ATTR5 in NUMBER,
1202   X_N_EXT_ATTR6 in NUMBER,
1203   X_N_EXT_ATTR7 in NUMBER,
1204   X_N_EXT_ATTR8 in NUMBER,
1205   X_N_EXT_ATTR9 in NUMBER,
1206   X_N_EXT_ATTR10 in NUMBER,
1207   X_N_EXT_ATTR11 in NUMBER,
1208   X_N_EXT_ATTR12 in NUMBER,
1209   X_N_EXT_ATTR13 in NUMBER,
1210   X_N_EXT_ATTR14 in NUMBER,
1211   X_N_EXT_ATTR15 in NUMBER,
1212   X_N_EXT_ATTR16 in NUMBER,
1213   X_N_EXT_ATTR17 in NUMBER,
1214   X_N_EXT_ATTR18 in NUMBER,
1215   X_N_EXT_ATTR19 in NUMBER,
1216   X_N_EXT_ATTR20 in NUMBER,
1217   X_N_EXT_ATTR21 in NUMBER,
1218   X_N_EXT_ATTR22 in NUMBER,
1219   X_N_EXT_ATTR23 in NUMBER,
1220   X_N_EXT_ATTR24 in NUMBER,
1221   X_N_EXT_ATTR25 in NUMBER,
1222   X_D_EXT_ATTR1 in DATE,
1223   X_D_EXT_ATTR2 in DATE,
1224   X_D_EXT_ATTR3 in DATE,
1225   X_D_EXT_ATTR4 in DATE,
1226   X_D_EXT_ATTR5 in DATE,
1227   X_D_EXT_ATTR6 in DATE,
1228   X_D_EXT_ATTR7 in DATE,
1229   X_D_EXT_ATTR8 in DATE,
1230   X_D_EXT_ATTR9 in DATE,
1231   X_INCIDENT_ID in NUMBER,
1232   X_CONTEXT in VARCHAR2,
1233   X_ATTR_GROUP_ID in NUMBER,
1234   X_C_EXT_ATTR1 in VARCHAR2,
1235   X_C_EXT_ATTR2 in VARCHAR2,
1236   X_C_EXT_ATTR3 in VARCHAR2,
1237   X_C_EXT_ATTR4 in VARCHAR2,
1238   X_TL_EXT_ATTR1 in VARCHAR2,
1239   X_TL_EXT_ATTR2 in VARCHAR2,
1240   X_TL_EXT_ATTR3 in VARCHAR2,
1241   X_TL_EXT_ATTR4 in VARCHAR2,
1242   X_TL_EXT_ATTR5 in VARCHAR2,
1243   X_TL_EXT_ATTR6 in VARCHAR2,
1244   X_TL_EXT_ATTR7 in VARCHAR2,
1245   X_TL_EXT_ATTR8 in VARCHAR2,
1246   X_TL_EXT_ATTR9 in VARCHAR2,
1247   X_TL_EXT_ATTR10 in VARCHAR2,
1248   X_LAST_UPDATE_DATE in DATE,
1249   X_LAST_UPDATED_BY in NUMBER,
1250   X_LAST_UPDATE_LOGIN in NUMBER
1251 ) is
1252 begin
1253   update CS_SR_CONTACTS_EXT_B set
1254     D_EXT_ATTR10 = X_D_EXT_ATTR10,
1255     D_EXT_ATTR11 = X_D_EXT_ATTR11,
1256     D_EXT_ATTR12 = X_D_EXT_ATTR12,
1257     D_EXT_ATTR13 = X_D_EXT_ATTR13,
1258     D_EXT_ATTR14 = X_D_EXT_ATTR14,
1259     D_EXT_ATTR15 = X_D_EXT_ATTR15,
1260     D_EXT_ATTR16 = X_D_EXT_ATTR16,
1261     D_EXT_ATTR17 = X_D_EXT_ATTR17,
1262     D_EXT_ATTR18 = X_D_EXT_ATTR18,
1263     D_EXT_ATTR19 = X_D_EXT_ATTR19,
1264     D_EXT_ATTR20 = X_D_EXT_ATTR20,
1265     D_EXT_ATTR21 = X_D_EXT_ATTR21,
1266     D_EXT_ATTR22 = X_D_EXT_ATTR22,
1267     D_EXT_ATTR23 = X_D_EXT_ATTR23,
1268     D_EXT_ATTR24 = X_D_EXT_ATTR24,
1269     D_EXT_ATTR25 = X_D_EXT_ATTR25,
1270     UOM_EXT_ATTR1 = X_UOM_EXT_ATTR1,
1271     UOM_EXT_ATTR2 = X_UOM_EXT_ATTR2,
1272     UOM_EXT_ATTR3 = X_UOM_EXT_ATTR3,
1273     UOM_EXT_ATTR4 = X_UOM_EXT_ATTR4,
1274     UOM_EXT_ATTR5 = X_UOM_EXT_ATTR5,
1275     UOM_EXT_ATTR6 = X_UOM_EXT_ATTR6,
1276     UOM_EXT_ATTR7 = X_UOM_EXT_ATTR7,
1277     UOM_EXT_ATTR8 = X_UOM_EXT_ATTR8,
1278     UOM_EXT_ATTR9 = X_UOM_EXT_ATTR9,
1279     UOM_EXT_ATTR10 = X_UOM_EXT_ATTR10,
1280     UOM_EXT_ATTR11 = X_UOM_EXT_ATTR11,
1281     UOM_EXT_ATTR12 = X_UOM_EXT_ATTR12,
1282     UOM_EXT_ATTR13 = X_UOM_EXT_ATTR13,
1283     UOM_EXT_ATTR14 = X_UOM_EXT_ATTR14,
1284     UOM_EXT_ATTR15 = X_UOM_EXT_ATTR15,
1285     UOM_EXT_ATTR16 = X_UOM_EXT_ATTR16,
1286     UOM_EXT_ATTR17 = X_UOM_EXT_ATTR17,
1287     UOM_EXT_ATTR18 = X_UOM_EXT_ATTR18,
1288     UOM_EXT_ATTR19 = X_UOM_EXT_ATTR19,
1289     UOM_EXT_ATTR20 = X_UOM_EXT_ATTR20,
1290     UOM_EXT_ATTR21 = X_UOM_EXT_ATTR21,
1291     UOM_EXT_ATTR22 = X_UOM_EXT_ATTR22,
1292     UOM_EXT_ATTR23 = X_UOM_EXT_ATTR23,
1293     UOM_EXT_ATTR24 = X_UOM_EXT_ATTR24,
1294     UOM_EXT_ATTR25 = X_UOM_EXT_ATTR25,
1295     PARTY_ID = X_PARTY_ID,
1296     CONTACT_TYPE = X_CONTACT_TYPE,
1297     PARTY_ROLE_CODE = X_PARTY_ROLE_CODE,
1298     C_EXT_ATTR5 = X_C_EXT_ATTR5,
1299     C_EXT_ATTR6 = X_C_EXT_ATTR6,
1300     C_EXT_ATTR7 = X_C_EXT_ATTR7,
1301     C_EXT_ATTR8 = X_C_EXT_ATTR8,
1302     C_EXT_ATTR9 = X_C_EXT_ATTR9,
1303     C_EXT_ATTR10 = X_C_EXT_ATTR10,
1304     C_EXT_ATTR11 = X_C_EXT_ATTR11,
1305     C_EXT_ATTR12 = X_C_EXT_ATTR12,
1306     C_EXT_ATTR13 = X_C_EXT_ATTR13,
1307     C_EXT_ATTR14 = X_C_EXT_ATTR14,
1308     C_EXT_ATTR15 = X_C_EXT_ATTR15,
1309     C_EXT_ATTR16 = X_C_EXT_ATTR16,
1310     C_EXT_ATTR17 = X_C_EXT_ATTR17,
1314     C_EXT_ATTR21 = X_C_EXT_ATTR21,
1311     C_EXT_ATTR18 = X_C_EXT_ATTR18,
1312     C_EXT_ATTR19 = X_C_EXT_ATTR19,
1313     C_EXT_ATTR20 = X_C_EXT_ATTR20,
1315     C_EXT_ATTR22 = X_C_EXT_ATTR22,
1316     C_EXT_ATTR23 = X_C_EXT_ATTR23,
1317     C_EXT_ATTR24 = X_C_EXT_ATTR24,
1318     C_EXT_ATTR25 = X_C_EXT_ATTR25,
1319     C_EXT_ATTR26 = X_C_EXT_ATTR26,
1320     C_EXT_ATTR27 = X_C_EXT_ATTR27,
1321     C_EXT_ATTR28 = X_C_EXT_ATTR28,
1322     C_EXT_ATTR29 = X_C_EXT_ATTR29,
1323     C_EXT_ATTR30 = X_C_EXT_ATTR30,
1324     C_EXT_ATTR31 = X_C_EXT_ATTR31,
1325     C_EXT_ATTR32 = X_C_EXT_ATTR32,
1326     C_EXT_ATTR33 = X_C_EXT_ATTR33,
1327     C_EXT_ATTR34 = X_C_EXT_ATTR34,
1328     C_EXT_ATTR35 = X_C_EXT_ATTR35,
1329     C_EXT_ATTR36 = X_C_EXT_ATTR36,
1330     C_EXT_ATTR37 = X_C_EXT_ATTR37,
1331     C_EXT_ATTR38 = X_C_EXT_ATTR38,
1332     C_EXT_ATTR39 = X_C_EXT_ATTR39,
1333     C_EXT_ATTR40 = X_C_EXT_ATTR40,
1334     C_EXT_ATTR41 = X_C_EXT_ATTR41,
1335     C_EXT_ATTR42 = X_C_EXT_ATTR42,
1336     C_EXT_ATTR43 = X_C_EXT_ATTR43,
1337     C_EXT_ATTR44 = X_C_EXT_ATTR44,
1338     C_EXT_ATTR45 = X_C_EXT_ATTR45,
1339     C_EXT_ATTR46 = X_C_EXT_ATTR46,
1340     C_EXT_ATTR47 = X_C_EXT_ATTR47,
1341     C_EXT_ATTR48 = X_C_EXT_ATTR48,
1342     C_EXT_ATTR49 = X_C_EXT_ATTR49,
1343     C_EXT_ATTR50 = X_C_EXT_ATTR50,
1344     N_EXT_ATTR1 = X_N_EXT_ATTR1,
1345     N_EXT_ATTR2 = X_N_EXT_ATTR2,
1346     N_EXT_ATTR3 = X_N_EXT_ATTR3,
1347     N_EXT_ATTR4 = X_N_EXT_ATTR4,
1348     N_EXT_ATTR5 = X_N_EXT_ATTR5,
1349     N_EXT_ATTR6 = X_N_EXT_ATTR6,
1350     N_EXT_ATTR7 = X_N_EXT_ATTR7,
1351     N_EXT_ATTR8 = X_N_EXT_ATTR8,
1352     N_EXT_ATTR9 = X_N_EXT_ATTR9,
1353     N_EXT_ATTR10 = X_N_EXT_ATTR10,
1354     N_EXT_ATTR11 = X_N_EXT_ATTR11,
1355     N_EXT_ATTR12 = X_N_EXT_ATTR12,
1356     N_EXT_ATTR13 = X_N_EXT_ATTR13,
1357     N_EXT_ATTR14 = X_N_EXT_ATTR14,
1358     N_EXT_ATTR15 = X_N_EXT_ATTR15,
1359     N_EXT_ATTR16 = X_N_EXT_ATTR16,
1360     N_EXT_ATTR17 = X_N_EXT_ATTR17,
1361     N_EXT_ATTR18 = X_N_EXT_ATTR18,
1362     N_EXT_ATTR19 = X_N_EXT_ATTR19,
1363     N_EXT_ATTR20 = X_N_EXT_ATTR20,
1364     N_EXT_ATTR21 = X_N_EXT_ATTR21,
1365     N_EXT_ATTR22 = X_N_EXT_ATTR22,
1366     N_EXT_ATTR23 = X_N_EXT_ATTR23,
1367     N_EXT_ATTR24 = X_N_EXT_ATTR24,
1368     N_EXT_ATTR25 = X_N_EXT_ATTR25,
1369     D_EXT_ATTR1 = X_D_EXT_ATTR1,
1370     D_EXT_ATTR2 = X_D_EXT_ATTR2,
1371     D_EXT_ATTR3 = X_D_EXT_ATTR3,
1372     D_EXT_ATTR4 = X_D_EXT_ATTR4,
1373     D_EXT_ATTR5 = X_D_EXT_ATTR5,
1374     D_EXT_ATTR6 = X_D_EXT_ATTR6,
1375     D_EXT_ATTR7 = X_D_EXT_ATTR7,
1376     D_EXT_ATTR8 = X_D_EXT_ATTR8,
1377     D_EXT_ATTR9 = X_D_EXT_ATTR9,
1378     INCIDENT_ID = X_INCIDENT_ID,
1379     CONTEXT = X_CONTEXT,
1380     ATTR_GROUP_ID = X_ATTR_GROUP_ID,
1381     C_EXT_ATTR1 = X_C_EXT_ATTR1,
1382     C_EXT_ATTR2 = X_C_EXT_ATTR2,
1383     C_EXT_ATTR3 = X_C_EXT_ATTR3,
1384     C_EXT_ATTR4 = X_C_EXT_ATTR4,
1385     LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
1386     LAST_UPDATED_BY = X_LAST_UPDATED_BY,
1387     LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
1388   where EXTENSION_ID = X_EXTENSION_ID;
1389 
1390   if (sql%notfound) then
1391     raise no_data_found;
1392   end if;
1393 
1394   update CS_SR_CONTACTS_EXT_TL set
1395     TL_EXT_ATTR1 = X_TL_EXT_ATTR1,
1396     TL_EXT_ATTR2 = X_TL_EXT_ATTR2,
1397     TL_EXT_ATTR3 = X_TL_EXT_ATTR3,
1398     TL_EXT_ATTR4 = X_TL_EXT_ATTR4,
1399     TL_EXT_ATTR5 = X_TL_EXT_ATTR5,
1400     TL_EXT_ATTR6 = X_TL_EXT_ATTR6,
1401     TL_EXT_ATTR7 = X_TL_EXT_ATTR7,
1402     TL_EXT_ATTR8 = X_TL_EXT_ATTR8,
1403     TL_EXT_ATTR9 = X_TL_EXT_ATTR9,
1404     TL_EXT_ATTR10 = X_TL_EXT_ATTR10,
1405     LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
1406     LAST_UPDATED_BY = X_LAST_UPDATED_BY,
1407     LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
1408     SOURCE_LANG = userenv('LANG')
1409   where EXTENSION_ID = X_EXTENSION_ID
1410   and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
1411 
1412   if (sql%notfound) then
1413     raise no_data_found;
1414   end if;
1415 end UPDATE_ROW;
1416 
1417 procedure DELETE_ROW (
1418   X_EXTENSION_ID in NUMBER
1419 ) is
1420 begin
1421   delete from CS_SR_CONTACTS_EXT_TL
1422   where EXTENSION_ID = X_EXTENSION_ID;
1423 
1424   if (sql%notfound) then
1425     raise no_data_found;
1426   end if;
1427 
1428   delete from CS_SR_CONTACTS_EXT_B
1429   where EXTENSION_ID = X_EXTENSION_ID;
1430 
1431   if (sql%notfound) then
1432     raise no_data_found;
1433   end if;
1434 end DELETE_ROW;
1435 
1436 procedure ADD_LANGUAGE
1437 is
1438 begin
1439   delete from CS_SR_CONTACTS_EXT_TL T
1440   where not exists
1441     (select NULL
1442     from CS_SR_CONTACTS_EXT_B B
1443     where B.EXTENSION_ID = T.EXTENSION_ID
1444     );
1445 
1446   update CS_SR_CONTACTS_EXT_TL T set (
1447       TL_EXT_ATTR1,
1448       TL_EXT_ATTR2,
1449       TL_EXT_ATTR3,
1450       TL_EXT_ATTR4,
1451       TL_EXT_ATTR5,
1452       TL_EXT_ATTR6,
1453       TL_EXT_ATTR7,
1454       TL_EXT_ATTR8,
1455       TL_EXT_ATTR9,
1456       TL_EXT_ATTR10
1457     ) = (select
1458       B.TL_EXT_ATTR1,
1459       B.TL_EXT_ATTR2,
1460       B.TL_EXT_ATTR3,
1461       B.TL_EXT_ATTR4,
1462       B.TL_EXT_ATTR5,
1463       B.TL_EXT_ATTR6,
1464       B.TL_EXT_ATTR7,
1465       B.TL_EXT_ATTR8,
1466       B.TL_EXT_ATTR9,
1467       B.TL_EXT_ATTR10
1468     from CS_SR_CONTACTS_EXT_TL B
1469     where B.EXTENSION_ID = T.EXTENSION_ID
1470     and B.LANGUAGE = T.SOURCE_LANG)
1471   where (
1472       T.EXTENSION_ID,
1473       T.LANGUAGE
1474   ) in (select
1475       SUBT.EXTENSION_ID,
1476       SUBT.LANGUAGE
1477     from CS_SR_CONTACTS_EXT_TL SUBB, CS_SR_CONTACTS_EXT_TL SUBT
1481       or (SUBB.TL_EXT_ATTR1 is null and SUBT.TL_EXT_ATTR1 is not null)
1478     where SUBB.EXTENSION_ID = SUBT.EXTENSION_ID
1479     and SUBB.LANGUAGE = SUBT.SOURCE_LANG
1480     and (SUBB.TL_EXT_ATTR1 <> SUBT.TL_EXT_ATTR1
1482       or (SUBB.TL_EXT_ATTR1 is not null and SUBT.TL_EXT_ATTR1 is null)
1483       or SUBB.TL_EXT_ATTR2 <> SUBT.TL_EXT_ATTR2
1484       or (SUBB.TL_EXT_ATTR2 is null and SUBT.TL_EXT_ATTR2 is not null)
1485       or (SUBB.TL_EXT_ATTR2 is not null and SUBT.TL_EXT_ATTR2 is null)
1486       or SUBB.TL_EXT_ATTR3 <> SUBT.TL_EXT_ATTR3
1487       or (SUBB.TL_EXT_ATTR3 is null and SUBT.TL_EXT_ATTR3 is not null)
1488       or (SUBB.TL_EXT_ATTR3 is not null and SUBT.TL_EXT_ATTR3 is null)
1489       or SUBB.TL_EXT_ATTR4 <> SUBT.TL_EXT_ATTR4
1490       or (SUBB.TL_EXT_ATTR4 is null and SUBT.TL_EXT_ATTR4 is not null)
1491       or (SUBB.TL_EXT_ATTR4 is not null and SUBT.TL_EXT_ATTR4 is null)
1492       or SUBB.TL_EXT_ATTR5 <> SUBT.TL_EXT_ATTR5
1493       or (SUBB.TL_EXT_ATTR5 is null and SUBT.TL_EXT_ATTR5 is not null)
1494       or (SUBB.TL_EXT_ATTR5 is not null and SUBT.TL_EXT_ATTR5 is null)
1495       or SUBB.TL_EXT_ATTR6 <> SUBT.TL_EXT_ATTR6
1496       or (SUBB.TL_EXT_ATTR6 is null and SUBT.TL_EXT_ATTR6 is not null)
1497       or (SUBB.TL_EXT_ATTR6 is not null and SUBT.TL_EXT_ATTR6 is null)
1498       or SUBB.TL_EXT_ATTR7 <> SUBT.TL_EXT_ATTR7
1499       or (SUBB.TL_EXT_ATTR7 is null and SUBT.TL_EXT_ATTR7 is not null)
1500       or (SUBB.TL_EXT_ATTR7 is not null and SUBT.TL_EXT_ATTR7 is null)
1501       or SUBB.TL_EXT_ATTR8 <> SUBT.TL_EXT_ATTR8
1502       or (SUBB.TL_EXT_ATTR8 is null and SUBT.TL_EXT_ATTR8 is not null)
1503       or (SUBB.TL_EXT_ATTR8 is not null and SUBT.TL_EXT_ATTR8 is null)
1504       or SUBB.TL_EXT_ATTR9 <> SUBT.TL_EXT_ATTR9
1505       or (SUBB.TL_EXT_ATTR9 is null and SUBT.TL_EXT_ATTR9 is not null)
1506       or (SUBB.TL_EXT_ATTR9 is not null and SUBT.TL_EXT_ATTR9 is null)
1507       or SUBB.TL_EXT_ATTR10 <> SUBT.TL_EXT_ATTR10
1508       or (SUBB.TL_EXT_ATTR10 is null and SUBT.TL_EXT_ATTR10 is not null)
1509       or (SUBB.TL_EXT_ATTR10 is not null and SUBT.TL_EXT_ATTR10 is null)
1510   ));
1511 
1512   insert into CS_SR_CONTACTS_EXT_TL (
1513     PARTY_ROLE_CODE,
1514     CONTACT_TYPE,
1515     PARTY_ID,
1516     EXTENSION_ID,
1517     INCIDENT_ID,
1518     CONTEXT,
1519     ATTR_GROUP_ID,
1520     LAST_UPDATE_DATE,
1521     LAST_UPDATED_BY,
1522     LAST_UPDATE_LOGIN,
1523     CREATED_BY,
1524     CREATION_DATE,
1525     TL_EXT_ATTR1,
1526     TL_EXT_ATTR2,
1527     TL_EXT_ATTR3,
1528     TL_EXT_ATTR4,
1529     TL_EXT_ATTR5,
1530     TL_EXT_ATTR6,
1531     TL_EXT_ATTR7,
1532     TL_EXT_ATTR8,
1533     TL_EXT_ATTR9,
1534     TL_EXT_ATTR10,
1535     LANGUAGE,
1536     SOURCE_LANG
1537   ) select /*+ ORDERED */
1538     B.PARTY_ROLE_CODE,
1539     B.CONTACT_TYPE,
1540     B.PARTY_ID,
1541     B.EXTENSION_ID,
1542     B.INCIDENT_ID,
1543     B.CONTEXT,
1544     B.ATTR_GROUP_ID,
1545     B.LAST_UPDATE_DATE,
1546     B.LAST_UPDATED_BY,
1547     B.LAST_UPDATE_LOGIN,
1548     B.CREATED_BY,
1549     B.CREATION_DATE,
1550     B.TL_EXT_ATTR1,
1551     B.TL_EXT_ATTR2,
1552     B.TL_EXT_ATTR3,
1553     B.TL_EXT_ATTR4,
1554     B.TL_EXT_ATTR5,
1555     B.TL_EXT_ATTR6,
1556     B.TL_EXT_ATTR7,
1557     B.TL_EXT_ATTR8,
1558     B.TL_EXT_ATTR9,
1559     B.TL_EXT_ATTR10,
1560     L.LANGUAGE_CODE,
1561     B.SOURCE_LANG
1562   from CS_SR_CONTACTS_EXT_TL B, FND_LANGUAGES L
1563   where L.INSTALLED_FLAG in ('I', 'B')
1564   and B.LANGUAGE = userenv('LANG')
1565   and not exists
1566     (select NULL
1567     from CS_SR_CONTACTS_EXT_TL T
1568     where T.EXTENSION_ID = B.EXTENSION_ID
1569     and T.LANGUAGE = L.LANGUAGE_CODE);
1570 end ADD_LANGUAGE;
1571 
1572 end CS_SR_CONTACTS_EXT_PKG;