Rem
Rem  NAME
Rem    frm60sec.sql - FoRMs 6.0 menu SECurity view
Rem
Rem  DESCRIPTION
Rem    Create Forms 5.0 Menu Security View
Rem
Rem  NOTES
Rem    This script must be run to enable Menu Security features based 
Rem    on Oracle7 roles if the frm50bld.sql script has not been run 
Rem    (i.e. if Forms are not going to be stored in the database).
Rem
Rem  COPYRIGHT
Rem    Copyright (c) 1996 by Oracle Corporation
Rem
Rem  MODIFIED     (MM/DD/YY)
Rem    enewman     11/22/96 - Update for 50
Rem    jcobb       03/13/95 - Creation
Rem

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 system.FRM50_ENABLED_ROLES;

create role ORAFORMS$OSC;
create role ORAFORMS$DBG;
create role ORAFORMS$BGM;





