Ponto-de-Entrada: CFGVLDMNU - Configuração de usuário
Versões: | Microsiga Protheus 8.11 , Microsiga Protheus 10 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Descrição: Este ponto de entrada é utilizado na configuração do usuário, no botão Detalhes, guia Empresa e Módulos. Ao selecionar o módulo, o usuário pode alterar o caminho e nível do menu de acesso para o módulo selecionado. Este ponto de entrada valida se o caminho do arquivo de menu informado pode ser utilizado pelo usuário.
Sintaxe CFGVLDMNU - Configuração de usuário ( [ ParamIXB[1] ], [ ParamIXB[2] ], [ ParamIXB[3] ], [ ParamIXB[4] ] ) --> lRet
Parâmetros: | Nome | | | Tipo | | | Descrição | | | Default | | | Obrigatório | | | Referência | |
| ParamIXB[1] | | | Caracter | | | Caminho do menu. Ex: \system\SIGAFAT.XNU | | | | | | | | | | |
| ParamIXB[2] | | | Array of Record | | | Nivel de acesso ao menu | | | | | | | | | | |
| ParamIXB[3] | | | Array of Record | | | Código do módulo | | | | | | | | | | |
| ParamIXB[4] | | | Array of Record | | | Id do usuário | | | | | | | | | | |
Retorno lRet(logico) - Retorna .T. se a configuração do menu do módulo para o usuário em questão pode ser utilizada. .F. não permite a alteração no menu de acesso.
Exemplos User function CFGVLDMNU()Local cModMnu := ParamIxb[1]Local cModNiv := ParamIxb[2]Local nMod := ParamIxb[3]Local cId := ParamIxb[4]Local lRet := .T.If cId > "000002" .and. ("SIGAFAT" $ cModMnu .or. "SIGAFIN" $ cModMnu) .and. cModNiv <> "5" lRet := .F. // não permite alterar o menu EndIfReturn lRet
Variáveis | Nome | | | Tipo | | | Escopo | | | Pode Alterar | | | descrição | |
| | | | Array of Record | | | Global | | | Não | | | | |