aliasAlias da validação.
AdvPL GuiaExistChav( alias, expressao, [indice], [help] ) --> lRetValida unicidade da chave.
ExistChav aprova chave ausente e rejeita duplicada. A expressão deve ser fornecida sem filial, conforme a ficha; não transportar automaticamente uma chave construída para DBSeek. O índice omitido assume o primeiro índice. A função pode exibir help na rejeição, portanto não é uma consulta silenciosa genérica. O fonte GitHub demonstra a chamada com código/loja de SA1; a proposta usa callback parametrizado sem acessar cadastros reais. Uma validação prévia não resolve sozinha concorrência ou unicidade transacional. (TOTVS, s.d., ref. 1)
ExistChav( alias, expressao, [indice], [help] ) --> lRetaliasAlias da validação.
expressaoChave sem filial.
indiceÍndice compatível com a expressão.
helpNome do help de rejeição.
Verdadeiro quando a regra é atendida; falso na rejeição.
#Include "Protheus.ch"
User Function Ed373()
Local bValidar := {|cAlias,cChave,nOrdem| ExistChav(cAlias,cChave,nOrdem)}
// Chave sem filial, indice compativel; nao avaliar neste exemplo.
Return NilBloco preparado sem pesquisa; o sentido do retorno depende da regra de cada função. Em revisão: exemplo editorial não compilado nem executado em Protheus. Conferir includes, release, RDD e contexto antes de homologar.
© 2026 Usina.BR. Todos os direitos reservados. TOTVS, Protheus, Microsiga e seus respectivos logotipos são marcas de seus titulares. O AdvPL Guia é independente e utiliza citações limitadas, atribuídas e justificadas por finalidade educativa. Consulte os Termos de Uso. Termos de Uso
Comentários
Ainda não há comentários aprovados.
Entre com Google ou Microsoft para comentar.