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.AR_STANDARD_TEXT_PKG

Source


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