[Home] [Help]
101: X_DSCRAM_LEVEL,
102: X_DSCRAM_ALGO_ID
103: );
104:
105: insert into FND_COL_PRIV_ATTRIBUTES_TL (
106: PRIVACY_ATTRIBUTE_CODE,
107: APPLICATION_ID,
108: TABLE_ID,
109: COLUMN_ID,
131: from FND_LANGUAGES L
132: where L.INSTALLED_FLAG in ('I', 'B')
133: and not exists
134: (select NULL
135: from FND_COL_PRIV_ATTRIBUTES_TL T
136: where T.PRIVACY_ATTRIBUTE_CODE = X_PRIVACY_ATTRIBUTE_CODE
137: and T.APPLICATION_ID = X_APPLICATION_ID
138: and T.TABLE_ID = X_TABLE_ID
139: and T.COLUMN_ID = X_COLUMN_ID
207:
208: cursor c1 is select
209: COMMENTS,
210: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
211: from FND_COL_PRIV_ATTRIBUTES_TL
212: where PRIVACY_ATTRIBUTE_CODE = X_PRIVACY_ATTRIBUTE_CODE
213: and APPLICATION_ID = X_APPLICATION_ID
214: and TABLE_ID = X_TABLE_ID
215: and COLUMN_ID = X_COLUMN_ID
347: if (sql%notfound) then
348: raise no_data_found;
349: end if;
350:
351: update FND_COL_PRIV_ATTRIBUTES_TL set
352: COMMENTS = X_COMMENTS,
353: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
354: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
355: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
371: X_TABLE_ID in NUMBER,
372: X_COLUMN_ID in NUMBER
373: ) is
374: begin
375: delete from FND_COL_PRIV_ATTRIBUTES_TL
376: where PRIVACY_ATTRIBUTE_CODE = X_PRIVACY_ATTRIBUTE_CODE
377: and APPLICATION_ID = X_APPLICATION_ID
378: and TABLE_ID = X_TABLE_ID
379: and COLUMN_ID = X_COLUMN_ID;
395:
396: procedure ADD_LANGUAGE
397: is
398: begin
399: delete from FND_COL_PRIV_ATTRIBUTES_TL T
400: where not exists
401: (select NULL
402: from FND_COL_PRIV_ATTRIBUTES_B B
403: where B.PRIVACY_ATTRIBUTE_CODE = T.PRIVACY_ATTRIBUTE_CODE
405: and B.TABLE_ID = T.TABLE_ID
406: and B.COLUMN_ID = T.COLUMN_ID
407: );
408:
409: update FND_COL_PRIV_ATTRIBUTES_TL T set (
410: COMMENTS
411: ) = (select
412: B.COMMENTS
413: from FND_COL_PRIV_ATTRIBUTES_TL B
409: update FND_COL_PRIV_ATTRIBUTES_TL T set (
410: COMMENTS
411: ) = (select
412: B.COMMENTS
413: from FND_COL_PRIV_ATTRIBUTES_TL B
414: where B.PRIVACY_ATTRIBUTE_CODE = T.PRIVACY_ATTRIBUTE_CODE
415: and B.APPLICATION_ID = T.APPLICATION_ID
416: and B.TABLE_ID = T.TABLE_ID
417: and B.COLUMN_ID = T.COLUMN_ID
427: SUBT.APPLICATION_ID,
428: SUBT.TABLE_ID,
429: SUBT.COLUMN_ID,
430: SUBT.LANGUAGE
431: from FND_COL_PRIV_ATTRIBUTES_TL SUBB, FND_COL_PRIV_ATTRIBUTES_TL SUBT
432: where SUBB.PRIVACY_ATTRIBUTE_CODE = SUBT.PRIVACY_ATTRIBUTE_CODE
433: and SUBB.APPLICATION_ID = SUBT.APPLICATION_ID
434: and SUBB.TABLE_ID = SUBT.TABLE_ID
435: and SUBB.COLUMN_ID = SUBT.COLUMN_ID
438: or (SUBB.COMMENTS is null and SUBT.COMMENTS is not null)
439: or (SUBB.COMMENTS is not null and SUBT.COMMENTS is null)
440: ));
441:
442: insert into FND_COL_PRIV_ATTRIBUTES_TL (
443: PRIVACY_ATTRIBUTE_CODE,
444: APPLICATION_ID,
445: TABLE_ID,
446: COLUMN_ID,
464: B.LAST_UPDATE_DATE,
465: B.LAST_UPDATE_LOGIN,
466: L.LANGUAGE_CODE,
467: B.SOURCE_LANG
468: from FND_COL_PRIV_ATTRIBUTES_TL B, FND_LANGUAGES L
469: where L.INSTALLED_FLAG in ('I', 'B')
470: and B.LANGUAGE = userenv('LANG')
471: and not exists
472: (select NULL
469: where L.INSTALLED_FLAG in ('I', 'B')
470: and B.LANGUAGE = userenv('LANG')
471: and not exists
472: (select NULL
473: from FND_COL_PRIV_ATTRIBUTES_TL T
474: where T.PRIVACY_ATTRIBUTE_CODE = B.PRIVACY_ATTRIBUTE_CODE
475: and T.APPLICATION_ID = B.APPLICATION_ID
476: and T.TABLE_ID = B.TABLE_ID
477: and T.COLUMN_ID = B.COLUMN_ID
490: is
491:
492: BEGIN
493:
494: UPDATE FND_COL_PRIV_ATTRIBUTES_TL SET
495: comments = nvl(x_comments,comments),
496: last_update_date = nvl(x_last_update_date,sysdate),
497: last_updated_by = x_last_updated_by,
498: last_update_login = 0,