[Home] [Help]
46: X_DIRECTIVE_APP_ID,
47: X_DIRECTIVE_CODE
48: );
49:
50: insert into BNE_QUERIES_TL (
51: APPLICATION_ID,
52: QUERY_CODE,
53: USER_NAME,
54: CREATED_BY,
72: from FND_LANGUAGES L
73: where L.INSTALLED_FLAG in ('I', 'B')
74: and not exists
75: (select NULL
76: from BNE_QUERIES_TL T
77: where T.APPLICATION_ID = X_APPLICATION_ID
78: and T.QUERY_CODE = X_QUERY_CODE
79: and T.LANGUAGE = L.LANGUAGE_CODE);
80:
110:
111: cursor c1 is select
112: USER_NAME,
113: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
114: from BNE_QUERIES_TL
115: where APPLICATION_ID = X_APPLICATION_ID
116: and QUERY_CODE = X_QUERY_CODE
117: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
118: for update of APPLICATION_ID nowait;
180: if (sql%notfound) then
181: raise no_data_found;
182: end if;
183:
184: update BNE_QUERIES_TL set
185: USER_NAME = X_USER_NAME,
186: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
187: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
188: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
200: X_APPLICATION_ID in NUMBER,
201: X_QUERY_CODE in VARCHAR2
202: ) is
203: begin
204: delete from BNE_QUERIES_TL
205: where APPLICATION_ID = X_APPLICATION_ID
206: and QUERY_CODE = X_QUERY_CODE;
207:
208: if (sql%notfound) then
220:
221: procedure ADD_LANGUAGE
222: is
223: begin
224: delete from BNE_QUERIES_TL T
225: where not exists
226: (select NULL
227: from BNE_QUERIES_B B
228: where B.APPLICATION_ID = T.APPLICATION_ID
228: where B.APPLICATION_ID = T.APPLICATION_ID
229: and B.QUERY_CODE = T.QUERY_CODE
230: );
231:
232: update BNE_QUERIES_TL T set (
233: USER_NAME
234: ) = (select
235: B.USER_NAME
236: from BNE_QUERIES_TL B
232: update BNE_QUERIES_TL T set (
233: USER_NAME
234: ) = (select
235: B.USER_NAME
236: from BNE_QUERIES_TL B
237: where B.APPLICATION_ID = T.APPLICATION_ID
238: and B.QUERY_CODE = T.QUERY_CODE
239: and B.LANGUAGE = T.SOURCE_LANG)
240: where (
244: ) in (select
245: SUBT.APPLICATION_ID,
246: SUBT.QUERY_CODE,
247: SUBT.LANGUAGE
248: from BNE_QUERIES_TL SUBB, BNE_QUERIES_TL SUBT
249: where SUBB.APPLICATION_ID = SUBT.APPLICATION_ID
250: and SUBB.QUERY_CODE = SUBT.QUERY_CODE
251: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
252: and (SUBB.USER_NAME <> SUBT.USER_NAME
253: or (SUBB.USER_NAME is null and SUBT.USER_NAME is not null)
254: or (SUBB.USER_NAME is not null and SUBT.USER_NAME is null)
255: ));
256:
257: insert into BNE_QUERIES_TL (
258: APPLICATION_ID,
259: QUERY_CODE,
260: USER_NAME,
261: CREATED_BY,
275: B.LAST_UPDATE_LOGIN,
276: B.LAST_UPDATE_DATE,
277: L.LANGUAGE_CODE,
278: B.SOURCE_LANG
279: from BNE_QUERIES_TL B, FND_LANGUAGES L
280: where L.INSTALLED_FLAG in ('I', 'B')
281: and B.LANGUAGE = userenv('LANG')
282: and not exists
283: (select NULL
280: where L.INSTALLED_FLAG in ('I', 'B')
281: and B.LANGUAGE = userenv('LANG')
282: and not exists
283: (select NULL
284: from BNE_QUERIES_TL T
285: where T.APPLICATION_ID = B.APPLICATION_ID
286: and T.QUERY_CODE = B.QUERY_CODE
287: and T.LANGUAGE = L.LANGUAGE_CODE);
288: end ADD_LANGUAGE;
326: f_ludate := nvl(to_date(x_last_update_date, 'YYYY/MM/DD'), sysdate);
327: begin
328: select LAST_UPDATED_BY, LAST_UPDATE_DATE
329: into db_luby, db_ludate
330: from BNE_QUERIES_TL
331: where APPLICATION_ID = l_app_id
332: and QUERY_CODE = x_query_code
333: and LANGUAGE = userenv('LANG');
334:
335: -- Test for customization and version
336: if (fnd_load_util.upload_test(f_luby, f_ludate, db_luby,
337: db_ludate, x_custom_mode)) then
338:
339: update BNE_QUERIES_TL
340: set USER_NAME = x_user_name,
341: LAST_UPDATE_DATE = f_ludate,
342: LAST_UPDATED_BY = f_luby,
343: LAST_UPDATE_LOGIN = 0,