DBA Data[Home] [Help]

PACKAGE BODY: APPS.CUG_TSK_TYP_ATTR_MAPS_PKG

Source


1 package body CUG_TSK_TYP_ATTR_MAPS_PKG as
2 /* $Header: CUGTSKTB.pls 115.7 2004/03/29 21:46:50 aneemuch ship $ */
3 procedure INSERT_ROW (
4   X_ROWID in out NOCOPY VARCHAR2,
5   X_TSK_TYP_ATTR_MAP_ID in NUMBER,
6   X_END_DATE_ACTIVE in DATE,
7   X_OBJECT_VERSION_NUMBER in NUMBER,
8   X_START_DATE_ACTIVE in DATE,
9   X_TASK_TYPE_ATTRIBUTE_CODE in VARCHAR2,
10   X_TASK_TYPE_ID in NUMBER,
11   X_TASK_ATTR_MANDATORY_FLAG in VARCHAR2,
12   X_TASK_ATTR_DISPLAYED_FLAG in VARCHAR2,
13   X_TASK_ATTRIBUTE_LIST_NAME in VARCHAR2,
14   X_ATTRIBUTE1 in VARCHAR2,
15   X_ATTRIBUTE2 in VARCHAR2,
16   X_ATTRIBUTE3 in VARCHAR2,
17   X_ATTRIBUTE4 in VARCHAR2,
18   X_ATTRIBUTE5 in VARCHAR2,
19   X_ATTRIBUTE6 in VARCHAR2,
20   X_ATTRIBUTE7 in VARCHAR2,
21   X_ATTRIBUTE8 in VARCHAR2,
22   X_ATTRIBUTE9 in VARCHAR2,
23   X_ATTRIBUTE10 in VARCHAR2,
24   X_ATTRIBUTE11 in VARCHAR2,
25   X_ATTRIBUTE12 in VARCHAR2,
26   X_ATTRIBUTE13 in VARCHAR2,
27   X_ATTRIBUTE14 in VARCHAR2,
28   X_ATTRIBUTE15 in VARCHAR2,
29   X_ATTRIBUTE_CATEGORY in VARCHAR2,
30   X_TASK_ATTR_DEFAULT_VALUE in VARCHAR2,
31   X_CREATION_DATE in DATE,
32   X_CREATED_BY in NUMBER,
33   X_LAST_UPDATE_DATE in DATE,
34   X_LAST_UPDATED_BY in NUMBER,
35   X_LAST_UPDATE_LOGIN in NUMBER
36 ) is
37   cursor C is select ROWID from CUG_TSK_TYP_ATTR_MAPS_B
38     where TSK_TYP_ATTR_MAP_ID = X_TSK_TYP_ATTR_MAP_ID
39     ;
40 begin
41   insert into CUG_TSK_TYP_ATTR_MAPS_B (
42     END_DATE_ACTIVE,
43     TSK_TYP_ATTR_MAP_ID,
44     OBJECT_VERSION_NUMBER,
45     START_DATE_ACTIVE,
46     TASK_TYPE_ATTRIBUTE_CODE,
47     TASK_TYPE_ID,
48     TASK_ATTR_MANDATORY_FLAG,
49     TASK_ATTR_DISPLAYED_FLAG,
50     TASK_ATTRIBUTE_LIST_NAME,
51     ATTRIBUTE1,
52     ATTRIBUTE2,
53     ATTRIBUTE3,
54     ATTRIBUTE4,
55     ATTRIBUTE5,
56     ATTRIBUTE6,
57     ATTRIBUTE7,
58     ATTRIBUTE8,
59     ATTRIBUTE9,
60     ATTRIBUTE10,
61     ATTRIBUTE11,
62     ATTRIBUTE12,
63     ATTRIBUTE13,
64     ATTRIBUTE14,
65     ATTRIBUTE15,
66     ATTRIBUTE_CATEGORY,
67     CREATION_DATE,
68     CREATED_BY,
69     LAST_UPDATE_DATE,
70     LAST_UPDATED_BY,
71     LAST_UPDATE_LOGIN
72   ) values (
73     X_END_DATE_ACTIVE,
74     X_TSK_TYP_ATTR_MAP_ID,
75     X_OBJECT_VERSION_NUMBER,
76     X_START_DATE_ACTIVE,
77     X_TASK_TYPE_ATTRIBUTE_CODE,
78     X_TASK_TYPE_ID,
79     X_TASK_ATTR_MANDATORY_FLAG,
80     X_TASK_ATTR_DISPLAYED_FLAG,
81     X_TASK_ATTRIBUTE_LIST_NAME,
82     X_ATTRIBUTE1,
83     X_ATTRIBUTE2,
84     X_ATTRIBUTE3,
85     X_ATTRIBUTE4,
86     X_ATTRIBUTE5,
87     X_ATTRIBUTE6,
88     X_ATTRIBUTE7,
89     X_ATTRIBUTE8,
90     X_ATTRIBUTE9,
91     X_ATTRIBUTE10,
92     X_ATTRIBUTE11,
93     X_ATTRIBUTE12,
94     X_ATTRIBUTE13,
95     X_ATTRIBUTE14,
96     X_ATTRIBUTE15,
97     X_ATTRIBUTE_CATEGORY,
98     X_CREATION_DATE,
99     X_CREATED_BY,
100     X_LAST_UPDATE_DATE,
101     X_LAST_UPDATED_BY,
102     X_LAST_UPDATE_LOGIN
103   );
104 
105   insert into CUG_TSK_TYP_ATTR_MAPS_TL (
106     TSK_TYP_ATTR_MAP_ID,
107     CREATED_BY,
108     CREATION_DATE,
109     LAST_UPDATED_BY,
110     LAST_UPDATE_LOGIN,
111     LAST_UPDATE_DATE,
112     TASK_ATTR_DEFAULT_VALUE,
113     LANGUAGE,
114     SOURCE_LANG
115   ) select
116     X_TSK_TYP_ATTR_MAP_ID,
117     X_CREATED_BY,
118     X_CREATION_DATE,
119     X_LAST_UPDATED_BY,
120     X_LAST_UPDATE_LOGIN,
121     X_LAST_UPDATE_DATE,
122     X_TASK_ATTR_DEFAULT_VALUE,
123     L.LANGUAGE_CODE,
124     userenv('LANG')
125   from FND_LANGUAGES L
126   where L.INSTALLED_FLAG in ('I', 'B')
127   and not exists
128     (select NULL
129     from CUG_TSK_TYP_ATTR_MAPS_TL T
130     where T.TSK_TYP_ATTR_MAP_ID = X_TSK_TYP_ATTR_MAP_ID
131     and T.LANGUAGE = L.LANGUAGE_CODE);
132 
133   open c;
134   fetch c into X_ROWID;
135   if (c%notfound) then
136     close c;
137     raise no_data_found;
138   end if;
139   close c;
140 
141 end INSERT_ROW;
142 
143 procedure LOCK_ROW (
144   X_TSK_TYP_ATTR_MAP_ID in NUMBER,
145   X_END_DATE_ACTIVE in DATE,
146   X_OBJECT_VERSION_NUMBER in NUMBER,
147   X_START_DATE_ACTIVE in DATE,
148   X_TASK_TYPE_ATTRIBUTE_CODE in VARCHAR2,
149   X_TASK_TYPE_ID in NUMBER,
150   X_TASK_ATTR_MANDATORY_FLAG in VARCHAR2,
151   X_TASK_ATTR_DISPLAYED_FLAG in VARCHAR2,
152   X_TASK_ATTRIBUTE_LIST_NAME in VARCHAR2,
153   X_ATTRIBUTE1 in VARCHAR2,
154   X_ATTRIBUTE2 in VARCHAR2,
155   X_ATTRIBUTE3 in VARCHAR2,
156   X_ATTRIBUTE4 in VARCHAR2,
157   X_ATTRIBUTE5 in VARCHAR2,
158   X_ATTRIBUTE6 in VARCHAR2,
159   X_ATTRIBUTE7 in VARCHAR2,
160   X_ATTRIBUTE8 in VARCHAR2,
161   X_ATTRIBUTE9 in VARCHAR2,
162   X_ATTRIBUTE10 in VARCHAR2,
163   X_ATTRIBUTE11 in VARCHAR2,
164   X_ATTRIBUTE12 in VARCHAR2,
165   X_ATTRIBUTE13 in VARCHAR2,
166   X_ATTRIBUTE14 in VARCHAR2,
167   X_ATTRIBUTE15 in VARCHAR2,
168   X_ATTRIBUTE_CATEGORY in VARCHAR2,
169   X_TASK_ATTR_DEFAULT_VALUE in VARCHAR2
170 ) is
171   cursor c is select
172       END_DATE_ACTIVE,
173       OBJECT_VERSION_NUMBER,
174       START_DATE_ACTIVE,
175       TASK_TYPE_ATTRIBUTE_CODE,
176       TASK_TYPE_ID,
177       TASK_ATTR_MANDATORY_FLAG,
178       TASK_ATTR_DISPLAYED_FLAG,
179       TASK_ATTRIBUTE_LIST_NAME,
180       ATTRIBUTE1,
181       ATTRIBUTE2,
182       ATTRIBUTE3,
183       ATTRIBUTE4,
184       ATTRIBUTE5,
185       ATTRIBUTE6,
186       ATTRIBUTE7,
187       ATTRIBUTE8,
188       ATTRIBUTE9,
189       ATTRIBUTE10,
190       ATTRIBUTE11,
191       ATTRIBUTE12,
192       ATTRIBUTE13,
193       ATTRIBUTE14,
194       ATTRIBUTE15,
195       ATTRIBUTE_CATEGORY
196     from CUG_TSK_TYP_ATTR_MAPS_B
197     where TSK_TYP_ATTR_MAP_ID = X_TSK_TYP_ATTR_MAP_ID
198     for update of TSK_TYP_ATTR_MAP_ID nowait;
199   recinfo c%rowtype;
200 
201   cursor c1 is select
202       TASK_ATTR_DEFAULT_VALUE,
203       decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
204     from CUG_TSK_TYP_ATTR_MAPS_TL
205     where TSK_TYP_ATTR_MAP_ID = X_TSK_TYP_ATTR_MAP_ID
206     and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
207     for update of TSK_TYP_ATTR_MAP_ID nowait;
208 begin
209   open c;
210   fetch c into recinfo;
211   if (c%notfound) then
212     close c;
213     fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
214     app_exception.raise_exception;
215   end if;
216   close c;
217   if (    ((recinfo.END_DATE_ACTIVE = X_END_DATE_ACTIVE)
218            OR ((recinfo.END_DATE_ACTIVE is null) AND (X_END_DATE_ACTIVE is null)))
219       AND ((recinfo.OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER)
220            OR ((recinfo.OBJECT_VERSION_NUMBER is null) AND (X_OBJECT_VERSION_NUMBER is null)))
221       AND ((recinfo.START_DATE_ACTIVE = X_START_DATE_ACTIVE)
222            OR ((recinfo.START_DATE_ACTIVE is null) AND (X_START_DATE_ACTIVE is null)))
223       AND (recinfo.TASK_TYPE_ATTRIBUTE_CODE = X_TASK_TYPE_ATTRIBUTE_CODE)
224       AND (recinfo.TASK_TYPE_ID = X_TASK_TYPE_ID)
225       AND ((recinfo.TASK_ATTR_MANDATORY_FLAG = X_TASK_ATTR_MANDATORY_FLAG)
226            OR ((recinfo.TASK_ATTR_MANDATORY_FLAG is null) AND (X_TASK_ATTR_MANDATORY_FLAG is null)))
227       AND ((recinfo.TASK_ATTR_DISPLAYED_FLAG = X_TASK_ATTR_DISPLAYED_FLAG)
228            OR ((recinfo.TASK_ATTR_DISPLAYED_FLAG is null) AND (X_TASK_ATTR_DISPLAYED_FLAG is null)))
229       AND ((recinfo.TASK_ATTRIBUTE_LIST_NAME = X_TASK_ATTRIBUTE_LIST_NAME)
230            OR ((recinfo.TASK_ATTRIBUTE_LIST_NAME is null) AND (X_TASK_ATTRIBUTE_LIST_NAME is null)))
231       AND ((recinfo.ATTRIBUTE1 = X_ATTRIBUTE1)
232            OR ((recinfo.ATTRIBUTE1 is null) AND (X_ATTRIBUTE1 is null)))
233       AND ((recinfo.ATTRIBUTE2 = X_ATTRIBUTE2)
234            OR ((recinfo.ATTRIBUTE2 is null) AND (X_ATTRIBUTE2 is null)))
235       AND ((recinfo.ATTRIBUTE3 = X_ATTRIBUTE3)
236            OR ((recinfo.ATTRIBUTE3 is null) AND (X_ATTRIBUTE3 is null)))
237       AND ((recinfo.ATTRIBUTE4 = X_ATTRIBUTE4)
238            OR ((recinfo.ATTRIBUTE4 is null) AND (X_ATTRIBUTE4 is null)))
239       AND ((recinfo.ATTRIBUTE5 = X_ATTRIBUTE5)
240            OR ((recinfo.ATTRIBUTE5 is null) AND (X_ATTRIBUTE5 is null)))
241       AND ((recinfo.ATTRIBUTE6 = X_ATTRIBUTE6)
242            OR ((recinfo.ATTRIBUTE6 is null) AND (X_ATTRIBUTE6 is null)))
243       AND ((recinfo.ATTRIBUTE7 = X_ATTRIBUTE7)
244            OR ((recinfo.ATTRIBUTE7 is null) AND (X_ATTRIBUTE7 is null)))
245       AND ((recinfo.ATTRIBUTE8 = X_ATTRIBUTE8)
246            OR ((recinfo.ATTRIBUTE8 is null) AND (X_ATTRIBUTE8 is null)))
247       AND ((recinfo.ATTRIBUTE9 = X_ATTRIBUTE9)
248            OR ((recinfo.ATTRIBUTE9 is null) AND (X_ATTRIBUTE9 is null)))
249       AND ((recinfo.ATTRIBUTE10 = X_ATTRIBUTE10)
250            OR ((recinfo.ATTRIBUTE10 is null) AND (X_ATTRIBUTE10 is null)))
251       AND ((recinfo.ATTRIBUTE11 = X_ATTRIBUTE11)
252            OR ((recinfo.ATTRIBUTE11 is null) AND (X_ATTRIBUTE11 is null)))
253       AND ((recinfo.ATTRIBUTE12 = X_ATTRIBUTE12)
254            OR ((recinfo.ATTRIBUTE12 is null) AND (X_ATTRIBUTE12 is null)))
255       AND ((recinfo.ATTRIBUTE13 = X_ATTRIBUTE13)
256            OR ((recinfo.ATTRIBUTE13 is null) AND (X_ATTRIBUTE13 is null)))
257       AND ((recinfo.ATTRIBUTE14 = X_ATTRIBUTE14)
258            OR ((recinfo.ATTRIBUTE14 is null) AND (X_ATTRIBUTE14 is null)))
259       AND ((recinfo.ATTRIBUTE15 = X_ATTRIBUTE15)
260            OR ((recinfo.ATTRIBUTE15 is null) AND (X_ATTRIBUTE15 is null)))
261       AND ((recinfo.ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY)
262            OR ((recinfo.ATTRIBUTE_CATEGORY is null) AND (X_ATTRIBUTE_CATEGORY is null)))
263   ) then
264     null;
265   else
266     fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
267     app_exception.raise_exception;
268   end if;
269 
270   for tlinfo in c1 loop
271     if (tlinfo.BASELANG = 'Y') then
272       if (    ((tlinfo.TASK_ATTR_DEFAULT_VALUE = X_TASK_ATTR_DEFAULT_VALUE)
273                OR ((tlinfo.TASK_ATTR_DEFAULT_VALUE is null) AND (X_TASK_ATTR_DEFAULT_VALUE is null)))
274       ) then
275         null;
276       else
277         fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
278         app_exception.raise_exception;
279       end if;
280     end if;
281   end loop;
282   return;
283 end LOCK_ROW;
284 
285 procedure UPDATE_ROW (
286   X_TSK_TYP_ATTR_MAP_ID in NUMBER,
287   X_END_DATE_ACTIVE in DATE,
288   X_OBJECT_VERSION_NUMBER in NUMBER,
289   X_START_DATE_ACTIVE in DATE,
290   X_TASK_TYPE_ATTRIBUTE_CODE in VARCHAR2,
291   X_TASK_TYPE_ID in NUMBER,
292   X_TASK_ATTR_MANDATORY_FLAG in VARCHAR2,
293   X_TASK_ATTR_DISPLAYED_FLAG in VARCHAR2,
294   X_TASK_ATTRIBUTE_LIST_NAME in VARCHAR2,
295   X_ATTRIBUTE1 in VARCHAR2,
296   X_ATTRIBUTE2 in VARCHAR2,
297   X_ATTRIBUTE3 in VARCHAR2,
298   X_ATTRIBUTE4 in VARCHAR2,
299   X_ATTRIBUTE5 in VARCHAR2,
300   X_ATTRIBUTE6 in VARCHAR2,
301   X_ATTRIBUTE7 in VARCHAR2,
302   X_ATTRIBUTE8 in VARCHAR2,
303   X_ATTRIBUTE9 in VARCHAR2,
304   X_ATTRIBUTE10 in VARCHAR2,
305   X_ATTRIBUTE11 in VARCHAR2,
306   X_ATTRIBUTE12 in VARCHAR2,
307   X_ATTRIBUTE13 in VARCHAR2,
308   X_ATTRIBUTE14 in VARCHAR2,
309   X_ATTRIBUTE15 in VARCHAR2,
310   X_ATTRIBUTE_CATEGORY in VARCHAR2,
311   X_TASK_ATTR_DEFAULT_VALUE in VARCHAR2,
312   X_LAST_UPDATE_DATE in DATE,
313   X_LAST_UPDATED_BY in NUMBER,
314   X_LAST_UPDATE_LOGIN in NUMBER
315 ) is
316 begin
317   update CUG_TSK_TYP_ATTR_MAPS_B set
318     END_DATE_ACTIVE = X_END_DATE_ACTIVE,
319     OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
320     START_DATE_ACTIVE = X_START_DATE_ACTIVE,
321     TASK_TYPE_ATTRIBUTE_CODE = X_TASK_TYPE_ATTRIBUTE_CODE,
322     TASK_TYPE_ID = X_TASK_TYPE_ID,
323     TASK_ATTR_MANDATORY_FLAG = X_TASK_ATTR_MANDATORY_FLAG,
324     TASK_ATTR_DISPLAYED_FLAG = X_TASK_ATTR_DISPLAYED_FLAG,
325     TASK_ATTRIBUTE_LIST_NAME = X_TASK_ATTRIBUTE_LIST_NAME,
326     ATTRIBUTE1 = X_ATTRIBUTE1,
327     ATTRIBUTE2 = X_ATTRIBUTE2,
328     ATTRIBUTE3 = X_ATTRIBUTE3,
329     ATTRIBUTE4 = X_ATTRIBUTE4,
330     ATTRIBUTE5 = X_ATTRIBUTE5,
331     ATTRIBUTE6 = X_ATTRIBUTE6,
332     ATTRIBUTE7 = X_ATTRIBUTE7,
333     ATTRIBUTE8 = X_ATTRIBUTE8,
334     ATTRIBUTE9 = X_ATTRIBUTE9,
335     ATTRIBUTE10 = X_ATTRIBUTE10,
336     ATTRIBUTE11 = X_ATTRIBUTE11,
337     ATTRIBUTE12 = X_ATTRIBUTE12,
338     ATTRIBUTE13 = X_ATTRIBUTE13,
339     ATTRIBUTE14 = X_ATTRIBUTE14,
340     ATTRIBUTE15 = X_ATTRIBUTE15,
341     ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY,
342     LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
343     LAST_UPDATED_BY = X_LAST_UPDATED_BY,
344     LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
345   where TSK_TYP_ATTR_MAP_ID = X_TSK_TYP_ATTR_MAP_ID;
346 
347   if (sql%notfound) then
348     raise no_data_found;
349   end if;
350 
351   update CUG_TSK_TYP_ATTR_MAPS_TL set
352     TASK_ATTR_DEFAULT_VALUE = X_TASK_ATTR_DEFAULT_VALUE,
353     LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
354     LAST_UPDATED_BY = X_LAST_UPDATED_BY,
355     LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
356     SOURCE_LANG = userenv('LANG')
357   where TSK_TYP_ATTR_MAP_ID = X_TSK_TYP_ATTR_MAP_ID
358   and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
359 
360   if (sql%notfound) then
361     raise no_data_found;
362   end if;
363 end UPDATE_ROW;
364 
365 procedure DELETE_ROW (
366   X_TSK_TYP_ATTR_MAP_ID in NUMBER
367 ) is
368 begin
369   delete from CUG_TSK_TYP_ATTR_MAPS_TL
370   where TSK_TYP_ATTR_MAP_ID = X_TSK_TYP_ATTR_MAP_ID;
371 
372   if (sql%notfound) then
376   delete from CUG_TSK_TYP_ATTR_MAPS_B
373     raise no_data_found;
374   end if;
375 
377   where TSK_TYP_ATTR_MAP_ID = X_TSK_TYP_ATTR_MAP_ID;
378 
379   if (sql%notfound) then
380     raise no_data_found;
381   end if;
382 end DELETE_ROW;
383 procedure LOAD_ROW (
384   X_TSK_TYP_ATTR_MAP_ID in NUMBER,
385   X_END_DATE_ACTIVE in DATE,
386   X_START_DATE_ACTIVE in DATE,
387   X_TASK_TYPE_ATTRIBUTE_CODE in VARCHAR2,
388   X_TASK_TYPE_ID in NUMBER,
389   X_TASK_ATTR_MANDATORY_FLAG in VARCHAR2,
390   X_TASK_ATTR_DISPLAYED_FLAG in VARCHAR2,
391   X_TASK_ATTRIBUTE_LIST_NAME in VARCHAR2,
392   X_TASK_ATTR_DEFAULT_VALUE in VARCHAR2,
393   X_CREATION_DATE             IN   VARCHAR2,
394   X_CREATED_BY                IN   NUMBER,
395   X_LAST_UPDATE_DATE          IN   VARCHAR2,
396   X_LAST_UPDATED_BY           IN   NUMBER,
397   X_LAST_UPDATE_LOGIN         IN   NUMBER,
398   X_ATTRIBUTE1 in VARCHAR2,
399   X_ATTRIBUTE2 in VARCHAR2,
400   X_ATTRIBUTE3 in VARCHAR2,
401   X_ATTRIBUTE4 in VARCHAR2,
402   X_ATTRIBUTE5 in VARCHAR2,
403   X_ATTRIBUTE6 in VARCHAR2,
404   X_ATTRIBUTE7 in VARCHAR2,
405   X_ATTRIBUTE8 in VARCHAR2,
406   X_ATTRIBUTE9 in VARCHAR2,
407   X_ATTRIBUTE10 in VARCHAR2,
408   X_ATTRIBUTE11 in VARCHAR2,
409   X_ATTRIBUTE12 in VARCHAR2,
410   X_ATTRIBUTE13 in VARCHAR2,
411   X_ATTRIBUTE14 in VARCHAR2,
412   X_ATTRIBUTE15 in VARCHAR2,
413   X_ATTRIBUTE_CATEGORY in VARCHAR2,
414 	X_OWNER IN VARCHAR2 ) IS
415 
416 BEGIN
417 DECLARE
418      user_id            NUMBER := 0;
419      row_id             VARCHAR2(64);
420 
421   BEGIN
422 
423      IF (X_OWNER = 'SEED') THEN
424         user_id := 1;
425      END IF;
426 	CUG_TSK_TYP_ATTR_MAPS_PKG.UPDATE_ROW (
427 	  X_TSK_TYP_ATTR_MAP_ID => X_TSK_TYP_ATTR_MAP_ID ,
428 	  X_END_DATE_ACTIVE => X_END_DATE_ACTIVE ,
429 	  X_START_DATE_ACTIVE => X_START_DATE_ACTIVE ,
430 	  X_TASK_TYPE_ATTRIBUTE_CODE =>X_TASK_TYPE_ATTRIBUTE_CODE ,
431 	  X_TASK_TYPE_ID => X_TASK_TYPE_ID ,
432 	  X_TASK_ATTR_MANDATORY_FLAG => X_TASK_ATTR_MANDATORY_FLAG ,
433 	  X_TASK_ATTR_DISPLAYED_FLAG =>  X_TASK_ATTR_DISPLAYED_FLAG,
434 	  X_TASK_ATTRIBUTE_LIST_NAME =>X_TASK_ATTRIBUTE_LIST_NAME ,
435 	  X_TASK_ATTR_DEFAULT_VALUE =>X_TASK_ATTR_DEFAULT_VALUE ,
436 	  X_ATTRIBUTE1 =>X_ATTRIBUTE1 ,
437 	  X_ATTRIBUTE2 =>X_ATTRIBUTE2,
438 	  X_ATTRIBUTE3 =>X_ATTRIBUTE3 ,
439 	  X_ATTRIBUTE4 =>X_ATTRIBUTE4 ,
440 	  X_ATTRIBUTE5 =>X_ATTRIBUTE5 ,
441 	  X_ATTRIBUTE6 =>X_ATTRIBUTE6 ,
442 	  X_ATTRIBUTE7 =>X_ATTRIBUTE7 ,
443 	  X_ATTRIBUTE8 =>X_ATTRIBUTE8 ,
444 	  X_ATTRIBUTE9 =>X_ATTRIBUTE9 ,
445 	  X_ATTRIBUTE10 =>X_ATTRIBUTE10 ,
446 	  X_ATTRIBUTE11 =>X_ATTRIBUTE11 ,
447 	  X_ATTRIBUTE12 =>X_ATTRIBUTE12 ,
448 	  X_ATTRIBUTE13 =>X_ATTRIBUTE13 ,
449 	  X_ATTRIBUTE14 =>X_ATTRIBUTE14 ,
450 	  X_ATTRIBUTE15 =>X_ATTRIBUTE15 ,
451 	X_ATTRIBUTE_CATEGORY =>X_ATTRIBUTE_CATEGORY ,
452 	X_OBJECT_VERSION_NUMBER  => null,
453    	X_LAST_UPDATE_DATE =>  nvl(to_date(x_last_update_date, 'DD-MM-YYYY'), sysdate),
454           X_LAST_UPDATED_BY  => user_id  ,
455           X_LAST_UPDATE_LOGIN  => 0);
456 	EXCEPTION
457 		WHEN NO_DATA_FOUND THEN
458 			CUG_TSK_TYP_ATTR_MAPS_PKG.INSERT_ROW (
459 		X_ROWID  => row_id,
460 		X_TSK_TYP_ATTR_MAP_ID => X_TSK_TYP_ATTR_MAP_ID ,
461 		X_END_DATE_ACTIVE => X_END_DATE_ACTIVE ,
462 		X_START_DATE_ACTIVE => X_START_DATE_ACTIVE ,
463 		X_TASK_TYPE_ATTRIBUTE_CODE => X_TASK_TYPE_ATTRIBUTE_CODE ,
464 		X_TASK_TYPE_ID => X_TASK_TYPE_ID ,
465 		X_TASK_ATTR_MANDATORY_FLAG => X_TASK_ATTR_MANDATORY_FLAG ,
466 		X_TASK_ATTR_DISPLAYED_FLAG => X_TASK_ATTR_DISPLAYED_FLAG,
467 		X_TASK_ATTRIBUTE_LIST_NAME => X_TASK_ATTRIBUTE_LIST_NAME ,
468 		X_ATTRIBUTE1 =>X_ATTRIBUTE1 ,
469 		X_ATTRIBUTE2 =>X_ATTRIBUTE2,
470 		X_ATTRIBUTE3 =>X_ATTRIBUTE3 ,
471 		X_ATTRIBUTE4 =>X_ATTRIBUTE4 ,
472 		X_ATTRIBUTE5 =>X_ATTRIBUTE5 ,
473 		X_ATTRIBUTE6 =>X_ATTRIBUTE6 ,
474 		X_ATTRIBUTE7 =>X_ATTRIBUTE7 ,
475 		X_ATTRIBUTE8 =>X_ATTRIBUTE8 ,
476 		X_ATTRIBUTE9 =>X_ATTRIBUTE9 ,
477 		X_ATTRIBUTE10 =>X_ATTRIBUTE10 ,
478 		X_ATTRIBUTE11 =>X_ATTRIBUTE11 ,
479 		X_ATTRIBUTE12 =>X_ATTRIBUTE12 ,
480 		X_ATTRIBUTE13 =>X_ATTRIBUTE13 ,
481 		X_ATTRIBUTE14 =>X_ATTRIBUTE14 ,
482 		X_ATTRIBUTE15 =>X_ATTRIBUTE15 ,
483 		X_ATTRIBUTE_CATEGORY =>X_ATTRIBUTE_CATEGORY ,
484 		X_OBJECT_VERSION_NUMBER  => null,
485 		X_TASK_ATTR_DEFAULT_VALUE => X_TASK_ATTR_DEFAULT_VALUE ,
486 		X_CREATION_DATE =>  nvl(to_date(x_creation_date, 'DD-MM-YYYY'), sysdate),
487 		X_CREATED_BY => user_id,
488 		X_LAST_UPDATE_DATE =>  nvl(to_date(x_last_update_date, 'DD-MM-YYYY'), sysdate),
489 		X_LAST_UPDATED_BY => user_id,
490 		X_LAST_UPDATE_LOGIN => 0);
491 	END;
492 END LOAD_ROW;
493 
494 
495  PROCEDURE TRANSLATE_ROW (
496   X_TSK_TYP_ATTR_MAP_ID in NUMBER,
497   X_TASK_ATTR_DEFAULT_VALUE in VARCHAR2,
498    X_OWNER in VARCHAR2) IS
499 BEGIN
500 	UPDATE CUG_TSK_TYP_ATTR_MAPS_TL
501 	SET TASK_ATTR_DEFAULT_VALUE = X_TASK_ATTR_DEFAULT_VALUE,
502 	source_lang = userenv('LANG'),
503         last_update_date = sysdate,
504         last_updated_by = decode(X_OWNER, 'SEED', 1, 0),
505         last_update_login = 0
506     where tsk_typ_attr_map_id   = X_TSK_TYP_ATTR_MAP_ID
507     and   userenv('LANG') in (language, source_lang);
508 
509 END TRANSLATE_ROW;
510 
511 
512 procedure ADD_LANGUAGE
513 is
514 begin
515   delete from CUG_TSK_TYP_ATTR_MAPS_TL T
516   where not exists
517     (select NULL
518     from CUG_TSK_TYP_ATTR_MAPS_B B
519     where B.TSK_TYP_ATTR_MAP_ID = T.TSK_TYP_ATTR_MAP_ID
520     );
521 
522   update CUG_TSK_TYP_ATTR_MAPS_TL T set (
523       TASK_ATTR_DEFAULT_VALUE
524     ) = (select
525       B.TASK_ATTR_DEFAULT_VALUE
529   where (
526     from CUG_TSK_TYP_ATTR_MAPS_TL B
527     where B.TSK_TYP_ATTR_MAP_ID = T.TSK_TYP_ATTR_MAP_ID
528     and B.LANGUAGE = T.SOURCE_LANG)
530       T.TSK_TYP_ATTR_MAP_ID,
531       T.LANGUAGE
532   ) in (select
533       SUBT.TSK_TYP_ATTR_MAP_ID,
534       SUBT.LANGUAGE
535     from CUG_TSK_TYP_ATTR_MAPS_TL SUBB, CUG_TSK_TYP_ATTR_MAPS_TL SUBT
536     where SUBB.TSK_TYP_ATTR_MAP_ID = SUBT.TSK_TYP_ATTR_MAP_ID
537     and SUBB.LANGUAGE = SUBT.SOURCE_LANG
538     and (SUBB.TASK_ATTR_DEFAULT_VALUE <> SUBT.TASK_ATTR_DEFAULT_VALUE
539       or (SUBB.TASK_ATTR_DEFAULT_VALUE is null and SUBT.TASK_ATTR_DEFAULT_VALUE is not null)
540       or (SUBB.TASK_ATTR_DEFAULT_VALUE is not null and SUBT.TASK_ATTR_DEFAULT_VALUE is null)
541   ));
542 
543   insert into CUG_TSK_TYP_ATTR_MAPS_TL (
544     TSK_TYP_ATTR_MAP_ID,
545     CREATED_BY,
546     CREATION_DATE,
547     LAST_UPDATED_BY,
548     LAST_UPDATE_LOGIN,
549     LAST_UPDATE_DATE,
550     TASK_ATTR_DEFAULT_VALUE,
551     LANGUAGE,
552     SOURCE_LANG
553   ) select /*+ ORDERED */
554     B.TSK_TYP_ATTR_MAP_ID,
555     B.CREATED_BY,
556     B.CREATION_DATE,
557     B.LAST_UPDATED_BY,
558     B.LAST_UPDATE_LOGIN,
559     B.LAST_UPDATE_DATE,
560     B.TASK_ATTR_DEFAULT_VALUE,
561     L.LANGUAGE_CODE,
562     B.SOURCE_LANG
563   from CUG_TSK_TYP_ATTR_MAPS_TL B, FND_LANGUAGES L
564   where L.INSTALLED_FLAG in ('I', 'B')
565   and B.LANGUAGE = userenv('LANG')
566   and not exists
567     (select NULL
568     from CUG_TSK_TYP_ATTR_MAPS_TL T
569     where T.TSK_TYP_ATTR_MAP_ID = B.TSK_TYP_ATTR_MAP_ID
570     and T.LANGUAGE = L.LANGUAGE_CODE);
571 end ADD_LANGUAGE;
572 
573 end CUG_TSK_TYP_ATTR_MAPS_PKG;