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.2 2005/10/12 20:20:30 srajakum noship $ */
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   delete from PQH_TABLE_ROUTE_TL
230   where TABLE_ROUTE_ID = X_TABLE_ROUTE_ID;
231 
232   if (sql%notfound) then
233     raise no_data_found;
234   end if;
235 
236   delete from PQH_TABLE_ROUTE
237   where TABLE_ROUTE_ID = X_TABLE_ROUTE_ID;
238 
239   if (sql%notfound) then
240     raise no_data_found;
241   end if;
242 end DELETE_ROW;
243 
244 procedure ADD_LANGUAGE
245 is
246 begin
247   delete from PQH_TABLE_ROUTE_TL T
248   where not exists
249     (select NULL
250     from PQH_TABLE_ROUTE B
251     where B.TABLE_ROUTE_ID = T.TABLE_ROUTE_ID
252     );
253 
254   update PQH_TABLE_ROUTE_TL T set (
255       DISPLAY_NAME
256     ) = (select
257       B.DISPLAY_NAME
258     from PQH_TABLE_ROUTE_TL B
259     where B.TABLE_ROUTE_ID = T.TABLE_ROUTE_ID
260     and B.LANGUAGE = T.SOURCE_LANG)
261   where (
262       T.TABLE_ROUTE_ID,
263       T.LANGUAGE
264   ) in (select
265       SUBT.TABLE_ROUTE_ID,
266       SUBT.LANGUAGE
267     from PQH_TABLE_ROUTE_TL SUBB, PQH_TABLE_ROUTE_TL SUBT
268     where SUBB.TABLE_ROUTE_ID = SUBT.TABLE_ROUTE_ID
269     and SUBB.LANGUAGE = SUBT.SOURCE_LANG
270     and (SUBB.DISPLAY_NAME <> SUBT.DISPLAY_NAME
271       or (SUBB.DISPLAY_NAME is null and SUBT.DISPLAY_NAME is not null)
272       or (SUBB.DISPLAY_NAME is not null and SUBT.DISPLAY_NAME is null)
273   ));
274 
275   insert into PQH_TABLE_ROUTE_TL (
276     TABLE_ROUTE_ID,
277     DISPLAY_NAME,
278     LAST_UPDATE_DATE,
279     CREATION_DATE,
280     CREATED_BY,
281     LAST_UPDATE_LOGIN,
282     LAST_UPDATED_BY,
283     LANGUAGE,
284     SOURCE_LANG
285   ) select
286     B.TABLE_ROUTE_ID,
287     B.DISPLAY_NAME,
288     B.LAST_UPDATE_DATE,
289     B.CREATION_DATE,
290     B.CREATED_BY,
291     B.LAST_UPDATE_LOGIN,
292     B.LAST_UPDATED_BY,
293     L.LANGUAGE_CODE,
294     B.SOURCE_LANG
295   from PQH_TABLE_ROUTE_TL B, FND_LANGUAGES L
296   where L.INSTALLED_FLAG in ('I', 'B')
297   and B.LANGUAGE = userenv('LANG')
298   and not exists
299     (select NULL
300     from PQH_TABLE_ROUTE_TL T
301     where T.TABLE_ROUTE_ID = B.TABLE_ROUTE_ID
302     and T.LANGUAGE = L.LANGUAGE_CODE);
303 end ADD_LANGUAGE;
304 
305 
306 
307 procedure LOAD_ROW (
308   p_table_alias              IN VARCHAR2,
309   p_shadow_table             IN VARCHAR2,
310   p_from_clause              IN VARCHAR2,
311   p_where_clause             IN VARCHAR2,
312   p_display_name             IN VARCHAR2,
313   p_map_required_flag        IN VARCHAR2,
314   p_select_allowed_flag      IN VARCHAR2,
315   p_hide_table_for_view_flag IN VARCHAR2,
316   p_display_order            IN NUMBER,
317   p_last_update_date         IN VARCHAR2,
318   p_owner                    IN VARCHAR2
319 ) is
320 
321 
322 l_table_route_id           pqh_table_route.table_route_id%TYPE;
323 l_shadow_table_route_id    pqh_table_route.shadow_table_route_id%TYPE;
324 l_from_clause              pqh_table_route.from_clause%TYPE;
325 l_table_alias              pqh_table_route.table_alias%TYPE;
326 l_where_clause             pqh_table_route.where_clause%TYPE;
327 l_display_name             pqh_table_route.display_name%TYPE;
328 l_rowid                    ROWID;
329 l_map_required_flag        pqh_table_route.map_required_flag%TYPE;
330 l_select_allowed_flag      pqh_table_route.select_allowed_flag%TYPE;
331 l_hide_table_for_view_flag pqh_table_route.hide_table_for_view_flag%TYPE;
332 l_display_order            pqh_table_route.display_order%TYPE;
333 
334 
335 l_created_by               pqh_table_route.created_by%TYPE;
336 l_last_updated_by          pqh_table_route.last_updated_by%TYPE;
337 l_creation_date            pqh_table_route.creation_date%TYPE;
338 l_last_update_date         pqh_table_route.last_update_date%TYPE;
339 l_last_update_login        pqh_table_route.last_update_login%TYPE;
340 --
341 l_last_upd_in_db           pqh_table_route.last_update_date%TYPE;
342 --
343 cursor csr_table_route_id is
344 select table_route_id,last_update_date
345 from pqh_table_route
346 where table_alias = p_table_alias;
347 
348 cursor csr_shadow_table_route_id is
349 select table_route_id
350 from pqh_table_route
351 where table_alias = p_shadow_table;
352 
353 begin
354 
355 -- get ids for names
356 
357   OPEN csr_table_route_id;
358    FETCH csr_table_route_id INTO l_table_route_id,l_last_upd_in_db;
359   CLOSE csr_table_route_id;
360 
361   OPEN csr_shadow_table_route_id;
362    FETCH csr_shadow_table_route_id INTO l_shadow_table_route_id;
363   CLOSE csr_shadow_table_route_id;
364 
365 --
366 -- populate WHO columns
367 --
368   /**
369   if p_owner = 'SEED' then
370     l_created_by := 1;
371     l_last_updated_by := -1;
372   else
373     l_created_by := 0;
374     l_last_updated_by := -1;
375   end if;
376   **/
377 
378   l_creation_date := nvl(to_date(p_last_update_date,'YYYY/MM/DD'),trunc(sysdate));
379   l_last_update_date := nvl(to_date(p_last_update_date,'YYYY/MM/DD'),trunc(sysdate));
380   l_last_update_login := 0;
381   l_last_updated_by := fnd_load_util.owner_id(p_owner);
382   l_created_by := fnd_load_util.owner_id(p_owner);
383 
384   If l_table_route_id is not null then
385 
386    If l_last_update_date >  l_last_upd_in_db then
387    UPDATE_ROW (
388      X_TABLE_ROUTE_ID            =>  l_table_route_id,
389      X_SHADOW_TABLE_ROUTE_ID     =>  l_shadow_table_route_id,
390      X_FROM_CLAUSE               =>  p_from_clause,
391      X_TABLE_ALIAS               =>  p_table_alias,
392      X_WHERE_CLAUSE              =>  p_where_clause,
393      X_OBJECT_VERSION_NUMBER     =>  1,
394      X_DISPLAY_NAME              =>  p_display_name,
395      X_MAP_REQUIRED_FLAG         =>  p_map_required_flag,
396      X_SELECT_ALLOWED_FLAG       =>  p_select_allowed_flag,
397      X_HIDE_TABLE_FOR_VIEW_FLAG  =>  p_hide_table_for_view_flag,
401      X_LAST_UPDATE_LOGIN         =>  l_last_update_login
398      X_DISPLAY_ORDER             =>  p_display_order,
399      X_LAST_UPDATE_DATE          =>  l_last_update_date,
400      X_LAST_UPDATED_BY           =>  l_last_updated_by,
402     );
403    End if;
404 
405    else
406      -- select table_route_id into local variable.
407         select pqh_table_route_s.nextval into l_table_route_id from dual;
408 
409        INSERT_ROW (
410          X_ROWID                     =>  l_rowid,
411          X_TABLE_ROUTE_ID            =>  l_table_route_id ,
412          X_SHADOW_TABLE_ROUTE_ID     =>  l_shadow_table_route_id,
413          X_FROM_CLAUSE               =>  p_from_clause,
414          X_TABLE_ALIAS               =>  p_table_alias,
415          X_WHERE_CLAUSE              =>  p_where_clause,
416          X_OBJECT_VERSION_NUMBER     =>  1,
417          X_DISPLAY_NAME              =>  p_display_name,
418          X_MAP_REQUIRED_FLAG         =>  p_map_required_flag,
419          X_SELECT_ALLOWED_FLAG       =>  p_select_allowed_flag,
420          X_HIDE_TABLE_FOR_VIEW_FLAG  =>  p_hide_table_for_view_flag,
421          X_DISPLAY_ORDER             =>  p_display_order,
422          X_CREATION_DATE             =>  l_creation_date,
423          X_CREATED_BY                =>  l_created_by,
424          X_LAST_UPDATE_DATE          =>  l_last_update_date,
425          X_LAST_UPDATED_BY           =>  l_last_updated_by,
426          X_LAST_UPDATE_LOGIN         =>  l_last_update_login
427        );
428     End if;
429   /**
430   begin
431    UPDATE_ROW (
432      X_TABLE_ROUTE_ID            =>  l_table_route_id,
433      X_SHADOW_TABLE_ROUTE_ID     =>  l_shadow_table_route_id,
434      X_FROM_CLAUSE               =>  p_from_clause,
435      X_TABLE_ALIAS               =>  p_table_alias,
436      X_WHERE_CLAUSE              =>  p_where_clause,
437      X_OBJECT_VERSION_NUMBER     =>  1,
438      X_DISPLAY_NAME              =>  p_display_name,
439      X_MAP_REQUIRED_FLAG         =>  p_map_required_flag,
440      X_SELECT_ALLOWED_FLAG       =>  p_select_allowed_flag,
441      X_HIDE_TABLE_FOR_VIEW_FLAG  =>  p_hide_table_for_view_flag,
442      X_DISPLAY_ORDER             =>  p_display_order,
443      X_LAST_UPDATE_DATE          =>  l_last_update_date,
444      X_LAST_UPDATED_BY           =>  l_last_updated_by,
445      X_LAST_UPDATE_LOGIN         =>  l_last_update_login
446     );
447 
448   exception
449      when NO_DATA_FOUND then
450      -- select table_route_id into local variable.
451         select pqh_table_route_s.nextval into l_table_route_id from dual;
452 
453        INSERT_ROW (
454          X_ROWID                     =>  l_rowid,
455          X_TABLE_ROUTE_ID            =>  l_table_route_id ,
456          X_SHADOW_TABLE_ROUTE_ID     =>  l_shadow_table_route_id,
457          X_FROM_CLAUSE               =>  p_from_clause,
458          X_TABLE_ALIAS               =>  p_table_alias,
459          X_WHERE_CLAUSE              =>  p_where_clause,
460          X_OBJECT_VERSION_NUMBER     =>  1,
461          X_DISPLAY_NAME              =>  p_display_name,
462          X_MAP_REQUIRED_FLAG         =>  p_map_required_flag,
463          X_SELECT_ALLOWED_FLAG       =>  p_select_allowed_flag,
464          X_HIDE_TABLE_FOR_VIEW_FLAG  =>  p_hide_table_for_view_flag,
465          X_DISPLAY_ORDER             =>  p_display_order,
466          X_CREATION_DATE             =>  l_creation_date,
467          X_CREATED_BY                =>  l_created_by,
468          X_LAST_UPDATE_DATE          =>  l_last_update_date,
469          X_LAST_UPDATED_BY           =>  l_last_updated_by,
470          X_LAST_UPDATE_LOGIN         =>  l_last_update_login
471        );
472   end;
473   **/
474 
475 end LOAD_ROW;
476 
477 
478 
479 procedure TRANSLATE_ROW (
480     p_table_alias               in varchar2,
481     p_display_name              in varchar2,
482     p_owner                     in varchar2) is
483 
484 cursor csr_table_route_id is
485  select table_route_id
486  from pqh_table_route
487  where table_alias = p_table_alias;
488 
489 l_table_route_id         pqh_table_route.table_route_id%TYPE;
490 l_created_by             pqh_table_route.created_by%TYPE;
491 l_last_updated_by        pqh_table_route.last_updated_by%TYPE;
492 l_creation_date          pqh_table_route.creation_date%TYPE;
493 l_last_update_date       pqh_table_route.last_update_date%TYPE;
494 l_last_update_login      pqh_table_route.last_update_login%TYPE;
495 
496 
497 begin
498 -- get table_route_id
499   OPEN csr_table_route_id;
500    FETCH csr_table_route_id INTO l_table_route_id;
501   CLOSE csr_table_route_id;
502 --
503 -- populate WHO columns
504   if p_owner = 'SEED' then
505     l_created_by := 1;
506     l_last_updated_by := -1;
507   else
508     l_created_by := 0;
509     l_last_updated_by := 0;
510   end if;
511 
512   l_creation_date := sysdate;
513   l_last_update_date := sysdate;
514   l_last_update_login := 0;
515   l_last_updated_by := fnd_load_util.owner_id(p_owner);
516 
517     update pqh_table_route_tl
518     set display_name      = p_display_name ,
519         last_update_date  = l_last_update_date,
520         last_updated_by   = l_last_updated_by,
524     and table_route_id  = l_table_route_id ;
521         last_update_login = l_last_update_login,
522         source_lang = USERENV('LANG')
523     where USERENV('LANG') in (language,source_lang)
525 --
526 end translate_row;
527 
528 -- Added for R12 Seed Data versioning
529 --
530 procedure LOAD_SEED_ROW (
531   p_upload_mode              IN VARCHAR2,
532   p_table_alias              IN VARCHAR2,
533   p_shadow_table             IN VARCHAR2,
534   p_from_clause              IN VARCHAR2,
535   p_where_clause             IN VARCHAR2,
536   p_display_name             IN VARCHAR2,
537   p_map_required_flag        IN VARCHAR2,
538   p_select_allowed_flag      IN VARCHAR2,
539   p_hide_table_for_view_flag IN VARCHAR2,
540   p_display_order            IN NUMBER,
541   p_last_update_date         IN VARCHAR2,
542   p_owner                    IN VARCHAR2
543 ) is
544 --
545 l_data_migrator_mode varchar2(1);
546 --
547 Begin
548 --
549    l_data_migrator_mode := hr_general.g_data_migrator_mode ;
550    hr_general.g_data_migrator_mode := 'Y';
551 
552        if (p_upload_mode = 'NLS') then
553          PQH_TABLE_ROUTE_PKG.translate_row (
554              p_table_alias    => p_table_alias,
555              p_display_name   => p_display_name,
556              p_owner          => p_owner );
557        else
558         pqh_table_route_pkg.load_row
559             ( p_table_alias              => p_table_alias,
560               p_shadow_table             => p_shadow_table,
561               p_from_clause              => p_from_clause,
562               p_where_clause             => p_where_clause,
563               p_display_name             => p_display_name,
564               p_map_required_flag        => p_map_required_flag,
565               p_select_allowed_flag      => p_select_allowed_flag,
566               p_hide_table_for_view_flag => p_hide_table_for_view_flag,
567               p_display_order            => p_display_order,
568               p_last_update_date         => p_last_update_date,
569               p_owner                    => p_owner );
570       end if;
571    hr_general.g_data_migrator_mode := l_data_migrator_mode;
572 
573 End;
574 --
575 end PQH_TABLE_ROUTE_PKG;