eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.JTF_PC_CATEGORIES_PKG

Source


1 Package Body JTF_PC_CATEGORIES_PKG AS
2 /*$Header: jtfpjpcb.pls 120.2 2005/08/18 22:54:49 stopiwal ship $*/
3 
4   PROCEDURE Insert_Row(X_Rowid                   IN OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
5                        X_Category_Id                    NUMBER,
6                        X_Internal_Name                  VARCHAR2 DEFAULT NULL,
7                        X_Start_Date_Effective           DATE,
8                        X_End_Date_Effective             DATE DEFAULT NULL,
9                        X_Category_Name                  VARCHAR2,
10                        X_Category_Description           VARCHAR2 DEFAULT NULL,
11                        X_Attribute_Category             VARCHAR2 DEFAULT NULL,
12                        X_Attribute1                     VARCHAR2 DEFAULT NULL,
13                        X_Attribute2                     VARCHAR2 DEFAULT NULL,
14                        X_Attribute3                     VARCHAR2 DEFAULT NULL,
15                        X_Attribute4                     VARCHAR2 DEFAULT NULL,
16                        X_Attribute5                     VARCHAR2 DEFAULT NULL,
17                        X_Attribute6                     VARCHAR2 DEFAULT NULL,
18                        X_Attribute7                     VARCHAR2 DEFAULT NULL,
19                        X_Attribute8                     VARCHAR2 DEFAULT NULL,
20                        X_Attribute9                     VARCHAR2 DEFAULT NULL,
21                        X_Attribute10                    VARCHAR2 DEFAULT NULL,
22                        X_Attribute11                    VARCHAR2 DEFAULT NULL,
23                        X_Attribute12                    VARCHAR2 DEFAULT NULL,
24                        X_Attribute13                    VARCHAR2 DEFAULT NULL,
25                        X_Attribute14                    VARCHAR2 DEFAULT NULL,
26                        X_Attribute15                    VARCHAR2 DEFAULT NULL,
27                        X_Created_By                     NUMBER,
28                        X_Creation_Date                  DATE,
29                        X_Last_Updated_By                NUMBER,
30                        X_Last_Update_Date               DATE,
31                        X_Last_Update_Login              NUMBER DEFAULT NULL
32                          ) IS
33 
34     CURSOR C IS SELECT rowid FROM jtf_pc_categories_b
35                  WHERE category_id = X_Category_Id;
36    BEGIN
37 
38 
39        INSERT INTO jtf_pc_categories_b(
40                        Category_Id,
41                        Internal_Name,
42                        Start_Date_Effective,
43                        End_Date_Effective,
44                        Attribute_Category,
45                        Attribute1,
46                        Attribute2,
47                        Attribute3,
48                        Attribute4,
49                        Attribute5,
50                        Attribute6,
51                        Attribute7,
52                        Attribute8,
53                        Attribute9,
54                        Attribute10,
55                        Attribute11,
56                        Attribute12,
57                        Attribute13,
58                        Attribute14,
59                        Attribute15,
60                        Object_Version_Number,
61                        Created_By,
62                        Creation_Date,
63                        Last_Updated_By,
64                        Last_Update_Date,
65                        Last_Update_Login )
66                        VALUES (
67                        X_Category_Id,
68                        X_Internal_Name,
69                        X_Start_Date_Effective,
70                        X_End_Date_Effective,
71                        X_Attribute_Category,
72                        X_Attribute1,
73                        X_Attribute2,
74                        X_Attribute3,
75                        X_Attribute4,
76                        X_Attribute5,
77                        X_Attribute6,
78                        X_Attribute7,
79                        X_Attribute8,
80                        X_Attribute9,
81                        X_Attribute10,
82                        X_Attribute11,
83                        X_Attribute12,
84                        X_Attribute13,
85                        X_Attribute14,
86                        X_Attribute15,
87                        1,
88                        X_Created_By,
89                        X_Creation_Date,
90                        X_Last_Updated_By,
91                        X_Last_Update_Date,
92                        X_Last_Update_Login );
93 
94   insert into jtf_pc_categories_tl (
95     CATEGORY_ID,
96     CATEGORY_NAME,
97     CATEGORY_DESCRIPTION,
98     SOURCE_LANG,
99     LANGUAGE,
100     CREATED_BY,
101     CREATION_DATE,
102     LAST_UPDATED_BY,
103     LAST_UPDATE_DATE,
104     LAST_UPDATE_LOGIN
105   ) select
106     X_CATEGORY_ID,
107     X_CATEGORY_NAME,
108     X_CATEGORY_DESCRIPTION,
109     userenv('LANG'),
110     L.LANGUAGE_CODE,
111     X_CREATED_BY,
112     X_CREATION_DATE,
113     X_LAST_UPDATED_BY,
114     X_LAST_UPDATE_DATE,
115     X_LAST_UPDATE_LOGIN
116   from FND_LANGUAGES L
117   where L.INSTALLED_FLAG in ('I', 'B')
118   and not exists
119     (select NULL
120     from JTF_PC_CATEGORIES_TL T
121     where T.CATEGORY_ID = X_CATEGORY_ID
122     and T.LANGUAGE = L.LANGUAGE_CODE);
123 
124   open c;
125   fetch c into X_ROWID;
126   if (c%notfound) then
127     close c;
128     raise no_data_found;
129   end if;
130   close c;
131 
132   END Insert_Row;
133 
134 
135   PROCEDURE Lock_Row(X_Rowid                            VARCHAR2,
136                        X_Category_Id                    NUMBER,
137                        X_Internal_Name                  VARCHAR2 DEFAULT NULL,
138                        X_Start_Date_Effective           DATE,
139                        X_End_Date_Effective             DATE DEFAULT NULL,
140                        X_Category_Name                  VARCHAR2,
141                        X_Category_Description           VARCHAR2 DEFAULT NULL,
142                        X_Attribute_Category             VARCHAR2 DEFAULT NULL,
143                        X_Attribute1                     VARCHAR2 DEFAULT NULL,
144                        X_Attribute2                     VARCHAR2 DEFAULT NULL,
145                        X_Attribute3                     VARCHAR2 DEFAULT NULL,
146                        X_Attribute4                     VARCHAR2 DEFAULT NULL,
147                        X_Attribute5                     VARCHAR2 DEFAULT NULL,
148                        X_Attribute6                     VARCHAR2 DEFAULT NULL,
149                        X_Attribute7                     VARCHAR2 DEFAULT NULL,
150                        X_Attribute8                     VARCHAR2 DEFAULT NULL,
151                        X_Attribute9                     VARCHAR2 DEFAULT NULL,
152                        X_Attribute10                    VARCHAR2 DEFAULT NULL,
153                        X_Attribute11                    VARCHAR2 DEFAULT NULL,
154                        X_Attribute12                    VARCHAR2 DEFAULT NULL,
155                        X_Attribute13                    VARCHAR2 DEFAULT NULL,
156                        X_Attribute14                    VARCHAR2 DEFAULT NULL,
157                        X_Attribute15                    VARCHAR2 DEFAULT NULL
158   ) IS
159     CURSOR C IS
160         SELECT *
161         FROM   jtf_pc_categories_b
162         WHERE  rowid = X_Rowid
163         FOR UPDATE of Category_Id NOWAIT;
164     Recinfo C%ROWTYPE;
165 
166     cursor c1 is
167         select category_name, category_description, decode(language,userenv('LANG'),'Y','N') BASELANG
168         from jtf_pc_categories_tl
169         where category_id = x_category_id
170         and userenv('LANG') in (LANGUAGE,SOURCE_LANG)
171         for update of category_id nowait;
172 
173   BEGIN
174     OPEN C;
175     FETCH C INTO Recinfo;
176     if (C%NOTFOUND) then
177       CLOSE C;
178       FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
179       APP_EXCEPTION.Raise_Exception;
180     end if;
181     CLOSE C;
182 
183     if (
184                (Recinfo.category_id =  X_Category_Id)
185            AND (   (Recinfo.internal_name =  X_Internal_Name)
186                 OR (    (Recinfo.internal_name IS NULL)
187                     AND (X_Internal_Name IS NULL)))
188            AND (Recinfo.start_date_effective =  X_Start_Date_Effective)
189            AND (   (Recinfo.end_date_effective =  X_End_Date_Effective)
190                 OR (    (Recinfo.end_date_effective IS NULL)
191                     AND (X_End_Date_Effective IS NULL)))
192            AND (   (Recinfo.attribute1 =  X_Attribute1)
193                 OR (    (Recinfo.attribute1 IS NULL)
194                     AND (X_Attribute1 IS NULL)))
195            AND (   (Recinfo.attribute2 =  X_Attribute2)
196                 OR (    (Recinfo.attribute2 IS NULL)
197                     AND (X_Attribute2 IS NULL)))
198            AND (   (Recinfo.attribute3 =  X_Attribute3)
199                 OR (    (Recinfo.attribute3 IS NULL)
200                     AND (X_Attribute3 IS NULL)))
201            AND (   (Recinfo.attribute4 =  X_Attribute4)
202                 OR (    (Recinfo.attribute4 IS NULL)
203                     AND (X_Attribute4 IS NULL)))
204            AND (   (Recinfo.attribute5 =  X_Attribute5)
205                 OR (    (Recinfo.attribute5 IS NULL)
206                     AND (X_Attribute5 IS NULL)))
207            AND (   (Recinfo.attribute6 =  X_Attribute6)
208                 OR (    (Recinfo.attribute6 IS NULL)
209                     AND (X_Attribute6 IS NULL)))
210            AND (   (Recinfo.attribute7 =  X_Attribute7)
211                 OR (    (Recinfo.attribute7 IS NULL)
212                     AND (X_Attribute7 IS NULL)))
213            AND (   (Recinfo.attribute8 =  X_Attribute8)
214                 OR (    (Recinfo.attribute8 IS NULL)
215                     AND (X_Attribute8 IS NULL)))
216            AND (   (Recinfo.attribute9 =  X_Attribute9)
217                 OR (    (Recinfo.attribute9 IS NULL)
218                     AND (X_Attribute9 IS NULL)))
219            AND (   (Recinfo.attribute10 =  X_Attribute10)
220                 OR (    (Recinfo.attribute10 IS NULL)
221                     AND (X_Attribute10 IS NULL)))
222            AND (   (Recinfo.attribute11 =  X_Attribute11)
223                 OR (    (Recinfo.attribute11 IS NULL)
224                     AND (X_Attribute11 IS NULL)))
225            AND (   (Recinfo.attribute12 =  X_Attribute12)
226                 OR (    (Recinfo.attribute12 IS NULL)
227                     AND (X_Attribute12 IS NULL)))
228            AND (   (Recinfo.attribute13 =  X_Attribute13)
229                 OR (    (Recinfo.attribute13 IS NULL)
230                     AND (X_Attribute13 IS NULL)))
231            AND (   (Recinfo.attribute14 =  X_Attribute14)
232                 OR (    (Recinfo.attribute14 IS NULL)
233                     AND (X_Attribute14 IS NULL)))
234            AND (   (Recinfo.attribute15 =  X_Attribute15)
235                 OR (    (Recinfo.attribute15 IS NULL)
236                     AND (X_Attribute15 IS NULL)))
237            AND (   (Recinfo.attribute_category =  X_Attribute_Category)
238                 OR (    (Recinfo.attribute_category IS NULL)
239                     AND (X_Attribute_Category IS NULL)))
240       ) then
241       null;
242     else
243       FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
244       APP_EXCEPTION.Raise_Exception;
245     end if;
246 
247   for tlinfo in c1 loop
248     if (tlinfo.BASELANG = 'Y') then
249       if ( (tlinfo.category_name = X_Category_Name)
250            AND (   (tlinfo.category_description =  X_Category_Description)
251                 OR (    (tlinfo.category_description IS NULL)
252                     AND (X_Category_Description IS NULL)))) then
253         return;
254       else
255         fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
256         app_exception.raise_exception;
257       end if;
258     end if;
259   end loop;
260 
261   END Lock_Row;
262 
263 
264 
265   -- syoung: added x_return_status.
266   PROCEDURE Update_Row(X_Category_Id                    NUMBER,
267                        X_Internal_Name                  VARCHAR2 DEFAULT NULL,
268                        X_Start_Date_Effective           DATE,
269                        X_End_Date_Effective             DATE DEFAULT NULL,
270                        X_Category_Name                  VARCHAR2,
271                        X_Category_Description           VARCHAR2 DEFAULT NULL,
272                        X_Attribute_Category             VARCHAR2 DEFAULT NULL,
273                        X_Attribute1                     VARCHAR2 DEFAULT NULL,
274                        X_Attribute2                     VARCHAR2 DEFAULT NULL,
275                        X_Attribute3                     VARCHAR2 DEFAULT NULL,
276                        X_Attribute4                     VARCHAR2 DEFAULT NULL,
277                        X_Attribute5                     VARCHAR2 DEFAULT NULL,
278                        X_Attribute6                     VARCHAR2 DEFAULT NULL,
279                        X_Attribute7                     VARCHAR2 DEFAULT NULL,
280                        X_Attribute8                     VARCHAR2 DEFAULT NULL,
281                        X_Attribute9                     VARCHAR2 DEFAULT NULL,
282                        X_Attribute10                    VARCHAR2 DEFAULT NULL,
283                        X_Attribute11                    VARCHAR2 DEFAULT NULL,
284                        X_Attribute12                    VARCHAR2 DEFAULT NULL,
285                        X_Attribute13                    VARCHAR2 DEFAULT NULL,
286                        X_Attribute14                    VARCHAR2 DEFAULT NULL,
287                        X_Attribute15                    VARCHAR2 DEFAULT NULL,
288                        X_Object_Version_Number          NUMBER,
289                        X_Last_Updated_By                NUMBER,
290                        X_Last_Update_Date               DATE,
291                        X_Last_Update_Login              NUMBER DEFAULT NULL
292   ) IS
293   BEGIN
294      UPDATE jtf_pc_categories_b
295      SET
296     internal_name                   =     X_Internal_Name,
297 	start_date_effective            =     X_Start_Date_Effective,
298 	end_date_effective              =     X_End_Date_Effective,
299 	attribute1                      =     X_Attribute1,
300 	attribute2                      =     X_Attribute2,
301 	attribute3                      =     X_Attribute3,
302 	attribute4                      =     X_Attribute4,
303 	attribute5                      =     X_Attribute5,
304 	attribute6                      =     X_Attribute6,
305 	attribute7                      =     X_Attribute7,
306 	attribute8                      =     X_Attribute8,
307 	attribute9                      =     X_Attribute9,
308 	attribute10                     =     X_Attribute10,
309 	attribute11                     =     X_Attribute11,
310 	attribute12                     =     X_Attribute12,
311 	attribute13                     =     X_Attribute13,
312 	attribute14                     =     X_Attribute14,
313 	attribute15                     =     X_Attribute15,
314 	attribute_category              =     X_Attribute_Category,
315     object_version_number           =     X_Object_Version_Number + 1,
316 	last_update_date                =     X_Last_Update_Date,
317 	last_updated_by                 =     X_Last_Updated_By,
318 	last_update_login               =     X_Last_Update_Login
319      WHERE category_id = X_Category_id
320      AND object_version_number = X_Object_Version_Number;
321 
322     if (SQL%NOTFOUND) then
323       Raise NO_DATA_FOUND;
324     end if;
325 
326     update JTF_PC_CATEGORIES_TL set
327             CATEGORY_NAME = X_CATEGORY_NAME,
328     	 	CATEGORY_DESCRIPTION = X_CATEGORY_DESCRIPTION,
329     	 	LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
330    	 	LAST_UPDATED_BY = X_LAST_UPDATED_BY,
331     	 	LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
332     	 	SOURCE_LANG = userenv('LANG')
333     where CATEGORY_ID = X_CATEGORY_ID
334     and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
335 
336     if (SQL%NOTFOUND) then
337         raise no_data_found;
338     end if;
339 
340   END Update_Row;
341 
345 
342 
343   PROCEDURE Delete_Row(X_Category_Id number,
344                        X_Object_Version_Number NUMBER) IS
346   BEGIN
347 
348     DELETE FROM jtf_pc_categories_b
349     WHERE CATEGORY_ID = X_Category_Id
350     and OBJECT_VERSION_NUMBER = X_Object_Version_Number;
351 
352     if (SQL%NOTFOUND) then
353       Raise NO_DATA_FOUND;
354     end if;
355 
356     delete from JTF_PC_CATEGORIES_TL
357     where CATEGORY_ID = X_Category_Id;
358 
359     if (sql%notfound) then
360       raise no_data_found;
361     end if;
362 
363   END Delete_Row;
364 
365 -- new procedure for mls (multi-lingual support)
366 -- following procedures either add new rows or
367 -- repair old rows in fa_addtions_tl table
368 -- which stores translation info.
369 
370   PROCEDURE ADD_LANGUAGE is
371 
372   BEGIN
373 
374   -- delete from tl table if same category doesn't exist in base table
375   	delete from JTF_PC_CATEGORIES_TL T
376   	where not exists
377     	(select NULL
378     	 from   JTF_PC_CATEGORIES_B B
379     	 where  B.CATEGORY_ID = T.CATEGORY_ID
380     	);
381 
382   --  repair description in tl table
383       	update JTF_PC_CATEGORIES_TL T
384 	set (CATEGORY_NAME, CATEGORY_DESCRIPTION) = (select B.CATEGORY_NAME, B.CATEGORY_DESCRIPTION
385     	           	     from JTF_PC_CATEGORIES_TL B
386     			     where B.CATEGORY_ID = T.CATEGORY_ID
387     			     and B.LANGUAGE = T.SOURCE_LANG)
388         where (T.CATEGORY_ID, T.LANGUAGE) in
389     			 (select
390       				SUBT.CATEGORY_ID,
391       				SUBT.LANGUAGE
392     			  from JTF_PC_CATEGORIES_TL SUBB, JTF_PC_CATEGORIES_TL SUBT
393     		 	  where SUBB.CATEGORY_ID = SUBT.CATEGORY_ID
394     			  and SUBB.LANGUAGE = SUBT.SOURCE_LANG
395     and (SUBB.CATEGORY_NAME <> SUBT.CATEGORY_NAME
396       or SUBB.CATEGORY_DESCRIPTION <> SUBT.CATEGORY_DESCRIPTION
397       or (SUBB.CATEGORY_DESCRIPTION is null and SUBT.CATEGORY_DESCRIPTION is not null)
398       or (SUBB.CATEGORY_DESCRIPTION is not null and SUBT.CATEGORY_DESCRIPTION is null)));
399 
400 
401   	insert into JTF_PC_CATEGORIES_TL (
402     			CATEGORY_ID,
403                 CATEGORY_NAME,
404     			CATEGORY_DESCRIPTION,
405     			LANGUAGE,
406     			SOURCE_LANG,
407     			CREATED_BY,
408     			CREATION_DATE,
409     			LAST_UPDATED_BY,
410     			LAST_UPDATE_DATE,
411     			LAST_UPDATE_LOGIN)
412  		select
413     			B.CATEGORY_ID,
414                 B.CATEGORY_NAME,
415     			B.CATEGORY_DESCRIPTION,
416     			L.LANGUAGE_CODE,
417     			B.SOURCE_LANG,
418     			B.CREATED_BY,
419     			B.CREATION_DATE,
420     			B.LAST_UPDATED_BY,
421     			B.LAST_UPDATE_DATE,
422     			B.LAST_UPDATE_LOGIN
423   		from JTF_PC_CATEGORIES_TL B, FND_LANGUAGES L
424   		where L.INSTALLED_FLAG in ('I', 'B')
425   		and B.LANGUAGE = userenv('LANG')
426   		and not exists
427     			(select NULL
428     			 from JTF_PC_CATEGORIES_TL T
429     			 where T.CATEGORY_ID = B.CATEGORY_ID
430     			 and T.LANGUAGE = L.LANGUAGE_CODE);
431 end ADD_LANGUAGE;
432 
433 PROCEDURE LOAD_ROW(
434                        X_Category_Id                    NUMBER,
435                        X_Internal_Name                  VARCHAR2 DEFAULT NULL,
436                        X_Start_Date_Effective           DATE,
437                        X_End_Date_Effective             DATE DEFAULT NULL,
438                        X_Category_Name                  VARCHAR2,
439                        X_Category_Description           VARCHAR2 DEFAULT NULL,
440                        X_Attribute_Category             VARCHAR2 DEFAULT NULL,
441                        X_Attribute1                     VARCHAR2 DEFAULT NULL,
442                        X_Attribute2                     VARCHAR2 DEFAULT NULL,
443                        X_Attribute3                     VARCHAR2 DEFAULT NULL,
444                        X_Attribute4                     VARCHAR2 DEFAULT NULL,
445                        X_Attribute5                     VARCHAR2 DEFAULT NULL,
446                        X_Attribute6                     VARCHAR2 DEFAULT NULL,
447                        X_Attribute7                     VARCHAR2 DEFAULT NULL,
448                        X_Attribute8                     VARCHAR2 DEFAULT NULL,
449                        X_Attribute9                     VARCHAR2 DEFAULT NULL,
450                        X_Attribute10                    VARCHAR2 DEFAULT NULL,
451                        X_Attribute11                    VARCHAR2 DEFAULT NULL,
452                        X_Attribute12                    VARCHAR2 DEFAULT NULL,
453                        X_Attribute13                    VARCHAR2 DEFAULT NULL,
454                        X_Attribute14                    VARCHAR2 DEFAULT NULL,
455                        X_Attribute15                    VARCHAR2 DEFAULT NULL,
456                        X_Owner                          VARCHAR2
457   ) IS
458 
459 	h_record_exists	number;
460     v_object_version_number number;
461 
462 	user_id		number := 0;
463 	row_id		varchar2(64);
464 
465    begin
466 
467      if (X_OWNER = 'SEED') then
468         user_id := -1;
469      end if;
470 
471 	select count(*)
472 	into   h_record_exists
473 	from   jtf_pc_categories_b
474 	where  category_id = X_Category_Id;
475 
476 	if (h_record_exists > 0) then
477 
478     select object_version_number
479     into v_object_version_number
480     from jtf_pc_categories_b
481     where category_id = X_Category_Id;
482 
483 	   jtf_pc_categories_pkg.Update_Row(
484 		X_Category_Id			=> X_category_id,
485         X_Internal_Name         => X_Internal_Name,
486         X_Start_Date_Effective  => X_Start_Date_Effective,
487         X_End_Date_Effective    => X_End_Date_Effective,
488         X_Category_Name         => X_Category_Name,
489         X_Category_Description  => X_Category_Description,
490 		X_Attribute1			=> X_Attribute1,
491 		X_Attribute2			=> X_Attribute2,
492 		X_Attribute3			=> X_Attribute3,
493 		X_Attribute4			=> X_Attribute4,
494 		X_Attribute5			=> X_Attribute5,
495 		X_Attribute6			=> X_Attribute6,
496 		X_Attribute7			=> X_Attribute7,
497 		X_Attribute8			=> X_Attribute8,
498 		X_Attribute9			=> X_Attribute9,
499 		X_Attribute10			=> X_Attribute10,
500 		X_Attribute11			=> X_Attribute11,
501 		X_Attribute12			=> X_Attribute12,
502 		X_Attribute13			=> X_Attribute13,
503 		X_Attribute14			=> X_Attribute14,
504 		X_Attribute15			=> X_Attribute15,
505 		X_Attribute_Category	=> X_Attribute_Category,
506         X_Object_Version_Number => v_object_version_number,
507 		X_Last_Update_Date		=> sysdate,
508 		X_Last_Updated_By		=> user_id,
509 		X_Last_Update_Login		=> 0
510                       );
511 	else
512 	   jtf_pc_categories_pkg.Insert_Row(
513 		X_Rowid				=> row_id,
514 		X_Category_Id			=> X_category_id,
515         X_Internal_Name         => X_Internal_Name,
516         X_Start_Date_Effective  => X_Start_Date_Effective,
517         X_End_Date_Effective    => X_End_Date_Effective,
518         X_Category_Name         => X_Category_Name,
519         X_Category_Description  => X_Category_Description,
520 		X_Attribute1			=> X_Attribute1,
521 		X_Attribute2			=> X_Attribute2,
522 		X_Attribute3			=> X_Attribute3,
523 		X_Attribute4			=> X_Attribute4,
524 		X_Attribute5			=> X_Attribute5,
525 		X_Attribute6			=> X_Attribute6,
526 		X_Attribute7			=> X_Attribute7,
527 		X_Attribute8			=> X_Attribute8,
528 		X_Attribute9			=> X_Attribute9,
529 		X_Attribute10			=> X_Attribute10,
530 		X_Attribute11			=> X_Attribute11,
531 		X_Attribute12			=> X_Attribute12,
532 		X_Attribute13			=> X_Attribute13,
533 		X_Attribute14			=> X_Attribute14,
534 		X_Attribute15			=> X_Attribute15,
535 		X_Attribute_Category	=> X_Attribute_Category,
536 		X_Created_By			=> user_id,
537 		X_Creation_Date			=> sysdate,
538 		X_Last_Updated_By		=> user_id,
539 		X_Last_Update_Date		=> sysdate,
540 		X_Last_Update_Login		=> 0
541                       );
542 	end if;
543 
544 end LOAD_ROW;
545 
546 PROCEDURE TRANSLATE_ROW(
547 		X_Category_Id                    IN NUMBER,
548         X_Category_Name                  IN VARCHAR2,
549 		X_Category_Description           IN VARCHAR2,
550         X_OWNER in VARCHAR2
551   ) IS
552 
553    begin
554 
555 	update JTF_PC_CATEGORIES_TL set
556        CATEGORY_NAME = nvl(X_Category_Name, CATEGORY_NAME),
557 	   CATEGORY_DESCRIPTION = nvl(X_Category_Description, CATEGORY_DESCRIPTION),
558 	   LAST_UPDATE_DATE = sysdate,
562 	where userenv('LANG') in (LANGUAGE, SOURCE_LANG)
559 	   LAST_UPDATED_BY = decode(X_OWNER, 'SEED', -1, 0),
560 	   LAST_UPDATE_LOGIN = 0,
561 	   SOURCE_LANG = userenv('LANG')
563 	and   CATEGORY_ID = X_Category_ID;
564 
565 end TRANSLATE_ROW;
566 
567 END JTF_PC_CATEGORIES_PKG;