Função: FWGrpParam - Retorna as parametrizações do cadastro de grupo
Abrangências: | Microsiga Protheus 11 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Nível de Acesso: | Nível 1 (Acesso Clientes) |
Idiomas: | Português (Brasil) |
Descrição:
Esta função retorna os dados de parametrização do cadastro do grupo de usuários informado.
Programa Fonte:
SIGAPSW.PRG
Sintaxe:
FWGrpParam - Retorna as parametrizações do cadastro de grupo ( [ cGrpId ] ) --> aParam
Retorno:
-
aParam(array_of_record)
- Array com as informações de parametrizaçõesaParam[1]= Dados do grupo aParam[2]= Dados Parametrização - Database aParam[3]= Dados Parametrização - Restrição de acessoaParam[4]= Dados de inclusao/alteracao do cadastro no caso de sigapss migrado de versões anteriores
Observações
A função FWGrpParam() pode ser utilizada juntamente com a função AllGroups() para retornar as informações dos grupos cadastrados.
Exemplos
#include "protheus.ch"User Function GrpPss()Local cMemoLocal aAllGrp := AllGroups()Local aGrp := {}Local oDlgLocal oCbx Local oBtn Local oPanel1, oPanel2Local nI Local cGrp := "" // Armazena os códigos dos grupos de usuários cadastradosFor nI := 1 to len(aAllGrp) aadd(aGrp, aAllGrp[ni][1][1])Next// Monta a janela para exibição dos dadosDEFINE MSDIALOG oDlg TITLE "Teste AllGroups" FROM 010, 010 TO 600, 600 PIXEL @00,00 MSPANEL oPanel1 PROMPT "" SIZE 00,35 OF oDlg oPanel1:Align := CONTROL_ALIGN_TOP @ 010, 005 COMBOBOX oCbx VAR cGrp ITEMS aGrp SIZE 080, 012 OF oPanel1 PIXEL @ 010, 090 BUTTON oBtn PROMPT "Carrega Dados" SIZE 40,11 PIXEL OF oPanel1 ACTION (If(!Empty(cGrp),cMemo := LoadGrp(cGrp), ) ) @00,00 MSPANEL oPanel2 PROMPT "" SIZE 00,200 OF oDlg oPanel2:Align := CONTROL_ALIGN_ALLCLIENT @ 015,005 GET oMemo VAR cMemo OF oPanel2 MEMO PIXEL SIZE 180,100 ACTIVATE MSDIALOG oDlg CENTERED Return // Carrega as informações das parametrizacoes do grupo informadoStatic Function LoadGrp(cGroup)Local cMemoLocal aParam := {}aParam := FWGrpParam(cGroup)cMemo := "**Dados do grupo** " + Chr(13) + Chr(10) + Chr(13) + Chr(10) cMemo += "Codigo Grupo: " + aParam[1][1] + Chr(13) + Chr(10)cMemo += "Nome Grupo: " + aParam[1][2] + Chr(13) + Chr(10)cMemo += "Grupo bloqueado?: " + If( aParam[1][3]=="1", "Sim","Não") + Chr(13) + Chr(10)cMemo += "Data de bloqueio: " + dToc(aParam[1][4]) + Chr(13) + Chr(10) + Chr(13) + Chr(10)cMemo += "**Dados Parametrização - Database **" + Chr(13) + Chr(10) cMemo += "Configurar dias de troca de database: " + If( aParam[2][1]=="1", "Sim","Não") + Chr(13) + Chr(10)cMemo += "Retroceder: " + aParam[2][2] + Chr(13) + Chr(10)cMemo += "Avançar: " + aParam[2][3]+ Chr(13) + Chr(10)+ Chr(13) + Chr(10)cMemo += "**Dados cadastro ** " + Chr(13) + Chr(10) cMemo += "Nivel global de campos: " +aParam[3][1] + Chr(13) + Chr(10) cMemo += "Data de cadastro: " +dToc(aParam[4][1]) + Chr(13) + Chr(10) cMemo += "Data ultima alteracao: " +dToc(aParam[4][2]) + Chr(13) + Chr(10) Return cMemo
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
cGrpId | Caracter | Id do grupo de usuários |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas