1 PACKAGE jtf_menu_pub AS
2 /* $Header: jtfmenus.pls 120.2 2005/10/25 05:22:46 psanyal ship $ */
3 /* this is test version 'sql5.1' */
4
5 TYPE menu_responsibility is record(
6 responsibility_id number
7 , responsibility_name fnd_responsibility_vl.responsibility_name%type -- varchar2(100)
8 );
9
10 TYPE root_menu_data is record (
11 menu_id number
12 , menu_name fnd_menus_vl.menu_name%type -- varchar2(30)
13 , prompt fnd_menus_vl.user_menu_name%type -- varchar2(80)
14 , description fnd_menus_vl.description%type -- varchar2(240)
15 );
16
17 TYPE menu_data is record (
18 sub_menu_id fnd_menu_entries_vl.sub_menu_id%type -- number
19 , prompt fnd_menu_entries_vl.prompt%type -- varchar2(30)
20 , description fnd_menu_entries_vl.description%type -- varchar2(240)
21 , function_id fnd_menu_entries_vl.function_id%type -- number
22 , menu_name fnd_menus.menu_name%type -- varchar2(30)
23 , menu_entry_rowid varchar2(240)
24 , func_web_host_name fnd_form_functions_vl.web_host_name%type -- varchar2(80)
25 , func_web_agent_name fnd_form_functions_vl.web_agent_name%type -- varchar2(80)
26 , func_web_html_call fnd_form_functions_vl.web_html_call%type -- varchar2(240)
27 , func_web_encrypt_parameters fnd_form_functions_vl.web_encrypt_parameters%type -- varchar2(1)
28 , func_web_secured fnd_form_functions_vl.web_secured%type -- varchar2(1)
29 , func_web_icon fnd_form_functions_vl.web_icon%type -- varchar2(30)
30 , func_function_id fnd_form_functions_vl.function_id%type -- number
31 , func_function_name fnd_form_functions_vl.function_name%type -- varchar2(30)
32 , func_application_id fnd_form_functions_vl.application_id%type -- number
33 , func_creation_date fnd_form_functions_vl.creation_date%type -- date
34 , func_type fnd_form_functions_vl.type%type -- varchar2(30)
35 , func_user_function_name fnd_form_functions_vl.user_function_name%type -- varchar2(80)
36 , func_description fnd_form_functions_vl.description%type -- varchar2(240)
37 );
38
39 type menu_table is table of menu_data index by binary_integer;
40 type number_table is table of number index by binary_integer;
41
42 TYPE responsibility_table IS TABLE OF MENU_RESPONSIBILITY
43 INDEX BY BINARY_INTEGER;
44
45 -- this'll call new get_excluded_root_menu_tl, then recursively
46 -- get_excluded_menu_entries_tl, up to p_max_depth
47 -- p_kids_menu_ids and p_kids_menu_data always
48 -- have the same count and correspond 1-to-1.
49 -- if p_lang is not null, then we assume that it is the language,
50 -- else use userenv('lang') value. This is the "NLS Robustnes" fix
51 procedure get_excl_entire_menu_tree_tl(
52 p_lang varchar2,
53 p_respid number,
54 p_appid number,
55 p_max_depth number,
56 p_responsibility_table OUT NOCOPY /* file.sql.39 change */ responsibility_table, -- from get_root_menu
57 p_root_menu_data OUT NOCOPY /* file.sql.39 change */ root_menu_data, -- from get_root_menu
58 p_root_menu_table OUT NOCOPY /* file.sql.39 change */ menu_table,
59 p_kids_menu_ids OUT NOCOPY /* file.sql.39 change */ number_table,
60 p_kids_menu_data OUT NOCOPY /* file.sql.39 change */ menu_table); -- all menus except the root
61
62
63 -- get_excluded_root_menu_tl works just like get_root_menu_tl, except
64 -- that the menu exclusion stuff happens before the menu is returned
65 procedure get_excluded_root_menu_tl(
66 p_lang in varchar2
67 , p_respid in number
68 , p_appid in number
69 , p_responsibility_table OUT NOCOPY /* file.sql.39 change */ responsibility_table
70 , p_root_menu_data OUT NOCOPY /* file.sql.39 change */ root_menu_data
71 , p_menu_table OUT NOCOPY /* file.sql.39 change */ menu_table
72 );
73 -- get_root_menu_tl works just like get_root_menu, except has 'NLS Robustness',
74 -- i.e. doesn't assume that the userenv('lang') is set correctly.
75 -- @deprecated! use get_excluded_root_menu_tl instead !
76 procedure get_root_menu_tl(
77 p_lang in varchar2
78 , p_respid in number
79 , p_appid in number
80 , p_responsibility_table OUT NOCOPY /* file.sql.39 change */ responsibility_table
81 , p_root_menu_data OUT NOCOPY /* file.sql.39 change */ root_menu_data
82 , p_menu_table OUT NOCOPY /* file.sql.39 change */ menu_table
83 );
84
85 -- @deprecated! use get_excluded_root_menu_tl instead !
86 PROCEDURE get_root_menu(
87 p_respid in number
88 , p_appid in number
89 , p_responsibility_table OUT NOCOPY /* file.sql.39 change */ responsibility_table
90 , p_root_menu_data OUT NOCOPY /* file.sql.39 change */ root_menu_data
91 , p_menu_table OUT NOCOPY /* file.sql.39 change */ menu_table
92 );
93
94 -- this is like the old get_menu_entries_tl, but it does menu
95 -- exclusion based on respid/appid.
96 procedure get_excluded_menu_entries_tl(
97 p_lang varchar2,
98 p_menu_id number,
99 p_respid number,
100 p_appid number,
101 p_menu_table OUT NOCOPY /* file.sql.39 change */ menu_table);
102
103 -- this is like the old get_menu_entries, but it
104 -- takes an explicit language argument, rather than depending
105 -- on the userenv('LANG') to be set.
106 -- if p_lang is not null, then we assume that it is the language,
107 -- else use userenv('lang') value. This is the "NLS Robustness" fix
108 -- @deprecated! use get_excluded_menu_entries_tl
109 procedure get_menu_entries_tl(
110 p_lang varchar2,
111 p_menu_id number,
112 p_menu_table OUT NOCOPY /* file.sql.39 change */ menu_table);
113
114 -- @deprecated! use get_excluded_menu_entries_tl
115 PROCEDURE get_menu_entries(
116 p_menu_id in number
117 ,p_menu_table OUT NOCOPY /* file.sql.39 change */ menu_table
118 );
119
120 PROCEDURE get_func_entries(
121 p_menu_id in number
122 ,p_menu_table OUT NOCOPY /* file.sql.39 change */ menu_table
123 );
124
125 -- this is like the old get_function_name, but it
126 -- takes an explicit language argument, rather than depending
127 -- on the userenv('LANG') to be set.
128 -- if p_lang is not null, then we assume that it is the language,
129 -- else use userenv('lang') value. This is the "NLS Robustnes" fix
130 FUNCTION get_function_name_tl(
131 p_lang varchar2,
132 p_function_id number) return varchar2;
133
134 FUNCTION get_function_name(
135 p_function_id in number
136 ) RETURN VARCHAR2;
137
138 -- this is like the old get_menu_name, but it
139 -- takes an explicit language argument, rather than depending
140 -- on the userenv('LANG') to be set.
141 -- if p_lang is not null, then we assume that it is the language,
142 -- else use userenv('lang') value. This is the "NLS Robustnes" fix
143 FUNCTION get_menu_name_tl(
144 p_lang varchar2,
145 p_menu_row_id varchar2) return varchar2;
146
147 FUNCTION get_menu_name(
148 p_menu_row_id in varchar2
149 ) RETURN VARCHAR2;
150
151 -- this is like the old get_root_menu_name, but it
152 -- takes an explicit language argument, rather than depending
153 -- on the userenv('LANG') to be set.
154 -- if p_lang is not null, then we assume that it is the language,
155 -- else use userenv('lang') value. This is the "NLS Robustnes" fix
156 function get_root_menu_name_tl(
157 p_lang varchar2,
158 p_menu_id in number) return varchar2;
159
160 FUNCTION get_root_menu_name(
161 p_menu_id in number
162 ) RETURN VARCHAR2;
163
164 END jtf_menu_pub;