main coding for user and responsibility acces
main coding for user and responsibility acces
dbms_output.put_line ('2');
for c_get_resp in cur_get_responsibilities
loop
fnd_user_pkg.addresp (
username => upper(v_user_name)
,resp_app => c_get_resp.application_short_name--'FND'
,resp_key => c_get_resp.responsibility_key --'FND_FUNC_ADMIN'
end loop;
commit;
exception
when others then
dbms_output.put_line ('4');
dbms_output.put_line ('Exception : '||SUBSTR(SQLERRM, 1, 500));
rollback;
end;
/
select resp.responsibility_key
,resp.responsibility_name
,app.application_short_name
from fnd_responsibility_vl resp
,fnd_application app
where resp.application_id = app.application_id
and resp.responsibility_name in ( 'System Administrator'
,'Application Developer'
,'Functional Administrator') ;
/
select * from FND_SECURITY_GROUPS;
/