[Home] [Help]
18: X_OWNER IN VARCHAR2,
19: X_DISPLAY_LABEL IN VARCHAR2
20: ) IS
21: BEGIN
22: UPDATE CLN_CH_DISPLAY_LABELS_DTL_TL SET
23: GUID = X_GUID,
24: DISPLAY_LABEL= X_DISPLAY_LABEL,
25: LAST_UPDATE_DATE = sysdate,
26: LAST_UPDATED_BY = Decode(X_OWNER, 'SEED', 1, 0),
69: LAST_UPDATE_DATE=l_sysdate,
70: LAST_UPDATED_BY=l_user_id,
71: LAST_UPDATE_LOGIN=0
72: WHERE GUID= X_GUID and PARENT_GUID= X_PARENT_GUID;
73: UPDATE CLN_CH_DISPLAY_LABELS_DTL_TL SET
74: DISPLAY_LABEL=X_DISPLAY_LABEL,
75: LAST_UPDATE_DATE=l_sysdate,
76: LAST_UPDATED_BY=l_user_id,
77: LAST_UPDATE_LOGIN=0,
102: l_user_id,
103: l_sysdate,
104: l_user_id,
105: 0);
106: INSERT into CLN_CH_DISPLAY_LABELS_DTL_TL(
107: GUID,
108: DISPLAY_LABEL,
109: CREATION_DATE,
110: CREATED_BY,
125: userenv('LANG')
126: from FND_LANGUAGES L
127: where L.INSTALLED_FLAG in ('I','B') and not exists
128: (select NULL
129: from CLN_CH_DISPLAY_LABELS_DTL_TL T
130: where T.GUID = X_GUID
131: and T.LANGUAGE = L.LANGUAGE_CODE);
132: END IF;
133: close c;
181: X_LAST_UPDATED_BY,
182: X_LAST_UPDATE_LOGIN
183: );
184:
185: insert into CLN_CH_DISPLAY_LABELS_DTL_TL (
186: GUID,
187: DISPLAY_LABEL,
188: CREATION_DATE,
189: CREATED_BY,
205: from FND_LANGUAGES L
206: where L.INSTALLED_FLAG in ('I', 'B')
207: and not exists
208: (select NULL
209: from CLN_CH_DISPLAY_LABELS_DTL_TL T
210: where T.GUID = X_GUID
211: and T.LANGUAGE = L.LANGUAGE_CODE);
212:
213: open c;
242:
243: cursor c1 is select
244: DISPLAY_LABEL,
245: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
246: from CLN_CH_DISPLAY_LABELS_DTL_TL
247: where GUID = X_GUID
248: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
249: for update of GUID nowait;
250: begin
314: if (sql%notfound) then
315: raise no_data_found;
316: end if;
317:
318: update CLN_CH_DISPLAY_LABELS_DTL_TL set
319: DISPLAY_LABEL = X_DISPLAY_LABEL,
320: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
321: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
322: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
332: procedure DELETE_ROW (
333: X_GUID in RAW
334: ) is
335: begin
336: delete from CLN_CH_DISPLAY_LABELS_DTL_TL
337: where GUID = X_GUID;
338:
339: if (sql%notfound) then
340: raise no_data_found;
350:
351: procedure ADD_LANGUAGE
352: is
353: begin
354: delete from CLN_CH_DISPLAY_LABELS_DTL_TL T
355: where not exists
356: (select NULL
357: from CLN_CH_DISPLAY_LABELS_DTL_B B
358: where B.GUID = T.GUID
357: from CLN_CH_DISPLAY_LABELS_DTL_B B
358: where B.GUID = T.GUID
359: );
360:
361: update CLN_CH_DISPLAY_LABELS_DTL_TL T set (
362: DISPLAY_LABEL
363: ) = (select
364: B.DISPLAY_LABEL
365: from CLN_CH_DISPLAY_LABELS_DTL_TL B
361: update CLN_CH_DISPLAY_LABELS_DTL_TL T set (
362: DISPLAY_LABEL
363: ) = (select
364: B.DISPLAY_LABEL
365: from CLN_CH_DISPLAY_LABELS_DTL_TL B
366: where B.GUID = T.GUID
367: and B.LANGUAGE = T.SOURCE_LANG)
368: where (
369: T.GUID,
370: T.LANGUAGE
371: ) in (select
372: SUBT.GUID,
373: SUBT.LANGUAGE
374: from CLN_CH_DISPLAY_LABELS_DTL_TL SUBB, CLN_CH_DISPLAY_LABELS_DTL_TL SUBT
375: where SUBB.GUID = SUBT.GUID
376: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
377: and (SUBB.DISPLAY_LABEL <> SUBT.DISPLAY_LABEL
378: or (SUBB.DISPLAY_LABEL is null and SUBT.DISPLAY_LABEL is not null)
378: or (SUBB.DISPLAY_LABEL is null and SUBT.DISPLAY_LABEL is not null)
379: or (SUBB.DISPLAY_LABEL is not null and SUBT.DISPLAY_LABEL is null)
380: ));
381:
382: insert into CLN_CH_DISPLAY_LABELS_DTL_TL (
383: GUID,
384: DISPLAY_LABEL,
385: CREATION_DATE,
386: CREATED_BY,
398: B.LAST_UPDATED_BY,
399: B.LAST_UPDATE_LOGIN,
400: L.LANGUAGE_CODE,
401: B.SOURCE_LANG
402: from CLN_CH_DISPLAY_LABELS_DTL_TL B, FND_LANGUAGES L
403: where L.INSTALLED_FLAG in ('I', 'B')
404: and B.LANGUAGE = userenv('LANG')
405: and not exists
406: (select NULL
403: where L.INSTALLED_FLAG in ('I', 'B')
404: and B.LANGUAGE = userenv('LANG')
405: and not exists
406: (select NULL
407: from CLN_CH_DISPLAY_LABELS_DTL_TL T
408: where T.GUID = B.GUID
409: and T.LANGUAGE = L.LANGUAGE_CODE);
410: end ADD_LANGUAGE;
411: