[Home] [Help]
59:
60: -- Added for Function Security Cache Invalidation Project.
61: fnd_function_security_cache.insert_menu_entry(X_MENU_ID, X_SUB_MENU_ID, X_FUNCTION_ID);
62:
63: insert into FND_MENU_ENTRIES_TL (
64: MENU_ID,
65: ENTRY_SEQUENCE,
66: LAST_UPDATE_DATE,
67: LAST_UPDATED_BY,
90: from FND_LANGUAGES L
91: where L.INSTALLED_FLAG in ('I', 'B')
92: and not exists
93: (select NULL
94: from FND_MENU_ENTRIES_TL T
95: where T.MENU_ID = X_MENU_ID
96: and T.ENTRY_SEQUENCE = X_ENTRY_SEQUENCE
97: and T.LANGUAGE = L.LANGUAGE_CODE);
98:
129:
130: cursor c1 is select
131: PROMPT,
132: DESCRIPTION
133: from FND_MENU_ENTRIES_TL
134: where MENU_ID = X_MENU_ID
135: and ENTRY_SEQUENCE = X_ENTRY_SEQUENCE
136: and LANGUAGE = userenv('LANG')
137: for update of MENU_ID nowait;
258: fnd_function_security_cache.update_menu_entry(X_MENU_ID, L_SUB_MENU_ID, L_FUNCTION_ID);
259: fnd_function_security_cache.update_menu_entry(X_MENU_ID, X_SUB_MENU_ID, X_FUNCTION_ID);
260: end if;
261:
262: update FND_MENU_ENTRIES_TL
263: set prompt = X_PROMPT,
264: DESCRIPTION = X_DESCRIPTION,
265: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
266: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
290: -- Bug 5579233. Commented WHO col's update during bumping.
291: -- This is becoz of the changes in fnd_load_util.upload_test() api in R12
292: -- which is now considering only LUD but not LUB to return TRUE/FALSE.
293: -- Complete details can be found in bug#5579233
294: update fnd_menu_entries_tl
295: set entry_sequence = entry_sequence + X_SHIFT_VALUE
296: --last_update_date = sysdate,
297: --last_updated_by = 1,
298: --last_update_login = 0
537: where menu_id = mnu_id;
538:
539: -- Delete orphaned rows from the TL table so they don't cause conflicts.
540: -- There shouldn't ever be any, but sometimes the best laid plans...
541: delete from fnd_menu_entries_tl
542: where menu_id = mnu_id
543: and entry_sequence >= shiftseq;
544:
545: if (v_mode = 'REPLACE_OVERWRITE') then
567:
568: -- Predelete any duplicate entries on this menu to avoid any
569: -- problems later. Theoretically duplicates are not allowed, this
570: -- is to fix problems with existing bad data in databases.
571: delete from FND_MENU_ENTRIES_TL T
572: where T.MENU_ID = mnu_id
573: and exists (select NULL
574: from FND_MENU_ENTRIES E1, FND_MENU_ENTRIES E2
575: where T.MENU_ID = E1.MENU_ID
602: -- Select this entry
603: select decode(e.entry_sequence, X_ENTRY_SEQUENCE, 'Y', 'N') seqmatch,
604: e.entry_sequence, e.last_updated_by, e.last_update_date
605: into eseqmatch, eseq, db_luby, db_ludate
606: from fnd_menu_entries e, fnd_menu_entries_tl t
607: where e.menu_id = mnu_id
608: and nvl(e.sub_menu_id, -1) = nvl(sub_mnu_id, -1)
609: and nvl(e.function_id, -1) = nvl(fun_id, -1)
610: and e.menu_id = t.menu_id
626:
627: fnd_menu_entries_pkg.bump_row(f_luby,shiftseq,X_ENTRY_SEQUENCE,mnu_id);
628:
629: -- Update sequence in tl
630: update fnd_menu_entries_tl
631: set entry_sequence = X_ENTRY_SEQUENCE,
632: last_update_date = f_ludate,
633: last_updated_by = f_luby,
634: last_update_login = 0
733: /* Bug 3227451 - Removed prompt and description change check.
734: The last_update_date of the tl table needs to be updated
735: when the upload test passes even if neither prompt nor
736: description have changed. */
737: update fnd_menu_entries_tl
738: set prompt = decode(X_PROMPT,
739: fnd_load_util.null_value, null,
740: null, prompt,
741: X_PROMPT),
834:
835: fnd_function_security_cache.delete_menu_entry(X_MENU_ID, l_sub_menu_id, l_function_id);
836: end if;
837:
838: delete from FND_MENU_ENTRIES_TL
839: where MENU_ID = X_MENU_ID
840: and ENTRY_SEQUENCE = X_ENTRY_SEQUENCE;
841:
842: if (sql%notfound) then
852: /* as a quick workaround to fix the time-consuming table handler issue */
853: /* Eventually we'll need to turn them into a separate fix_language procedure */
854: /*
855:
856: delete from FND_MENU_ENTRIES_TL T
857: where not exists
858: (select NULL
859: from FND_MENU_ENTRIES B
860: where B.MENU_ID = T.MENU_ID
860: where B.MENU_ID = T.MENU_ID
861: and B.ENTRY_SEQUENCE = T.ENTRY_SEQUENCE
862: );
863:
864: update FND_MENU_ENTRIES_TL T set (
865: PROMPT,
866: DESCRIPTION
867: ) = (select
868: B.PROMPT,
866: DESCRIPTION
867: ) = (select
868: B.PROMPT,
869: B.DESCRIPTION
870: from FND_MENU_ENTRIES_TL B
871: where B.MENU_ID = T.MENU_ID
872: and B.ENTRY_SEQUENCE = T.ENTRY_SEQUENCE
873: and B.LANGUAGE = T.SOURCE_LANG)
874: where (
878: ) in (select
879: SUBT.MENU_ID,
880: SUBT.ENTRY_SEQUENCE,
881: SUBT.LANGUAGE
882: from FND_MENU_ENTRIES_TL SUBB, FND_MENU_ENTRIES_TL SUBT
883: where SUBB.MENU_ID = SUBT.MENU_ID
884: and SUBB.ENTRY_SEQUENCE = SUBT.ENTRY_SEQUENCE
885: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
886: and (SUBB.PROMPT <> SUBT.PROMPT
891: or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
892: ));
893: */
894:
895: insert into FND_MENU_ENTRIES_TL (
896: MENU_ID,
897: ENTRY_SEQUENCE,
898: LAST_UPDATE_DATE,
899: LAST_UPDATED_BY,
915: B.PROMPT,
916: B.DESCRIPTION,
917: L.LANGUAGE_CODE,
918: B.SOURCE_LANG
919: from FND_MENU_ENTRIES_TL B, FND_LANGUAGES L
920: where L.INSTALLED_FLAG in ('I', 'B')
921: and B.LANGUAGE = userenv('LANG')
922: and not exists
923: (select NULL
920: where L.INSTALLED_FLAG in ('I', 'B')
921: and B.LANGUAGE = userenv('LANG')
922: and not exists
923: (select NULL
924: from FND_MENU_ENTRIES_TL T
925: where T.MENU_ID = B.MENU_ID
926: and T.ENTRY_SEQUENCE = B.ENTRY_SEQUENCE
927: and T.LANGUAGE = L.LANGUAGE_CODE);
928: end ADD_LANGUAGE;
981: f_ludate := nvl(to_date(x_last_update_date, 'YYYY/MM/DD'), sysdate);
982:
983: select LAST_UPDATED_BY, LAST_UPDATE_DATE
984: into db_luby, db_ludate
985: from FND_MENU_ENTRIES_TL
986: where MENU_ID = X_MENU_ID
987: and ENTRY_SEQUENCE = ent_seq
988: and userenv('LANG') = LANGUAGE;
989:
988: and userenv('LANG') = LANGUAGE;
989:
990: if (fnd_load_util.upload_test(f_luby, f_ludate, db_luby,
991: db_ludate, X_CUSTOM_MODE)) then
992: update FND_MENU_ENTRIES_TL
993: set prompt = decode(X_PROMPT,
994: fnd_load_util.null_value, null,
995: null, prompt,
996: X_PROMPT),