Formsmenu
mit Security=Y und Rechtevergabe über Rollen
create or replace view FRM50_ENABLED_ROLES as
select urp.granted_role role,
sum(distinct decode(rrp.granted_role,
'ORAFORMS$OSC',2,
'ORAFORMS$BGM',4,
'ORAFORMS$DBG',1,0)) flag
from sys.user_role_privs urp, role_role_privs rrp
where urp.granted_role = rrp.role (+)
and urp.granted_role not like 'ORAFORMS$%'
group by urp.granted_role;
create public synonym FRM50_ENABLED_ROLES for sys.FRM50_ENABLED_ROLES;
create role ORAFORMS$OSC;
create role ORAFORMS$DBG;
create role ORAFORMS$BGM;
Das Script muß mit User sys gestartet werden. Grant Select auf die jeweiligen Benutzer einrichten.
grant select on FRM50_ENABLED_ROLES to neveling;
Im Menumodul mß in den Properties auf Modulebene Sicherheit auf ja gestzt werden.Hinter Modulrollen müssen die zugelassenen Rollen hinterlegt werden.
forms_menu_demo.mmb