DBA Data[Home] [Help]

PACKAGE BODY: APPS.EGO_TL_LANG_ENABLE_PUB

Source


1 PACKAGE BODY EGO_TL_LANG_ENABLE_PUB AS
2 /* $Header: EGOCSLEB.pls 115.1 2003/08/14 18:25:46 sjenq noship $ */
3 
4 
5 
6 PROCEDURE handle_catset_language_rows (
7   X_CATEGORY_SET_ID in NUMBER
8 ) is
9 begin
10 
11   --insert new row in all installed languages in the TL table
12   --IF no rows in those installed languages already exist
13   insert into MTL_CATEGORY_SETS_TL (
14     CATEGORY_SET_ID,
15     LANGUAGE,
16     SOURCE_LANG,
17     CATEGORY_SET_NAME,
18     DESCRIPTION,
19     LAST_UPDATE_DATE,
20     LAST_UPDATED_BY,
21     CREATION_DATE,
22     CREATED_BY,
23     LAST_UPDATE_LOGIN
24   ) select
25     X_CATEGORY_SET_ID,
26     L.LANGUAGE_CODE,
27     TL.SOURCE_LANG,
28     TL.CATEGORY_SET_NAME,
29     TL.DESCRIPTION,
30     TL.LAST_UPDATE_DATE,
31     TL.LAST_UPDATED_BY,
32     TL.CREATION_DATE,
33     TL.CREATED_BY,
34     TL.LAST_UPDATE_LOGIN
35   from  FND_LANGUAGES  L, MTL_CATEGORY_SETS_TL TL
36   where  L.INSTALLED_FLAG in ('I', 'B')
37     and  TL.CATEGORY_SET_ID = X_CATEGORY_SET_ID
38     and  not exists
39          ( select NULL
40            from  MTL_CATEGORY_SETS_TL T
41            where  T.CATEGORY_SET_ID = X_CATEGORY_SET_ID
42              and  T.LANGUAGE = L.LANGUAGE_CODE );
43 
44 end handle_catset_language_rows;
45 
46 
47 PROCEDURE handle_category_language_rows (
48   X_CATEGORY_ID in NUMBER
49 ) is
50 begin
51 
52   --insert new row in all installed languages in the TL table
53   --IF no rows in those installed languages already exist
54   insert into MTL_CATEGORIES_TL (
55     CATEGORY_ID,
56     LANGUAGE,
57     SOURCE_LANG,
58     DESCRIPTION,
59     LAST_UPDATE_DATE,
60     LAST_UPDATED_BY,
61     CREATION_DATE,
62     CREATED_BY,
63     LAST_UPDATE_LOGIN
64   ) select
65     X_CATEGORY_ID,
66     L.LANGUAGE_CODE,
67     TL.SOURCE_LANG,
68     TL.DESCRIPTION,
69     TL.LAST_UPDATE_DATE,
70     TL.LAST_UPDATED_BY,
71     TL.CREATION_DATE,
72     TL.CREATED_BY,
73     TL.LAST_UPDATE_LOGIN
74   from  FND_LANGUAGES  L, MTL_CATEGORIES_TL TL
75   where  L.INSTALLED_FLAG in ('I', 'B')
76     and TL.CATEGORY_ID = X_CATEGORY_ID
77     and  not exists
78          ( select NULL
79            from  MTL_CATEGORIES_TL  T
80            where  T.CATEGORY_ID = X_CATEGORY_ID
81              and  T.LANGUAGE = L.LANGUAGE_CODE );
82 
83 end handle_category_language_rows;
84 
85 
86 PROCEDURE handle_catgroup_language_rows (
87   X_ITEM_CATALOG_GROUP_ID in NUMBER
88 ) is
89 begin
90 
91   --insert new row in all installed languages in the TL table
92   --IF no rows in those installed languages already exist
93   insert into MTL_ITEM_CATALOG_GROUPS_TL (
94     ITEM_CATALOG_GROUP_ID,
95     LANGUAGE,
96     SOURCE_LANG,
97     DESCRIPTION,
98     LAST_UPDATE_DATE,
99     LAST_UPDATED_BY,
100     CREATION_DATE,
101     CREATED_BY,
102     LAST_UPDATE_LOGIN
103   ) select
104     X_ITEM_CATALOG_GROUP_ID,
105     L.LANGUAGE_CODE,
106     TL.SOURCE_LANG,
107     TL.DESCRIPTION,
108     TL.LAST_UPDATE_DATE,
109     TL.LAST_UPDATED_BY,
110     TL.CREATION_DATE,
111     TL.CREATED_BY,
112     TL.LAST_UPDATE_LOGIN
113   from  FND_LANGUAGES  L, MTL_ITEM_CATALOG_GROUPS_TL TL
114   where  L.INSTALLED_FLAG in ('I', 'B')
115     and TL.ITEM_CATALOG_GROUP_ID = X_ITEM_CATALOG_GROUP_ID
116     and  not exists
117          ( select NULL
118            from  MTL_ITEM_CATALOG_GROUPS_TL  T
119            where  T.ITEM_CATALOG_GROUP_ID = X_ITEM_CATALOG_GROUP_ID
120              and  T.LANGUAGE = L.LANGUAGE_CODE );
121 
122 end handle_catgroup_language_rows;
123 
124 
125 end EGO_TL_LANG_ENABLE_PUB;