Ponto-de-Entrada: PLBLQUSR - Validação de Usuário
| Versões: | Advanced Protheus 7.10 , Microsiga Protheus 8.11 |
Descrição:
Este ponto de entrada permite inserir uma regra para validar e confirmar se o usuário deve ser bloqueado ou desbloqueado.
Ponto de chamada: É executado ao pressionar o botão “Ok” da rotina de bloqueio/desbloqueio do usuário, ou seja, após terem sido verificadas todas as regras padrões do sistema. Caso alguma verificação não permita a exclusão, o ponto de entrada não será executado.
Programa Fonte
PLSA660B.PRW
Sintaxe
PLBLQUSR - Validação de Usuário ( [ cBloqueio ], [ cMotBlq ], [ dDatBlq ], [ cAlias ], [ dDatInc ], [ dDatPed ] ) --> Lógico
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| cBloqueio | Caracter | Código de bloqueio do item posicionado (Para Usuários já bloqueados). | |||||||||||||||
| cMotBlq | Caracter | Motivo do bloqueio/desbloqueio informado na rotina. | |||||||||||||||
| dDatBlq | Data | Data do bloqueio/desbloqueio informado na rotina. | |||||||||||||||
| cAlias | Caracter | Alias do cadastro de tipos de bloqueio/desbloqueio utilizado. | |||||||||||||||
| dDatInc | Data | Data de inclusão do item posicionado. | |||||||||||||||
| dDatPed | Array of Record | Data de pedido do bloqueio. |
Retorno
-
Lógico(logico)
- Retorno lógico (verdadeiro ou falso). Se verdadeiro, a rotina seguirá, normalmente, o processo de bloqueio, caso seja falso, a rotina não permitirá a confirmação.
Exemplos
User Function PLBLQUSR Local cBloqueio := paramixb[1] Local cMotBlq := paramixb[2] Local dDatBlq := paramixb[3] Local cAlias := paramixb[4] Local dDatInc := paramixb[5] Local dDatPed := paramixb[6] Local lRet := .T. If Empty(cBloqueio) // Se estiver vazio e um bloqueio. MsgAlert("Ponto de entrada no bloqueio do usuario... BLOQUEIO") Else MsgAlert("'Ponto de entrada no bloqueio do usuario... DESBLOQUEIO") Endif Return(lRet)