38: P_LAST_UPDATED_BY,
39: P_LAST_UPDATE_LOGIN
40: );
41:
42: insert into XDO_CONFIG_PROPERTIES_TL (
43: PROPERTY_CODE,
44: PROPERTY_NAME,
45: CREATION_DATE,
46: CREATED_BY,
61: from FND_LANGUAGES L
62: where L.INSTALLED_FLAG in ('I', 'B')
63: and not exists
64: (select NULL
65: from XDO_CONFIG_PROPERTIES_TL T
66: where T.PROPERTY_CODE = P_PROPERTY_CODE
67: and T.LANGUAGE = L.LANGUAGE_CODE);
68:
69: end INSERT_ROW;
93: if (sql%notfound) then
94: raise no_data_found;
95: end if;
96:
97: update XDO_CONFIG_PROPERTIES_TL set
98: PROPERTY_NAME = P_PROPERTY_NAME,
99: LAST_UPDATE_DATE = P_LAST_UPDATE_DATE,
100: LAST_UPDATED_BY = P_LAST_UPDATED_BY,
101: LAST_UPDATE_LOGIN = P_LAST_UPDATE_LOGIN,
111:
112:
113: procedure ADD_LANGUAGE is
114: begin
115: insert into XDO_CONFIG_PROPERTIES_TL (
116: PROPERTY_CODE,
117: PROPERTY_NAME,
118: CREATED_BY,
119: CREATION_DATE,
131: B.LAST_UPDATE_DATE,
132: B.LAST_UPDATE_LOGIN,
133: L.LANGUAGE_CODE,
134: B.SOURCE_LANG
135: from XDO_CONFIG_PROPERTIES_TL B, FND_LANGUAGES L
136: where L.INSTALLED_FLAG in ('I', 'B')
137: and B.LANGUAGE = userenv('LANG')
138: and not exists
139: (select NULL
136: where L.INSTALLED_FLAG in ('I', 'B')
137: and B.LANGUAGE = userenv('LANG')
138: and not exists
139: (select NULL
140: from XDO_CONFIG_PROPERTIES_TL T
141: where T.PROPERTY_CODE = B.PROPERTY_CODE
142: and T.LANGUAGE = L.LANGUAGE_CODE);
143: end ADD_LANGUAGE;
144:
166:
167: begin
168: select LAST_UPDATED_BY, LAST_UPDATE_DATE
169: into db_luby, db_ludate
170: from XDO_CONFIG_PROPERTIES_TL
171: where PROPERTY_CODE = P_PROPERTY_CODE
172: and LANGUAGE = userenv('LANG');
173:
174: -- Update record, honoring customization mode.
182: p_db_id => db_luby,
183: p_db_lud => db_ludate,
184: p_custom_mode => p_custom_mode))
185: then
186: update XDO_CONFIG_PROPERTIES_TL
187: set PROPERTY_NAME = nvl(p_property_name, property_name),
188: SOURCE_LANG = userenv('LANG'),
189: LAST_UPDATE_DATE = f_ludate,
190: LAST_UPDATED_BY = f_luby,