60: X_UTF8_DATE_LANGUAGE,
61: X_ISO_LANGUAGE_3
62: );
63:
64: insert into FND_LANGUAGES_TL (
65: LANGUAGE_CODE,
66: DESCRIPTION,
67: CREATED_BY,
68: CREATION_DATE,
84: from FND_LANGUAGES L
85: where L.INSTALLED_FLAG in ('I', 'B')
86: and not exists
87: (select NULL
88: from FND_LANGUAGES_TL T
89: where T.LANGUAGE_CODE = X_LANGUAGE_CODE
90: and T.LANGUAGE = L.LANGUAGE_CODE);
91:
92: open c;
124: recinfo c%rowtype;
125:
126: cursor c1 is select
127: DESCRIPTION
128: from FND_LANGUAGES_TL
129: where LANGUAGE_CODE = X_LANGUAGE_CODE
130: and LANGUAGE = userenv('LANG')
131: for update of LANGUAGE_CODE nowait;
132: tlinfo c1%rowtype;
214: if (sql%notfound) then
215: raise no_data_found;
216: end if;
217:
218: update FND_LANGUAGES_TL set
219: DESCRIPTION = X_DESCRIPTION,
220: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
221: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
222: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
239: if (sql%notfound) then
240: raise no_data_found;
241: end if;
242:
243: delete from FND_LANGUAGES_TL
244: where LANGUAGE_CODE = X_LANGUAGE_CODE;
245:
246: if (sql%notfound) then
247: raise no_data_found;
256: /* as a quick workaround to fix the time-consuming table handler issue */
257: /* Eventually we'll need to turn them into a separate fix_language procedure */
258: /*
259:
260: delete from FND_LANGUAGES_TL T
261: where not exists
262: (select NULL
263: from FND_LANGUAGES B
264: where B.LANGUAGE_CODE = T.LANGUAGE_CODE
263: from FND_LANGUAGES B
264: where B.LANGUAGE_CODE = T.LANGUAGE_CODE
265: );
266:
267: update FND_LANGUAGES_TL T set (
268: DESCRIPTION
269: ) = (select
270: B.DESCRIPTION
271: from FND_LANGUAGES_TL B
267: update FND_LANGUAGES_TL T set (
268: DESCRIPTION
269: ) = (select
270: B.DESCRIPTION
271: from FND_LANGUAGES_TL B
272: where B.LANGUAGE_CODE = T.LANGUAGE_CODE
273: and B.LANGUAGE = T.SOURCE_LANG)
274: where (
275: T.LANGUAGE_CODE,
276: T.LANGUAGE
277: ) in (select
278: SUBT.LANGUAGE_CODE,
279: SUBT.LANGUAGE
280: from FND_LANGUAGES_TL SUBB, FND_LANGUAGES_TL SUBT
281: where SUBB.LANGUAGE_CODE = SUBT.LANGUAGE_CODE
282: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
283: and (SUBB.DESCRIPTION <> SUBT.DESCRIPTION
284: ));
283: and (SUBB.DESCRIPTION <> SUBT.DESCRIPTION
284: ));
285: */
286:
287: insert into FND_LANGUAGES_TL (
288: LANGUAGE_CODE,
289: DESCRIPTION,
290: CREATED_BY,
291: CREATION_DATE,
303: B.LAST_UPDATE_DATE,
304: B.LAST_UPDATE_LOGIN,
305: L.LANGUAGE_CODE,
306: B.SOURCE_LANG
307: from FND_LANGUAGES_TL B, FND_LANGUAGES L
308: where L.INSTALLED_FLAG in ('I', 'B')
309: and B.LANGUAGE = userenv('LANG')
310: and not exists
311: (select NULL
308: where L.INSTALLED_FLAG in ('I', 'B')
309: and B.LANGUAGE = userenv('LANG')
310: and not exists
311: (select NULL
312: from FND_LANGUAGES_TL T
313: where T.LANGUAGE_CODE = B.LANGUAGE_CODE
314: and T.LANGUAGE = L.LANGUAGE_CODE);
315: end ADD_LANGUAGE;
316:
416:
417: begin
418: select last_updated_by, last_update_date
419: into db_luby, db_ludate
420: from fnd_languages_tl
421: where language_code = X_LANGUAGE_CODE
422: and language = userenv('LANG');
423:
424: if (fnd_load_util.upload_test(f_luby, f_ludate, db_luby,
422: and language = userenv('LANG');
423:
424: if (fnd_load_util.upload_test(f_luby, f_ludate, db_luby,
425: db_ludate, X_CUSTOM_MODE)) then
426: update FND_LANGUAGES_TL set
427: DESCRIPTION = X_DESCRIPTION,
428: LAST_UPDATE_DATE = f_ludate,
429: LAST_UPDATED_BY = f_luby,
430: LAST_UPDATE_LOGIN = 0,