cursor get_roles is select substr(granted_role,1,2)||substr(granted_role,4,1) from dba_role_privs where grantee = p_user_name and