66: X_LAST_UPDATED_BY,
67: X_LAST_UPDATE_LOGIN
68: );
69:
70: insert into XNP_MSG_TYPES_TL (
71: MSG_CODE,
72: DISPLAY_NAME,
73: DESCRIPTION,
74: CREATED_BY,
92: from FND_LANGUAGES L
93: where L.INSTALLED_FLAG in ('I', 'B')
94: and not exists
95: (select NULL
96: from XNP_MSG_TYPES_TL T
97: where T.MSG_CODE = X_MSG_CODE
98: and T.LANGUAGE = L.LANGUAGE_CODE);
99:
100: open c;
145: cursor c1 is select
146: DISPLAY_NAME,
147: DESCRIPTION,
148: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
149: from XNP_MSG_TYPES_TL
150: where MSG_CODE = X_MSG_CODE
151: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
152: for update of MSG_CODE nowait;
153: begin
243: if (sql%notfound) then
244: raise no_data_found;
245: end if;
246:
247: update XNP_MSG_TYPES_TL set
248: DISPLAY_NAME = X_DISPLAY_NAME,
249: DESCRIPTION = X_DESCRIPTION,
250: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
251: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
262: procedure DELETE_ROW (
263: X_MSG_CODE in VARCHAR2
264: ) is
265: begin
266: delete from XNP_MSG_TYPES_TL
267: where MSG_CODE = X_MSG_CODE;
268:
269: if (sql%notfound) then
270: raise no_data_found;
280:
281: procedure ADD_LANGUAGE
282: is
283: begin
284: delete from XNP_MSG_TYPES_TL T
285: where not exists
286: (select NULL
287: from XNP_MSG_TYPES_B B
288: where B.MSG_CODE = T.MSG_CODE
287: from XNP_MSG_TYPES_B B
288: where B.MSG_CODE = T.MSG_CODE
289: );
290:
291: update XNP_MSG_TYPES_TL T set (
292: DISPLAY_NAME,
293: DESCRIPTION
294: ) = (select
295: B.DISPLAY_NAME,
293: DESCRIPTION
294: ) = (select
295: B.DISPLAY_NAME,
296: B.DESCRIPTION
297: from XNP_MSG_TYPES_TL B
298: where B.MSG_CODE = T.MSG_CODE
299: and B.LANGUAGE = T.SOURCE_LANG)
300: where (
301: T.MSG_CODE,
302: T.LANGUAGE
303: ) in (select
304: SUBT.MSG_CODE,
305: SUBT.LANGUAGE
306: from XNP_MSG_TYPES_TL SUBB, XNP_MSG_TYPES_TL SUBT
307: where SUBB.MSG_CODE = SUBT.MSG_CODE
308: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
309: and (SUBB.DISPLAY_NAME <> SUBT.DISPLAY_NAME
310: or SUBB.DESCRIPTION <> SUBT.DESCRIPTION
311: or (SUBB.DESCRIPTION is null and SUBT.DESCRIPTION is not null)
312: or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
313: ));
314:
315: insert into XNP_MSG_TYPES_TL (
316: MSG_CODE,
317: DISPLAY_NAME,
318: DESCRIPTION,
319: CREATED_BY,
333: B.LAST_UPDATE_DATE,
334: B.LAST_UPDATE_LOGIN,
335: L.LANGUAGE_CODE,
336: B.SOURCE_LANG
337: from XNP_MSG_TYPES_TL B, FND_LANGUAGES L
338: where L.INSTALLED_FLAG in ('I', 'B')
339: and B.LANGUAGE = userenv('LANG')
340: and not exists
341: (select NULL
338: where L.INSTALLED_FLAG in ('I', 'B')
339: and B.LANGUAGE = userenv('LANG')
340: and not exists
341: (select NULL
342: from XNP_MSG_TYPES_TL T
343: where T.MSG_CODE = B.MSG_CODE
344: and T.LANGUAGE = L.LANGUAGE_CODE);
345: end ADD_LANGUAGE;
346:
425: X_DESCRIPTION in VARCHAR2,
426: X_OWNER in VARCHAR2) IS
427: BEGIN
428: -- Only update rows which have not been altered by user
429: UPDATE XNP_MSG_TYPES_TL
430: SET description = X_DESCRIPTION,
431: display_name = X_DISPLAY_NAME,
432: source_lang = userenv('LANG'),
433: last_update_date = sysdate,