Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • PLBLQUSR - Validação de Usuário

Versões comparadas

Versão antiga 1

changes.mady.by.user Usuário desconhecido (ana.lira)

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user admin

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Migration of unmigrated content due to installation of a new plugin
Composition Setup
import.css=/download/attachments/327912/newLayout.css
Portuguese

Pagetitle
PLBLQUSR - Validação de Usuário
PLBLQUSR - Validação de Usuário

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:
NomeTipoDescriçãoDefaultObrigatórioReferência
cBloqueioCaracterCódigo de bloqueio do item posicionado (Para Usuários já bloqueados).
cMotBlq CaracterMotivo do bloqueio/desbloqueio informado na rotina.
dDatBlqDataData do bloqueio/desbloqueio informado na rotina.
cAlias CaracterAlias do cadastro de tipos de bloqueio/desbloqueio utilizado.
dDatIncDataData de inclusão do item posicionado.
dDatPedArray of RecordData 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)