'') { delete from DB.DBA.SYS_GRANTS where G_USER = _g_user and G_OP = _g_op and G_OBJECT = _g_object and G_COL = _g_col; } if (get_keyword ('add_grant_bt', params, '') <> '') { _class := get_keyword ('class', params, ''); _role := atoi (get_keyword ('sel_grant', params, '')) - 1; if (_role <> -1) select '"' || U_NAME || '"' into _user from DB.DBA.SYS_USERS where U_ID = _role; else _user := 'public'; stmt := 'grant execute on "' || _class || '" to ' || _user; exec (stmt); commit work; } ?> Hosted modules grants
Loaded modules
Module name Type Grant to

1) select U_NAME into user_name from SYS_USERS where U_ID = G_USER; else user_name := 'Public'; ?>
Existing grants
Module name Type Granted to Action
remove