[Home] [Help]
50: X_LAST_UPDATED_BY,
51: X_LAST_UPDATE_LOGIN
52: );
53:
54: insert into BNE_PARAM_GROUPS_TL (
55: APPLICATION_ID,
56: PARAM_LIST_CODE,
57: SEQUENCE_NUM,
58: USER_NAME,
78: from FND_LANGUAGES L
79: where L.INSTALLED_FLAG in ('I', 'B')
80: and not exists
81: (select NULL
82: from BNE_PARAM_GROUPS_TL T
83: where T.APPLICATION_ID = X_APPLICATION_ID
84: and T.PARAM_LIST_CODE = X_PARAM_LIST_CODE
85: and T.SEQUENCE_NUM = X_SEQUENCE_NUM
86: and T.LANGUAGE = L.LANGUAGE_CODE);
119:
120: cursor c1 is select
121: USER_NAME,
122: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
123: from BNE_PARAM_GROUPS_TL
124: where APPLICATION_ID = X_APPLICATION_ID
125: and PARAM_LIST_CODE = X_PARAM_LIST_CODE
126: and SEQUENCE_NUM = X_SEQUENCE_NUM
127: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
192: if (sql%notfound) then
193: raise no_data_found;
194: end if;
195:
196: update BNE_PARAM_GROUPS_TL set
197: USER_NAME = X_USER_NAME,
198: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
199: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
200: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
214: X_PARAM_LIST_CODE in VARCHAR2,
215: X_SEQUENCE_NUM in NUMBER
216: ) is
217: begin
218: delete from BNE_PARAM_GROUPS_TL
219: where APPLICATION_ID = X_APPLICATION_ID
220: and PARAM_LIST_CODE = X_PARAM_LIST_CODE
221: and SEQUENCE_NUM = X_SEQUENCE_NUM;
222:
236:
237: procedure ADD_LANGUAGE
238: is
239: begin
240: delete from BNE_PARAM_GROUPS_TL T
241: where not exists
242: (select NULL
243: from BNE_PARAM_GROUPS_B B
244: where B.APPLICATION_ID = T.APPLICATION_ID
245: and B.PARAM_LIST_CODE = T.PARAM_LIST_CODE
246: and B.SEQUENCE_NUM = T.SEQUENCE_NUM
247: );
248:
249: update BNE_PARAM_GROUPS_TL T set (
250: USER_NAME
251: ) = (select
252: B.USER_NAME
253: from BNE_PARAM_GROUPS_TL B
249: update BNE_PARAM_GROUPS_TL T set (
250: USER_NAME
251: ) = (select
252: B.USER_NAME
253: from BNE_PARAM_GROUPS_TL B
254: where B.APPLICATION_ID = T.APPLICATION_ID
255: and B.PARAM_LIST_CODE = T.PARAM_LIST_CODE
256: and B.SEQUENCE_NUM = T.SEQUENCE_NUM
257: and B.LANGUAGE = T.SOURCE_LANG)
264: SUBT.APPLICATION_ID,
265: SUBT.PARAM_LIST_CODE,
266: SUBT.SEQUENCE_NUM,
267: SUBT.LANGUAGE
268: from BNE_PARAM_GROUPS_TL SUBB, BNE_PARAM_GROUPS_TL SUBT
269: where SUBB.APPLICATION_ID = SUBT.APPLICATION_ID
270: and SUBB.PARAM_LIST_CODE = SUBT.PARAM_LIST_CODE
271: and SUBB.SEQUENCE_NUM = SUBT.SEQUENCE_NUM
272: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
272: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
273: and (SUBB.USER_NAME <> SUBT.USER_NAME
274: ));
275:
276: insert into BNE_PARAM_GROUPS_TL (
277: APPLICATION_ID,
278: PARAM_LIST_CODE,
279: SEQUENCE_NUM,
280: USER_NAME,
296: B.LAST_UPDATE_DATE,
297: B.LAST_UPDATE_LOGIN,
298: L.LANGUAGE_CODE,
299: B.SOURCE_LANG
300: from BNE_PARAM_GROUPS_TL B, FND_LANGUAGES L
301: where L.INSTALLED_FLAG in ('I', 'B')
302: and B.LANGUAGE = userenv('LANG')
303: and not exists
304: (select NULL
301: where L.INSTALLED_FLAG in ('I', 'B')
302: and B.LANGUAGE = userenv('LANG')
303: and not exists
304: (select NULL
305: from BNE_PARAM_GROUPS_TL T
306: where T.APPLICATION_ID = B.APPLICATION_ID
307: and T.PARAM_LIST_CODE = B.PARAM_LIST_CODE
308: and T.SEQUENCE_NUM = B.SEQUENCE_NUM
309: and T.LANGUAGE = L.LANGUAGE_CODE);
348: f_ludate := nvl(to_date(x_last_update_date, 'YYYY/MM/DD'), sysdate);
349: begin
350: select LAST_UPDATED_BY, LAST_UPDATE_DATE
351: into db_luby, db_ludate
352: from BNE_PARAM_GROUPS_TL
353: where APPLICATION_ID = l_app_id
354: and PARAM_LIST_CODE = x_param_list_code
355: and SEQUENCE_NUM = x_sequence_num
356: and LANGUAGE = userenv('LANG');
358: -- Test for customization and version
359: if (fnd_load_util.upload_test(f_luby, f_ludate, db_luby,
360: db_ludate, x_custom_mode)) then
361:
362: update BNE_PARAM_GROUPS_TL
363: set USER_NAME = x_user_name,
364: LAST_UPDATE_DATE = f_ludate,
365: LAST_UPDATED_BY = f_luby,
366: LAST_UPDATE_LOGIN = 0,