Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

NomeTipoDescrição
aDetRulesArray

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

aDetRules[1] → {  } Array uni dimensional com o campo 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, 12] → Array bidimensional com o conteúdo das linhas do grid de menu

...

Informações

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


Exemplo

Bloco de código
#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