97: X_LAST_UPDATED_BY,
98: X_LAST_UPDATE_LOGIN
99: );
100:
101: insert into FUN_TRX_TYPES_TL (
102: TRX_TYPE_ID,
103: TRX_TYPE_NAME,
104: DESCRIPTION,
105: CREATED_BY,
123: from FND_LANGUAGES L
124: where L.INSTALLED_FLAG in ('I', 'B')
125: and not exists
126: (select NULL
127: from FUN_TRX_TYPES_TL T
128: where T.TRX_TYPE_ID = X_TRX_TYPE_ID
129: and T.LANGUAGE = L.LANGUAGE_CODE);
130:
131: open c;
196: cursor c1 is select
197: TRX_TYPE_NAME,
198: DESCRIPTION,
199: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
200: from FUN_TRX_TYPES_TL
201: where TRX_TYPE_ID = X_TRX_TYPE_ID
202: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
203: for update of TRX_TYPE_ID nowait;
204: begin
339: if (sql%notfound) then
340: raise no_data_found;
341: end if;
342:
343: update FUN_TRX_TYPES_TL set
344: TRX_TYPE_NAME = X_TRX_TYPE_NAME,
345: DESCRIPTION = X_DESCRIPTION,
346: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
347: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
358: procedure DELETE_ROW (
359: X_TRX_TYPE_ID in NUMBER
360: ) is
361: begin
362: delete from FUN_TRX_TYPES_TL
363: where TRX_TYPE_ID = X_TRX_TYPE_ID;
364:
365: if (sql%notfound) then
366: raise no_data_found;
376:
377: procedure ADD_LANGUAGE
378: is
379: begin
380: delete from FUN_TRX_TYPES_TL T
381: where not exists
382: (select NULL
383: from FUN_TRX_TYPES_B B
384: where B.TRX_TYPE_ID = T.TRX_TYPE_ID
383: from FUN_TRX_TYPES_B B
384: where B.TRX_TYPE_ID = T.TRX_TYPE_ID
385: );
386:
387: update FUN_TRX_TYPES_TL T set (
388: TRX_TYPE_NAME,
389: DESCRIPTION
390: ) = (select
391: B.TRX_TYPE_NAME,
389: DESCRIPTION
390: ) = (select
391: B.TRX_TYPE_NAME,
392: B.DESCRIPTION
393: from FUN_TRX_TYPES_TL B
394: where B.TRX_TYPE_ID = T.TRX_TYPE_ID
395: and B.LANGUAGE = T.SOURCE_LANG)
396: where (
397: T.TRX_TYPE_ID,
398: T.LANGUAGE
399: ) in (select
400: SUBT.TRX_TYPE_ID,
401: SUBT.LANGUAGE
402: from FUN_TRX_TYPES_TL SUBB, FUN_TRX_TYPES_TL SUBT
403: where SUBB.TRX_TYPE_ID = SUBT.TRX_TYPE_ID
404: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
405: and (SUBB.TRX_TYPE_NAME <> SUBT.TRX_TYPE_NAME
406: or (SUBB.TRX_TYPE_NAME is null and SUBT.TRX_TYPE_NAME is not null)
409: or (SUBB.DESCRIPTION is null and SUBT.DESCRIPTION is not null)
410: or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
411: ));
412:
413: insert into FUN_TRX_TYPES_TL (
414: TRX_TYPE_ID,
415: TRX_TYPE_NAME,
416: DESCRIPTION,
417: CREATED_BY,
431: B.LAST_UPDATE_DATE,
432: B.LAST_UPDATE_LOGIN,
433: L.LANGUAGE_CODE,
434: B.SOURCE_LANG
435: from FUN_TRX_TYPES_TL B, FND_LANGUAGES L
436: where L.INSTALLED_FLAG in ('I', 'B')
437: and B.LANGUAGE = userenv('LANG')
438: and not exists
439: (select NULL
436: where L.INSTALLED_FLAG in ('I', 'B')
437: and B.LANGUAGE = userenv('LANG')
438: and not exists
439: (select NULL
440: from FUN_TRX_TYPES_TL T
441: where T.TRX_TYPE_ID = B.TRX_TYPE_ID
442: and T.LANGUAGE = L.LANGUAGE_CODE);
443: end ADD_LANGUAGE;
444: