[Home] [Help]
PACKAGE BODY: APPS.FND_FUNCTION_SECURITY_CACHE
Source
1 package body FND_FUNCTION_SECURITY_CACHE as
2 /* $Header: AFFSCIB.pls 120.2 2005/11/09 07:05:07 rosthoma ship $ */
3
4 procedure raise_event(p_event_name in varchar2, p_event_key in varchar2 ,p_parameters in wf_parameter_list_t default NULL)
5 is
6 begin
7 wf_event.raise(p_event_name=>p_event_name,p_event_key=>p_event_key,p_parameters => p_parameters);
8 -- dbms_output.put_line('['||p_event_name||']['||p_event_key||']');
9 exception when others then null;
10 end;
11
12 procedure delete_function(p_function_id in number)
13 is
14 l_parameters wf_parameter_list_t := wf_parameter_list_t();
15 begin
16 wf_event.addparametertolist(p_name => 'FND_FUNCTION_ID',
17 p_value => p_function_id,
18 p_parameterlist => l_parameters);
19
20 raise_event(p_event_name=>'oracle.apps.fnd.function.delete',
21 p_event_key=>to_char(p_function_id));
22 end;
23
24 procedure insert_function(p_function_id in number)
25 is
26 l_parameters wf_parameter_list_t := wf_parameter_list_t();
27 begin
28 wf_event.addparametertolist(p_name => 'FND_FUNCTION_ID',
29 p_value => p_function_id,
30 p_parameterlist => l_parameters);
31
32 raise_event(p_event_name=>'oracle.apps.fnd.function.insert',
33 p_event_key=>to_char(p_function_id),
34 p_parameters => l_parameters);
35 end;
36
37 procedure update_function(p_function_id in number)
38 is
39 l_parameters wf_parameter_list_t := wf_parameter_list_t();
40 begin
41 wf_event.addparametertolist(p_name => 'FND_FUNCTION_ID',
42 p_value => p_function_id,
43 p_parameterlist => l_parameters);
44
45
46 raise_event(p_event_name=>'oracle.apps.fnd.function.update',
47 p_event_key=>to_char(p_function_id),
48 p_parameters => l_parameters);
49 end;
50
51 procedure delete_grant(p_grant_guid in raw, p_grantee_type in varchar2,
52 p_grantee_key in varchar2)
53 is
54 l_parameters wf_parameter_list_t := wf_parameter_list_t();
55 begin
56 wf_event.addparametertolist(p_name => 'FND_GRANT_GUID',
57 p_value => p_grant_guid,
58 p_parameterlist => l_parameters);
59
60
61 wf_event.addparametertolist(p_name => 'FND_GRANTEE_TYPE',
62 p_value => p_grantee_type,
63 p_parameterlist => l_parameters);
64
65 wf_event.addparametertolist(p_name => 'FND_GRANTEE_KEY',
66 p_value => p_grantee_key,
67 p_parameterlist => l_parameters);
68
69 raise_event(p_event_name=>'oracle.apps.fnd.grant.delete',
70 p_event_key=>p_grant_guid||':'||p_grantee_type||':'||p_grantee_key,
71 p_parameters => l_parameters);
72 end;
73
74 procedure insert_grant(p_grant_guid in raw, p_grantee_type in varchar2,
75 p_grantee_key in varchar2)
76 is
77 l_parameters wf_parameter_list_t := wf_parameter_list_t();
78 begin
79 wf_event.addparametertolist(p_name => 'FND_GRANT_GUID',
80 p_value => p_grant_guid,
81 p_parameterlist => l_parameters);
82
83
84 wf_event.addparametertolist(p_name => 'FND_GRANTEE_TYPE',
85 p_value => p_grantee_type,
86 p_parameterlist => l_parameters);
87
88 wf_event.addparametertolist(p_name => 'FND_GRANTEE_KEY',
89 p_value => p_grantee_key,
90 p_parameterlist => l_parameters);
91
92 raise_event(p_event_name=>'oracle.apps.fnd.grant.insert',
93 p_event_key=>p_grant_guid||':'||p_grantee_type||':'||p_grantee_key,
94 p_parameters => l_parameters);
95 end;
96
97 procedure update_grant(p_grant_guid in raw, p_grantee_type in varchar2,
98 p_grantee_key in varchar2)
99 is
100 l_parameters wf_parameter_list_t := wf_parameter_list_t();
101 begin
102 wf_event.addparametertolist(p_name => 'FND_GRANT_GUID',
103 p_value => p_grant_guid,
104 p_parameterlist => l_parameters);
105
106
107 wf_event.addparametertolist(p_name => 'FND_GRANTEE_TYPE',
108 p_value => p_grantee_type,
109 p_parameterlist => l_parameters);
110
111 wf_event.addparametertolist(p_name => 'FND_GRANTEE_KEY',
112 p_value => p_grantee_key,
113 p_parameterlist => l_parameters);
114
115 raise_event(p_event_name=>'oracle.apps.fnd.grant.update',
116 p_event_key=>p_grant_guid||':'||p_grantee_type||':'||p_grantee_key,
117 p_parameters => l_parameters);
118 end;
119
120 procedure delete_menu(p_menu_id in number)
121 is
122 l_parameters wf_parameter_list_t := wf_parameter_list_t();
123 begin
124
125 wf_event.addparametertolist(p_name => 'FND_MENU_ID',
126 p_value => p_menu_id,
127 p_parameterlist => l_parameters);
128
129 raise_event(p_event_name=>'oracle.apps.fnd.menu.delete',
130 p_event_key=>to_char(p_menu_id),
131 p_parameters => l_parameters);
132 end;
133
134 procedure insert_menu(p_menu_id in number)
135 is
136 l_parameters wf_parameter_list_t := wf_parameter_list_t();
137 begin
138 wf_event.addparametertolist(p_name => 'FND_MENU_ID',
139 p_value => p_menu_id,
140 p_parameterlist => l_parameters);
141
142 raise_event(p_event_name=>'oracle.apps.fnd.menu.insert',
143 p_event_key=>to_char(p_menu_id),
144 p_parameters => l_parameters);
145 end;
146
147 procedure update_menu(p_menu_id in number)
148 is
149 l_parameters wf_parameter_list_t := wf_parameter_list_t();
150 begin
151
152 wf_event.addparametertolist(p_name => 'FND_MENU_ID',
153 p_value => p_menu_id,
154 p_parameterlist => l_parameters);
155
156 raise_event(p_event_name=>'oracle.apps.fnd.menu.update',
157 p_event_key=>to_char(p_menu_id),
158 p_parameters => l_parameters);
159 end;
160
161 procedure delete_menu_entry(p_menu_id in number, p_sub_menu_id in number,
162 p_function_id in number)
163 is
164 l_parameters wf_parameter_list_t := wf_parameter_list_t();
165 begin
166 update_menu(p_menu_id);
167 wf_event.addparametertolist(p_name => 'FND_MENU_ID',
168 p_value => p_menu_id,
169 p_parameterlist => l_parameters);
170
171 wf_event.addparametertolist(p_name => 'FND_SUB_MENU_ID',
172 p_value => p_sub_menu_id,
173 p_parameterlist => l_parameters);
174
175 wf_event.addparametertolist(p_name => 'FND_FUNCTION_ID',
176 p_value => p_menu_id,
177 p_parameterlist => l_parameters);
178
179
180
181 raise_event(p_event_name=>'oracle.apps.fnd.menu.entry.delete',
182 p_event_key=>to_char(p_menu_id)||':'||to_char(p_sub_menu_id)||':'||
183 to_char(p_function_id),
184 p_parameters => l_parameters);
185 end;
186
187 procedure insert_menu_entry(p_menu_id in number, p_sub_menu_id in number,
188 p_function_id in number)
189 is
190 l_parameters wf_parameter_list_t := wf_parameter_list_t();
191 begin
192 update_menu(p_menu_id);
193
194 wf_event.addparametertolist(p_name => 'FND_MENU_ID',
195 p_value => p_menu_id,
196 p_parameterlist => l_parameters);
197
198 wf_event.addparametertolist(p_name => 'FND_SUB_MENU_ID',
199 p_value => p_sub_menu_id,
200 p_parameterlist => l_parameters);
201
202 wf_event.addparametertolist(p_name => 'FND_FUNCTION_ID',
203 p_value => p_menu_id,
204 p_parameterlist => l_parameters);
205
206 raise_event(p_event_name=>'oracle.apps.fnd.menu.entry.insert',
207 p_event_key=>to_char(p_menu_id)||':'||to_char(p_sub_menu_id)||':'||
208 to_char(p_function_id),
209 p_parameters => l_parameters);
210 end;
211
212 procedure update_menu_entry(p_menu_id in number, p_sub_menu_id in number,
213 p_function_id in number)
214 is
215 l_parameters wf_parameter_list_t := wf_parameter_list_t();
216 begin
217 update_menu(p_menu_id);
218
219 wf_event.addparametertolist(p_name => 'FND_MENU_ID',
220 p_value => p_menu_id,
221 p_parameterlist => l_parameters);
222
223 wf_event.addparametertolist(p_name => 'FND_SUB_MENU_ID',
224 p_value => p_sub_menu_id,
225 p_parameterlist => l_parameters);
226
227 wf_event.addparametertolist(p_name => 'FND_FUNCTION_ID',
228 p_value => p_menu_id,
229 p_parameterlist => l_parameters);
230
231 raise_event(p_event_name=>'oracle.apps.fnd.menu.entry.update',
232 p_event_key=>to_char(p_menu_id)||':'||to_char(p_sub_menu_id)||':'||
233 to_char(p_function_id),
234 p_parameters => l_parameters);
235 end;
236
237 procedure delete_resp(p_resp_id in number, p_resp_appl_id in number)
238 is
239 l_parameters wf_parameter_list_t := wf_parameter_list_t();
240 begin
241
242 wf_event.addparametertolist(p_name => 'FND_RESPONSIBILITY_ID',
243 p_value => p_resp_id,
244 p_parameterlist => l_parameters);
245
246 wf_event.addparametertolist(p_name => 'FND_RESPONSIBILITY_APPS_ID',
247 p_value => p_resp_appl_id,
248 p_parameterlist => l_parameters);
249
250 raise_event(p_event_name=>'oracle.apps.fnd.resp.delete',
251 p_event_key=>p_resp_id||':'||p_resp_appl_id,
252 p_parameters => l_parameters);
253 end;
254
255 procedure insert_resp(p_resp_id in number, p_resp_appl_id in number)
256 is
257 l_parameters wf_parameter_list_t := wf_parameter_list_t();
258 begin
259
260 wf_event.addparametertolist(p_name => 'FND_RESPONSIBILITY_ID',
261 p_value => p_resp_id,
262 p_parameterlist => l_parameters);
263
264 wf_event.addparametertolist(p_name => 'FND_RESPONSIBILITY_APPS_ID',
265 p_value => p_resp_appl_id,
266 p_parameterlist => l_parameters);
267
268 raise_event(p_event_name=>'oracle.apps.fnd.resp.insert',
269 p_event_key=>p_resp_id||':'||p_resp_appl_id,
270 p_parameters => l_parameters);
271 end;
272
273 procedure update_resp(p_resp_id in number, p_resp_appl_id in number)
274 is
275 l_parameters wf_parameter_list_t := wf_parameter_list_t();
276 begin
277
278 wf_event.addparametertolist(p_name => 'FND_RESPONSIBILITY_ID',
279 p_value => p_resp_id,
280 p_parameterlist => l_parameters);
281
282 wf_event.addparametertolist(p_name => 'FND_RESPONSIBILITY_APPS_ID',
283 p_value => p_resp_appl_id,
284 p_parameterlist => l_parameters);
285
286 raise_event(p_event_name=>'oracle.apps.fnd.resp.update',
287 p_event_key=>p_resp_id||':'||p_resp_appl_id,
288 p_parameters => l_parameters);
289 end;
290
291 procedure delete_secgrp(p_security_group_id in number)
292 is
293 l_parameters wf_parameter_list_t := wf_parameter_list_t();
294 begin
295
296 wf_event.addparametertolist(p_name => 'FND_SECURITY_GROUP_ID',
297 p_value => p_security_group_id,
298 p_parameterlist => l_parameters);
299
300 raise_event(p_event_name=>'oracle.apps.fnd.secgrp.delete',
301 p_event_key=>to_char(p_security_group_id),
302 p_parameters => l_parameters);
303 end;
304
305 procedure insert_secgrp(p_security_group_id in number)
306 is
307 l_parameters wf_parameter_list_t := wf_parameter_list_t();
308 begin
309 wf_event.addparametertolist(p_name => 'FND_SECURITY_GROUP_ID',
310 p_value => p_security_group_id,
311 p_parameterlist => l_parameters);
312
313 raise_event(p_event_name=>'oracle.apps.fnd.secgrp.insert',
314 p_event_key=>to_char(p_security_group_id),
315 p_parameters => l_parameters);
316 end;
317
318 procedure update_secgrp(p_security_group_id in number)
319 is
320 l_parameters wf_parameter_list_t := wf_parameter_list_t();
321 begin
322
323 wf_event.addparametertolist(p_name => 'FND_SECURITY_GROUP_ID',
324 p_value => p_security_group_id,
325 p_parameterlist => l_parameters);
326
327 raise_event(p_event_name=>'oracle.apps.fnd.secgrp.update',
328 p_event_key=>to_char(p_security_group_id),
329 p_parameters => l_parameters);
330 end;
331
332 procedure delete_user(p_user_id in number)
333 is
334 l_parameters wf_parameter_list_t := wf_parameter_list_t();
335 begin
336 wf_event.addparametertolist(p_name => 'FND_USER_ID',
337 p_value => p_user_id,
338 p_parameterlist => l_parameters);
339
340 raise_event(p_event_name=>'oracle.apps.fnd.user.delete',
341 p_event_key=>to_char(p_user_id),
342 p_parameters => l_parameters);
343 end;
344
345 procedure insert_user(p_user_id in number)
346 is
347 l_parameters wf_parameter_list_t := wf_parameter_list_t();
348 begin
349 raise_event(p_event_name=>'oracle.apps.fnd.user.insert',
350 p_event_key=>to_char(p_user_id),
351 p_parameters => l_parameters);
352 end;
353
354 procedure update_user(p_user_id in number)
355 is
356 l_parameters wf_parameter_list_t := wf_parameter_list_t();
357 begin
358
359 wf_event.addparametertolist(p_name => 'FND_USER_ID',
360 p_value => p_user_id,
361 p_parameterlist => l_parameters);
362
363 raise_event(p_event_name=>'oracle.apps.fnd.user.update',
364 p_event_key=>to_char(p_user_id),
365 p_parameters => l_parameters);
366 end;
367
368 procedure delete_user_resp(p_user_id in number, p_resp_id in number,
369 p_resp_appl_id in number)
370 is
371 begin
372 return;
373 end;
374
375 procedure insert_user_resp(p_user_id in number, p_resp_id in number,
376 p_resp_appl_id in number)
377 is
378 begin
379 return;
380 end;
381
382 procedure update_user_resp(p_user_id in number, p_resp_id in number,
383 p_resp_appl_id in number)
384 is
385 begin
386 return;
387 end;
388
389 procedure delete_user_role(p_user_id in number, p_role_name in varchar2)
390 is
391 l_parameters wf_parameter_list_t := wf_parameter_list_t();
392 begin
393 wf_event.addparametertolist(p_name => 'FND_USER_ID',
394 p_value => p_user_id,
395 p_parameterlist => l_parameters);
396
397 wf_event.addparametertolist(p_name => 'FND_ROLE',
398 p_value => p_role_name,
399 p_parameterlist => l_parameters);
400
401
402 raise_event(p_event_name=>'oracle.apps.fnd.user.role.delete',
403 p_event_key=>to_char(p_user_id)||':'||p_role_name,
404 p_parameters => l_parameters);
405 end;
406
407 procedure insert_user_role(p_user_id in number, p_role_name in varchar2)
408 is
409 l_parameters wf_parameter_list_t := wf_parameter_list_t();
410 begin
411
412 wf_event.addparametertolist(p_name => 'FND_USER_ID',
413 p_value => p_user_id,
414 p_parameterlist => l_parameters);
415
416 wf_event.addparametertolist(p_name => 'FND_ROLE',
417 p_value => p_role_name,
418 p_parameterlist => l_parameters);
419
420
421
422 raise_event(p_event_name=>'oracle.apps.fnd.user.role.insert',
423 p_event_key=>to_char(p_user_id)||':'||p_role_name,
424 p_parameters => l_parameters);
425 end;
426
427 procedure update_user_role(p_user_id in number, p_role_name in varchar2)
428 is
429 l_parameters wf_parameter_list_t := wf_parameter_list_t();
430 begin
431
432 wf_event.addparametertolist(p_name => 'FND_USER_ID',
433 p_value => p_user_id,
434 p_parameterlist => l_parameters);
435
436 wf_event.addparametertolist(p_name => 'FND_ROLE',
437 p_value => p_role_name,
438 p_parameterlist => l_parameters);
439
440
441
442 raise_event(p_event_name=>'oracle.apps.fnd.user.role.update',
443 p_event_key=>to_char(p_user_id)||':'||p_role_name,
444 p_parameters => l_parameters);
445 end;
446
447 end FND_FUNCTION_SECURITY_CACHE;