Citação de andrecosta em 15/02/2022, 21:29

Restringir acessos e muito importa para uma melhor gestão do sistema, para isso e preciso verificar usuários X Funções liberadas.

Segue:

select distinct substr(obter_desc_funcao(p.cd_funcao),1,100) ds_funcao,
a.nm_usuario,
substr(obter_nome_usuario(a.nm_usuario),1,100) nm_pessoa_fisica
from usuario a,
usuario_perfil u,
funcao_perfil p
where a.ie_situacao= 'A'
and u.nm_usuario=a.nm_usuario
and u.cd_perfil=p.cd_perfil
and (p.cd_funcao =:cd_funcao or :cd_funcao = 0)
Order By 1,2,3