DBA Data[Home] [Help]

PACKAGE BODY: APPS.PQH_TABLE_ROUTE_PKG

Source


1 package body PQH_TABLE_ROUTE_PKG as
2 /* $Header: pqtrtpkg.pkb 120.3 2011/04/28 09:31:20 sidsaxen ship $ */
3 procedure INSERT_ROW (
4   X_ROWID in out nocopy VARCHAR2,
5   X_TABLE_ROUTE_ID in NUMBER,
6   X_SHADOW_TABLE_ROUTE_ID in NUMBER,
7   X_FROM_CLAUSE in VARCHAR2,
8   X_TABLE_ALIAS in VARCHAR2,
9   X_WHERE_CLAUSE in VARCHAR2,
10   X_OBJECT_VERSION_NUMBER in NUMBER,
11   X_DISPLAY_NAME in VARCHAR2,
12   X_MAP_REQUIRED_FLAG in VARCHAR2,
13   X_SELECT_ALLOWED_FLAG in VARCHAR2,
14   X_HIDE_TABLE_FOR_VIEW_FLAG in VARCHAR2,
15   X_DISPLAY_ORDER in NUMBER,
16   X_CREATION_DATE in DATE,
17   X_CREATED_BY in NUMBER,
18   X_LAST_UPDATE_DATE in DATE,
19   X_LAST_UPDATED_BY in NUMBER,
20   X_LAST_UPDATE_LOGIN in NUMBER
21 ) is
22 l_x_rowid varchar2(100) := x_rowid;
23 
24   cursor C is select ROWID from PQH_TABLE_ROUTE
25     where TABLE_ROUTE_ID = X_TABLE_ROUTE_ID
26     ;
27 begin
28   insert into PQH_TABLE_ROUTE (
29     TABLE_ROUTE_ID,
30     SHADOW_TABLE_ROUTE_ID,
31     FROM_CLAUSE,
32     TABLE_ALIAS,
33     WHERE_CLAUSE,
34     OBJECT_VERSION_NUMBER,
35     DISPLAY_NAME,
36     MAP_REQUIRED_FLAG ,
37     SELECT_ALLOWED_FLAG ,
38     HIDE_TABLE_FOR_VIEW_FLAG ,
39     DISPLAY_ORDER ,
40     CREATION_DATE,
41     CREATED_BY,
42     LAST_UPDATE_DATE,
43     LAST_UPDATED_BY,
44     LAST_UPDATE_LOGIN
45   ) values (
46     X_TABLE_ROUTE_ID,
47     X_SHADOW_TABLE_ROUTE_ID,
48     X_FROM_CLAUSE,
49     X_TABLE_ALIAS,
50     X_WHERE_CLAUSE,
51     X_OBJECT_VERSION_NUMBER,
52     X_DISPLAY_NAME,
53     X_MAP_REQUIRED_FLAG ,
54     X_SELECT_ALLOWED_FLAG ,
55     X_HIDE_TABLE_FOR_VIEW_FLAG ,
56     X_DISPLAY_ORDER ,
57     X_CREATION_DATE,
58     X_CREATED_BY,
59     X_LAST_UPDATE_DATE,
60     X_LAST_UPDATED_BY,
61     X_LAST_UPDATE_LOGIN
62   );
63 
64   insert into PQH_TABLE_ROUTE_TL (
65     TABLE_ROUTE_ID,
66     DISPLAY_NAME,
67     LAST_UPDATE_DATE,
68     CREATION_DATE,
69     CREATED_BY,
70     LAST_UPDATE_LOGIN,
71     LAST_UPDATED_BY,
72     LANGUAGE,
73     SOURCE_LANG
74   ) select
75     X_TABLE_ROUTE_ID,
76     X_DISPLAY_NAME,
77     X_LAST_UPDATE_DATE,
78     X_CREATION_DATE,
79     X_CREATED_BY,
80     X_LAST_UPDATE_LOGIN,
81     X_LAST_UPDATED_BY,
82     L.LANGUAGE_CODE,
83     userenv('LANG')
84   from FND_LANGUAGES L
85   where L.INSTALLED_FLAG in ('I', 'B')
86   and not exists
87     (select NULL
88     from PQH_TABLE_ROUTE_TL T
89     where T.TABLE_ROUTE_ID = X_TABLE_ROUTE_ID
90     and T.LANGUAGE = L.LANGUAGE_CODE);
91 
92   open c;
93   fetch c into X_ROWID;
94   if (c%notfound) then
95     close c;
96     raise no_data_found;
97   end if;
98   close c;
99 
100   exception when others then
101    l_x_rowid := null;
102   raise;
103 end INSERT_ROW;
104 
105 procedure LOCK_ROW (
106   X_TABLE_ROUTE_ID in NUMBER,
107   X_SHADOW_TABLE_ROUTE_ID in NUMBER,
108   X_FROM_CLAUSE in VARCHAR2,
109   X_TABLE_ALIAS in VARCHAR2,
110   X_WHERE_CLAUSE in VARCHAR2,
111   X_OBJECT_VERSION_NUMBER in NUMBER,
112   X_DISPLAY_NAME in VARCHAR2
113 ) is
114   cursor c is select
115       SHADOW_TABLE_ROUTE_ID,
116       FROM_CLAUSE,
117       TABLE_ALIAS,
118       WHERE_CLAUSE,
119       OBJECT_VERSION_NUMBER
120     from PQH_TABLE_ROUTE
121     where TABLE_ROUTE_ID = X_TABLE_ROUTE_ID
122     for update of TABLE_ROUTE_ID nowait;
123   recinfo c%rowtype;
124 
125   cursor c1 is select
126       DISPLAY_NAME,
127       decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
128     from PQH_TABLE_ROUTE_TL
129     where TABLE_ROUTE_ID = X_TABLE_ROUTE_ID
130     and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
131     for update of TABLE_ROUTE_ID nowait;
132 begin
133   open c;
134   fetch c into recinfo;
135   if (c%notfound) then
136     close c;
137     fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
138     app_exception.raise_exception;
139   end if;
140   close c;
141   if (    ((recinfo.SHADOW_TABLE_ROUTE_ID = X_SHADOW_TABLE_ROUTE_ID)
142            OR ((recinfo.SHADOW_TABLE_ROUTE_ID is null) AND (X_SHADOW_TABLE_ROUTE_ID is null)))
143       AND ((recinfo.FROM_CLAUSE = X_FROM_CLAUSE)
144            OR ((recinfo.FROM_CLAUSE is null) AND (X_FROM_CLAUSE is null)))
145       AND ((recinfo.TABLE_ALIAS = X_TABLE_ALIAS)
146            OR ((recinfo.TABLE_ALIAS is null) AND (X_TABLE_ALIAS is null)))
147       AND ((recinfo.WHERE_CLAUSE = X_WHERE_CLAUSE)
148            OR ((recinfo.WHERE_CLAUSE is null) AND (X_WHERE_CLAUSE is null)))
149       AND (recinfo.OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER)
150   ) then
151     null;
152   else
153     fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
154     app_exception.raise_exception;
155   end if;
156 
157   for tlinfo in c1 loop
158     if (tlinfo.BASELANG = 'Y') then
159       if (    ((tlinfo.DISPLAY_NAME = X_DISPLAY_NAME)
160                OR ((tlinfo.DISPLAY_NAME is null) AND (X_DISPLAY_NAME is null)))
161       ) then
162         null;
163       else
164         fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
165         app_exception.raise_exception;
166       end if;
167     end if;
168   end loop;
169   return;
170 end LOCK_ROW;
171 
172 procedure UPDATE_ROW (
173   X_TABLE_ROUTE_ID in NUMBER,
174   X_SHADOW_TABLE_ROUTE_ID in NUMBER,
175   X_FROM_CLAUSE in VARCHAR2,
176   X_TABLE_ALIAS in VARCHAR2,
177   X_WHERE_CLAUSE in VARCHAR2,
178   X_OBJECT_VERSION_NUMBER in NUMBER,
179   X_DISPLAY_NAME in VARCHAR2,
180   X_MAP_REQUIRED_FLAG in VARCHAR2,
181   X_SELECT_ALLOWED_FLAG in VARCHAR2,
182   X_HIDE_TABLE_FOR_VIEW_FLAG in VARCHAR2,
183   X_DISPLAY_ORDER in NUMBER,
184   X_LAST_UPDATE_DATE in DATE,
185   X_LAST_UPDATED_BY in NUMBER,
186   X_LAST_UPDATE_LOGIN in NUMBER
187 ) is
188 begin
189   update PQH_TABLE_ROUTE set
190     SHADOW_TABLE_ROUTE_ID = X_SHADOW_TABLE_ROUTE_ID,
191     FROM_CLAUSE = X_FROM_CLAUSE,
192     TABLE_ALIAS = X_TABLE_ALIAS,
193     WHERE_CLAUSE = X_WHERE_CLAUSE,
194     OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
195     DISPLAY_NAME = X_DISPLAY_NAME,
196     MAP_REQUIRED_FLAG = X_MAP_REQUIRED_FLAG ,
197     SELECT_ALLOWED_FLAG = X_SELECT_ALLOWED_FLAG ,
198     HIDE_TABLE_FOR_VIEW_FLAG = X_HIDE_TABLE_FOR_VIEW_FLAG ,
199     DISPLAY_ORDER = X_DISPLAY_ORDER ,
200     LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
201     LAST_UPDATED_BY = X_LAST_UPDATED_BY,
202     LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
203   where TABLE_ROUTE_ID = X_TABLE_ROUTE_ID ;
204 -- TRT contains only seed Data and should be updated nevertheless.
205 --    and nvl(last_updated_by,-1) in (1,-1);
206 
207   if (sql%notfound) then
208     raise no_data_found;
209   end if;
210 
211   update PQH_TABLE_ROUTE_TL set
212     DISPLAY_NAME = X_DISPLAY_NAME,
213     LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
214     LAST_UPDATED_BY = X_LAST_UPDATED_BY,
215     LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
216     SOURCE_LANG = userenv('LANG')
217   where TABLE_ROUTE_ID = X_TABLE_ROUTE_ID
218   and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
219 
220   if (sql%notfound) then
221     raise no_data_found;
222   end if;
223 end UPDATE_ROW;
224 
225 procedure DELETE_ROW (
226   X_TABLE_ROUTE_ID in NUMBER
227 ) is
228 begin
229 
230   delete from PQH_TABLE_ROUTE_TL
231   where TABLE_ROUTE_ID = X_TABLE_ROUTE_ID;
232 
233   if (sql%notfound) then
234     raise no_data_found;
235   end if;
236 
237   --
238   -- Added the following code as a part of Zero Downtime Patching Project.
239   -- Code Starts Here.
240   --
241   per_ric_pkg.Chk_integrity(
242     p_entity_name=>'PQH_TABLE_ROUTE',
243     p_ref_entity=>'PQH_TABLE_ROUTE_TL',
244     p_ref_column_name=> 'TABLE_ROUTE_ID',
245     p_ref_col_value_number=>X_TABLE_ROUTE_ID,
246     p_ref_col_value_varchar=>NULL,
247     p_ref_col_value_date=>NULL,
248     p_ref_type=>'DEL');
249   --
250   -- Code Ends Here
251   --
252 
253   delete from PQH_TABLE_ROUTE
254   where TABLE_ROUTE_ID = X_TABLE_ROUTE_ID;
255 
256   if (sql%notfound) then
257     raise no_data_found;
258   end if;
259 end DELETE_ROW;
260 
261 procedure ADD_LANGUAGE
262 is
263 begin
264   delete from PQH_TABLE_ROUTE_TL T
265   where not exists
266     (select NULL
267     from PQH_TABLE_ROUTE B
268     where B.TABLE_ROUTE_ID = T.TABLE_ROUTE_ID
269     );
270 
271   update PQH_TABLE_ROUTE_TL T set (
272       DISPLAY_NAME
273     ) = (select
274       B.DISPLAY_NAME
275     from PQH_TABLE_ROUTE_TL B
276     where B.TABLE_ROUTE_ID = T.TABLE_ROUTE_ID
277     and B.LANGUAGE = T.SOURCE_LANG)
278   where (
279       T.TABLE_ROUTE_ID,
280       T.LANGUAGE
281   ) in (select
282       SUBT.TABLE_ROUTE_ID,
283       SUBT.LANGUAGE
284     from PQH_TABLE_ROUTE_TL SUBB, PQH_TABLE_ROUTE_TL SUBT
285     where SUBB.TABLE_ROUTE_ID = SUBT.TABLE_ROUTE_ID
286     and SUBB.LANGUAGE = SUBT.SOURCE_LANG
287     and (SUBB.DISPLAY_NAME <> SUBT.DISPLAY_NAME
288       or (SUBB.DISPLAY_NAME is null and SUBT.DISPLAY_NAME is not null)
289       or (SUBB.DISPLAY_NAME is not null and SUBT.DISPLAY_NAME is null)
290   ));
291 
292   insert into PQH_TABLE_ROUTE_TL (
293     TABLE_ROUTE_ID,
294     DISPLAY_NAME,
295     LAST_UPDATE_DATE,
296     CREATION_DATE,
297     CREATED_BY,
298     LAST_UPDATE_LOGIN,
299     LAST_UPDATED_BY,
300     LANGUAGE,
301     SOURCE_LANG
302   ) select
303     B.TABLE_ROUTE_ID,
304     B.DISPLAY_NAME,
305     B.LAST_UPDATE_DATE,
306     B.CREATION_DATE,
307     B.CREATED_BY,
308     B.LAST_UPDATE_LOGIN,
309     B.LAST_UPDATED_BY,
310     L.LANGUAGE_CODE,
311     B.SOURCE_LANG
312   from PQH_TABLE_ROUTE_TL B, FND_LANGUAGES L
313   where L.INSTALLED_FLAG in ('I', 'B')
314   and B.LANGUAGE = userenv('LANG')
315   and not exists
316     (select NULL
317     from PQH_TABLE_ROUTE_TL T
318     where T.TABLE_ROUTE_ID = B.TABLE_ROUTE_ID
319     and T.LANGUAGE = L.LANGUAGE_CODE);
320 end ADD_LANGUAGE;
321 
322 
323 
324 procedure LOAD_ROW (
325   p_table_alias              IN VARCHAR2,
326   p_shadow_table             IN VARCHAR2,
327   p_from_clause              IN VARCHAR2,
328   p_where_clause             IN VARCHAR2,
329   p_display_name             IN VARCHAR2,
330   p_map_required_flag        IN VARCHAR2,
331   p_select_allowed_flag      IN VARCHAR2,
332   p_hide_table_for_view_flag IN VARCHAR2,
333   p_display_order            IN NUMBER,
334   p_last_update_date         IN VARCHAR2,
335   p_owner                    IN VARCHAR2
336 ) is
337 
338 
339 l_table_route_id           pqh_table_route.table_route_id%TYPE;
340 l_shadow_table_route_id    pqh_table_route.shadow_table_route_id%TYPE;
341 l_from_clause              pqh_table_route.from_clause%TYPE;
342 l_table_alias              pqh_table_route.table_alias%TYPE;
343 l_where_clause             pqh_table_route.where_clause%TYPE;
344 l_display_name             pqh_table_route.display_name%TYPE;
345 l_rowid                    ROWID;
346 l_map_required_flag        pqh_table_route.map_required_flag%TYPE;
347 l_select_allowed_flag      pqh_table_route.select_allowed_flag%TYPE;
348 l_hide_table_for_view_flag pqh_table_route.hide_table_for_view_flag%TYPE;
349 l_display_order            pqh_table_route.display_order%TYPE;
350 
351 
352 l_created_by               pqh_table_route.created_by%TYPE;
353 l_last_updated_by          pqh_table_route.last_updated_by%TYPE;
354 l_creation_date            pqh_table_route.creation_date%TYPE;
355 l_last_update_date         pqh_table_route.last_update_date%TYPE;
356 l_last_update_login        pqh_table_route.last_update_login%TYPE;
357 --
358 l_last_upd_in_db           pqh_table_route.last_update_date%TYPE;
359 --
360 cursor csr_table_route_id is
361 select table_route_id,last_update_date
362 from pqh_table_route
363 where table_alias = p_table_alias;
364 
365 cursor csr_shadow_table_route_id is
366 select table_route_id
367 from pqh_table_route
368 where table_alias = p_shadow_table;
369 
370 begin
371 
372 -- get ids for names
373 
374   OPEN csr_table_route_id;
375    FETCH csr_table_route_id INTO l_table_route_id,l_last_upd_in_db;
376   CLOSE csr_table_route_id;
377 
378   OPEN csr_shadow_table_route_id;
379    FETCH csr_shadow_table_route_id INTO l_shadow_table_route_id;
380   CLOSE csr_shadow_table_route_id;
381 
382 --
383 -- populate WHO columns
384 --
385   /**
386   if p_owner = 'SEED' then
387     l_created_by := 1;
388     l_last_updated_by := -1;
389   else
390     l_created_by := 0;
391     l_last_updated_by := -1;
392   end if;
393   **/
394 
395   l_creation_date := nvl(to_date(p_last_update_date,'YYYY/MM/DD'),trunc(sysdate));
396   l_last_update_date := nvl(to_date(p_last_update_date,'YYYY/MM/DD'),trunc(sysdate));
397   l_last_update_login := 0;
398   l_last_updated_by := fnd_load_util.owner_id(p_owner);
399   l_created_by := fnd_load_util.owner_id(p_owner);
400 
401   If l_table_route_id is not null then
402 
403    If l_last_update_date >  l_last_upd_in_db then
404    UPDATE_ROW (
405      X_TABLE_ROUTE_ID            =>  l_table_route_id,
406      X_SHADOW_TABLE_ROUTE_ID     =>  l_shadow_table_route_id,
407      X_FROM_CLAUSE               =>  p_from_clause,
408      X_TABLE_ALIAS               =>  p_table_alias,
409      X_WHERE_CLAUSE              =>  p_where_clause,
410      X_OBJECT_VERSION_NUMBER     =>  1,
411      X_DISPLAY_NAME              =>  p_display_name,
412      X_MAP_REQUIRED_FLAG         =>  p_map_required_flag,
413      X_SELECT_ALLOWED_FLAG       =>  p_select_allowed_flag,
414      X_HIDE_TABLE_FOR_VIEW_FLAG  =>  p_hide_table_for_view_flag,
415      X_DISPLAY_ORDER             =>  p_display_order,
416      X_LAST_UPDATE_DATE          =>  l_last_update_date,
417      X_LAST_UPDATED_BY           =>  l_last_updated_by,
418      X_LAST_UPDATE_LOGIN         =>  l_last_update_login
419     );
420    End if;
421 
422    else
423      -- select table_route_id into local variable.
424         select pqh_table_route_s.nextval into l_table_route_id from dual;
425 
426        INSERT_ROW (
427          X_ROWID                     =>  l_rowid,
428          X_TABLE_ROUTE_ID            =>  l_table_route_id ,
429          X_SHADOW_TABLE_ROUTE_ID     =>  l_shadow_table_route_id,
430          X_FROM_CLAUSE               =>  p_from_clause,
431          X_TABLE_ALIAS               =>  p_table_alias,
432          X_WHERE_CLAUSE              =>  p_where_clause,
433          X_OBJECT_VERSION_NUMBER     =>  1,
434          X_DISPLAY_NAME              =>  p_display_name,
435          X_MAP_REQUIRED_FLAG         =>  p_map_required_flag,
436          X_SELECT_ALLOWED_FLAG       =>  p_select_allowed_flag,
437          X_HIDE_TABLE_FOR_VIEW_FLAG  =>  p_hide_table_for_view_flag,
438          X_DISPLAY_ORDER             =>  p_display_order,
439          X_CREATION_DATE             =>  l_creation_date,
440          X_CREATED_BY                =>  l_created_by,
441          X_LAST_UPDATE_DATE          =>  l_last_update_date,
442          X_LAST_UPDATED_BY           =>  l_last_updated_by,
443          X_LAST_UPDATE_LOGIN         =>  l_last_update_login
444        );
445     End if;
446   /**
447   begin
448    UPDATE_ROW (
449      X_TABLE_ROUTE_ID            =>  l_table_route_id,
450      X_SHADOW_TABLE_ROUTE_ID     =>  l_shadow_table_route_id,
451      X_FROM_CLAUSE               =>  p_from_clause,
452      X_TABLE_ALIAS               =>  p_table_alias,
453      X_WHERE_CLAUSE              =>  p_where_clause,
454      X_OBJECT_VERSION_NUMBER     =>  1,
455      X_DISPLAY_NAME              =>  p_display_name,
456      X_MAP_REQUIRED_FLAG         =>  p_map_required_flag,
457      X_SELECT_ALLOWED_FLAG       =>  p_select_allowed_flag,
458      X_HIDE_TABLE_FOR_VIEW_FLAG  =>  p_hide_table_for_view_flag,
459      X_DISPLAY_ORDER             =>  p_display_order,
460      X_LAST_UPDATE_DATE          =>  l_last_update_date,
461      X_LAST_UPDATED_BY           =>  l_last_updated_by,
462      X_LAST_UPDATE_LOGIN         =>  l_last_update_login
463     );
464 
465   exception
466      when NO_DATA_FOUND then
467      -- select table_route_id into local variable.
468         select pqh_table_route_s.nextval into l_table_route_id from dual;
469 
470        INSERT_ROW (
471          X_ROWID                     =>  l_rowid,
472          X_TABLE_ROUTE_ID            =>  l_table_route_id ,
473          X_SHADOW_TABLE_ROUTE_ID     =>  l_shadow_table_route_id,
474          X_FROM_CLAUSE               =>  p_from_clause,
475          X_TABLE_ALIAS               =>  p_table_alias,
476          X_WHERE_CLAUSE              =>  p_where_clause,
477          X_OBJECT_VERSION_NUMBER     =>  1,
478          X_DISPLAY_NAME              =>  p_display_name,
479          X_MAP_REQUIRED_FLAG         =>  p_map_required_flag,
480          X_SELECT_ALLOWED_FLAG       =>  p_select_allowed_flag,
481          X_HIDE_TABLE_FOR_VIEW_FLAG  =>  p_hide_table_for_view_flag,
482          X_DISPLAY_ORDER             =>  p_display_order,
483          X_CREATION_DATE             =>  l_creation_date,
484          X_CREATED_BY                =>  l_created_by,
485          X_LAST_UPDATE_DATE          =>  l_last_update_date,
486          X_LAST_UPDATED_BY           =>  l_last_updated_by,
487          X_LAST_UPDATE_LOGIN         =>  l_last_update_login
488        );
489   end;
490   **/
491 
492 end LOAD_ROW;
493 
494 
495 
496 procedure TRANSLATE_ROW (
497     p_table_alias               in varchar2,
498     p_display_name              in varchar2,
499     p_owner                     in varchar2) is
500 
501 cursor csr_table_route_id is
502  select table_route_id
503  from pqh_table_route
504  where table_alias = p_table_alias;
505 
506 l_table_route_id         pqh_table_route.table_route_id%TYPE;
507 l_created_by             pqh_table_route.created_by%TYPE;
508 l_last_updated_by        pqh_table_route.last_updated_by%TYPE;
509 l_creation_date          pqh_table_route.creation_date%TYPE;
510 l_last_update_date       pqh_table_route.last_update_date%TYPE;
511 l_last_update_login      pqh_table_route.last_update_login%TYPE;
512 
513 
514 begin
515 -- get table_route_id
516   OPEN csr_table_route_id;
517    FETCH csr_table_route_id INTO l_table_route_id;
518   CLOSE csr_table_route_id;
519 --
520 -- populate WHO columns
521   if p_owner = 'SEED' then
522     l_created_by := 1;
523     l_last_updated_by := -1;
524   else
525     l_created_by := 0;
526     l_last_updated_by := 0;
527   end if;
528 
529   l_creation_date := sysdate;
530   l_last_update_date := sysdate;
531   l_last_update_login := 0;
532   l_last_updated_by := fnd_load_util.owner_id(p_owner);
533 
534     update pqh_table_route_tl
535     set display_name      = p_display_name ,
536         last_update_date  = l_last_update_date,
537         last_updated_by   = l_last_updated_by,
538         last_update_login = l_last_update_login,
539         source_lang = USERENV('LANG')
540     where USERENV('LANG') in (language,source_lang)
541     and table_route_id  = l_table_route_id ;
542 --
543 end translate_row;
544 
545 -- Added for R12 Seed Data versioning
546 --
547 procedure LOAD_SEED_ROW (
548   p_upload_mode              IN VARCHAR2,
549   p_table_alias              IN VARCHAR2,
550   p_shadow_table             IN VARCHAR2,
551   p_from_clause              IN VARCHAR2,
552   p_where_clause             IN VARCHAR2,
553   p_display_name             IN VARCHAR2,
554   p_map_required_flag        IN VARCHAR2,
555   p_select_allowed_flag      IN VARCHAR2,
556   p_hide_table_for_view_flag IN VARCHAR2,
557   p_display_order            IN NUMBER,
558   p_last_update_date         IN VARCHAR2,
559   p_owner                    IN VARCHAR2
560 ) is
561 --
562 l_data_migrator_mode varchar2(1);
563 --
564 Begin
565 --
566    l_data_migrator_mode := hr_general.g_data_migrator_mode ;
567    hr_general.g_data_migrator_mode := 'Y';
568 
569        if (p_upload_mode = 'NLS') then
570          PQH_TABLE_ROUTE_PKG.translate_row (
571              p_table_alias    => p_table_alias,
572              p_display_name   => p_display_name,
573              p_owner          => p_owner );
574        else
575         pqh_table_route_pkg.load_row
576             ( p_table_alias              => p_table_alias,
577               p_shadow_table             => p_shadow_table,
578               p_from_clause              => p_from_clause,
579               p_where_clause             => p_where_clause,
580               p_display_name             => p_display_name,
581               p_map_required_flag        => p_map_required_flag,
582               p_select_allowed_flag      => p_select_allowed_flag,
583               p_hide_table_for_view_flag => p_hide_table_for_view_flag,
584               p_display_order            => p_display_order,
585               p_last_update_date         => p_last_update_date,
586               p_owner                    => p_owner );
587       end if;
588    hr_general.g_data_migrator_mode := l_data_migrator_mode;
589 
590 End;
591 --
592 end PQH_TABLE_ROUTE_PKG;