Histórico da Página

DescriçãoPCOA0507 - VALIDAÇÃO USUARIO APÓS BLOQUEIOS DE ENTIDADES

O ponto de entrada PCOA0507 valida os usuários após realizar o bloqueio de entidades.

Observações

Este ponto de entrada permite que usuario Permite que usuário acrescente validações ou sobrepor sobreponha a validação padrão referente ao bloqueio de entidades, como por exemplo: centro de custo, Item Contabil Contábil e Classe de Valor.

Este ponto não atua na função padrao ExistCpo() quando

utilizado os campos especiais como _MSBLQL.

Exemplos

User function PCOA0507()

Local lVldBlq := ParamIXB1
Local lRetorno := .T.

Alert("Evidencia PE: PCOA0507 - VALIDACAO DAS ENTIDADES BLOQUEADAS")

If lVldBlq // se retornou .T. pq passou pela validacao padrao
If !MsgYesNo("Validacao Padrao OK....Customizacao Confirma este item ?", "NAO BLOQUEADO PADRAO")
lRetorno := .F.
EndIf
Else
If !MsgYesNo("Validacao Padrao BLOQUEADO....Customizacao Confirma este item mesmo assim ?", "BLOQUEADO PADRAO")
lRetorno := .F.
EndIf
EndIf

Return(lRetorno) //RETORNO DO PONTO DE ENTRADA

Preview

Veja também

ExistCpo()

Idioma

Português(Brasil)

Versões

Microsiga_Protheus11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

TodasUpdates

Parâmetros

lVld

Retorno

lRetorno

Eventos de chamada do Ponto de Entrada

Variáveis

Programa Fonte

PCOA050.PRW