63: X_LAST_UPDATED_BY,
64: X_LAST_UPDATE_LOGIN
65: );
66:
67: insert into IEB_SERVICE_LEVELS_TL (
68: SERVICE_LEVEL_ID,
69: CREATED_BY,
70: CREATION_DATE,
71: LAST_UPDATED_BY,
93: from FND_LANGUAGES L
94: where L.INSTALLED_FLAG in ('I', 'B')
95: and not exists
96: (select NULL
97: from IEB_SERVICE_LEVELS_TL T
98: where T.SERVICE_LEVEL_ID = X_SERVICE_LEVEL_ID
99: and T.SERVICE_LEVEL_ID = X_SERVICE_LEVEL_ID
100: and T.LANGUAGE = L.LANGUAGE_CODE);
101:
146: cursor c1 is select
147: LEVEL_NAME,
148: DESCRIPTION,
149: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
150: from IEB_SERVICE_LEVELS_TL
151: where SERVICE_LEVEL_ID = X_SERVICE_LEVEL_ID
152: and SERVICE_LEVEL_ID = X_SERVICE_LEVEL_ID
153: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
154: for update of SERVICE_LEVEL_ID nowait;
246: if (sql%notfound) then
247: raise no_data_found;
248: end if;
249:
250: update IEB_SERVICE_LEVELS_TL set
251: LEVEL_NAME = X_LEVEL_NAME,
252: DESCRIPTION = X_DESCRIPTION,
253: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
254: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
266: procedure DELETE_ROW (
267: X_SERVICE_LEVEL_ID in NUMBER
268: ) is
269: begin
270: delete from IEB_SERVICE_LEVELS_TL
271: where SERVICE_LEVEL_ID = X_SERVICE_LEVEL_ID;
272:
273: if (sql%notfound) then
274: raise no_data_found;
406: BEGIN
407:
408: user_id := fnd_load_util.owner_id(X_OWNER);
409:
410: UPDATE ieb_service_levels_tl
411: SET
412: last_update_date=sysdate
413: , last_updated_by=user_id
414: , last_update_login=1
426:
427: procedure ADD_LANGUAGE
428: is
429: begin
430: delete from IEB_SERVICE_LEVELS_TL T
431: where not exists
432: (select NULL
433: from IEB_SERVICE_LEVELS_B B
434: where B.SERVICE_LEVEL_ID = T.SERVICE_LEVEL_ID
434: where B.SERVICE_LEVEL_ID = T.SERVICE_LEVEL_ID
435: and B.SERVICE_LEVEL_ID = T.SERVICE_LEVEL_ID
436: );
437:
438: update IEB_SERVICE_LEVELS_TL T set (
439: LEVEL_NAME,
440: DESCRIPTION
441: ) = (select
442: B.LEVEL_NAME,
440: DESCRIPTION
441: ) = (select
442: B.LEVEL_NAME,
443: B.DESCRIPTION
444: from IEB_SERVICE_LEVELS_TL B
445: where B.SERVICE_LEVEL_ID = T.SERVICE_LEVEL_ID
446: and B.SERVICE_LEVEL_ID = T.SERVICE_LEVEL_ID
447: and B.LANGUAGE = T.SOURCE_LANG)
448: where (
452: ) in (select
453: SUBT.SERVICE_LEVEL_ID,
454: SUBT.SERVICE_LEVEL_ID,
455: SUBT.LANGUAGE
456: from IEB_SERVICE_LEVELS_TL SUBB, IEB_SERVICE_LEVELS_TL SUBT
457: where SUBB.SERVICE_LEVEL_ID = SUBT.SERVICE_LEVEL_ID
458: and SUBB.SERVICE_LEVEL_ID = SUBT.SERVICE_LEVEL_ID
459: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
460: and (SUBB.LEVEL_NAME <> SUBT.LEVEL_NAME
462: or (SUBB.DESCRIPTION is null and SUBT.DESCRIPTION is not null)
463: or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
464: ));
465:
466: insert into IEB_SERVICE_LEVELS_TL (
467: SERVICE_LEVEL_ID,
468: CREATED_BY,
469: CREATION_DATE,
470: LAST_UPDATED_BY,
488: B.OBJECT_VERSION_NUMBER,
489: B.SECURITY_GROUP_ID,
490: L.LANGUAGE_CODE,
491: B.SOURCE_LANG
492: from IEB_SERVICE_LEVELS_TL B, FND_LANGUAGES L
493: where L.INSTALLED_FLAG in ('I', 'B')
494: and B.LANGUAGE = userenv('LANG')
495: and not exists
496: (select NULL
493: where L.INSTALLED_FLAG in ('I', 'B')
494: and B.LANGUAGE = userenv('LANG')
495: and not exists
496: (select NULL
497: from IEB_SERVICE_LEVELS_TL T
498: where T.SERVICE_LEVEL_ID = B.SERVICE_LEVEL_ID
499: and T.SERVICE_LEVEL_ID = B.SERVICE_LEVEL_ID
500: and T.LANGUAGE = L.LANGUAGE_CODE);
501: end ADD_LANGUAGE;