Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/327912/newLayout.css |
Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: GP090CHK - Verifica Autorização do Usuário
Descrição: O ponto de entrada verifica se o usuário está autorizado a realizar manutenção em lançamento por verba. Programa Fonte GPEA090.PRX Sintaxe GP090CHK - Verifica Autorização do Usuário ( [ Paramixb[1] ], [ Paramixb[2] ], [ Paramixb[3] ], [ Paramixb[4] ] ) --> lRet Parâmetros:
Retorno
Observações O ponto de entrada deve retornar um valor lógico para indicar se o usuário tem permissão de acesso e assim efetivar a operação de manutenção do lançamento. Exemplos //No exemplo verifica-se se o usuario esta no grupo de administradores ou se o codigo//do usuario esta em uma lista permitida pre-definida e se nao estiver nao efetiva//a manutencao e exibe uma mensagem de alerta#INCLUDE 'PROTHEUS.CH'User Function GP090CHK()Local aArea := GetArea()Local aColsAnt := Paramixb[3]Local aCols := Paramixb[4]Local cCodUser := Paramixb[1]Local cGrupos := Paramixb[2]Local lRet := .T.Alert("Passou pelo PE GP090CHK") If !('000000' $ cGrupos .Or. cCodUser $ '000000/000001/000005') lRet := .F. Alert("Você não tem permissão para realizar essa operação")EndIfRestArea( aArea )Return( lRet ) Variáveis
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas