Retorna os detalhes de um privilégios com ambiente no banco de dados


Sintaxe

FwRulesDB( <cCode> ) → aDetPriv


Parâmetros/Elementos

NomeTipoDescriçãoObrigatórioReferência
cCodeCarácter

Código do privilégio utilizado para pesquisa.

X


Retorno

NomeTipoDescrição
aDetRulesArray

Array bidimensional de informações dos detalhes do privilégio no seguinte formato:

aDetRules[1] → {  } Array bidimensional com os campos do cabeçalho e conteúdo

aDetRules[2] → {  } Array com os dados do grid de rotinas

     aDetRules[2, 1] → Array uni dimensional com os nomes dos campos do grid de rotinas

     aDetRules[2, 2] → Array bidimensional com o conteúdo das linhas do grid de rotinas

         aDetRules[2, 2, 1, 4] → Array com os dados do grid de menu

             aDetRules[2, 2, 1, 4, 1] → Array uni dimensional com os nomes dos campos do grid de menu

             aDetRules[2, 2, 1, 4, 2] → Array bidimensional com o conteúdo das linhas do grid de menu

A função é disponível somente para ambiente criado/migrado ao banco de dados 

A função deve ser executada a partir de um ambiente inicializado/aberto

Disponível a partir do pacote de LIB versão 20200908.


Exemplo

#include "protheus.ch"

Function u_pocRetPrivDb()
    Local aRetGrpPriv   As Array
    Local aRetRules 	As Array
	Local cGrupo		As Character
	Local nX			as Numeric

	cGrupo := <Código do grupo>	

    aRetGrpPriv := FwGrpPrivDB(cGrupo)

    VarInfo( "Privilégios atrelados ao grupo", aRetGrpPriv )

    For nX := 1 To Len(aRetGrpPriv[2][2])
        aRetRules := FwRulesDB(aRetGrpPriv[2][2][nX][1])
        VarInfo( "Detalhes do privilégio " + aRetGrpPriv[2][2][nX][1], aRetRules )
    Next nX
Return