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