Tempo de leitura: 2 minutos
Olá, no post de hoje iremos aprender como usar a função ExistChav no ADVPL. Elá é uma das funções de validação no ADVPL. A função ExistChav verifica se um registro passado como parâmetro existe na tabela(arquivos de dados) especificada.
Sintaxe:
Parâmetro(s):
Retorno:
Dica:
As funções ExistChav e ExistCpo tem algumas semelhanças. Porém, enquanto que a função ExistChav verifica uma chave única, ou seja, verifica se um código já existe no próprio arquivo de dados que está sendo manipulado, a função ExistCpo verifica uma chave estrangeira, ou seja, verifica se um código existe em outro arquivo de dados.
Exemplo da função ExistChav no ADVPL:
#include 'protheus.ch'
#include "tbiconn.ch"
/**{Protheus.doc} User Function fExisChv
A função ExistChav valida a existência de um registro em uma tabela do Protheus
@type Function
@author Adilio Costa
@since 30/10/2023
@version 1
@Link de referência:https://tdn.totvs.com/pages/releaseview.action?pageId=24346638
@Inscreva-se no Blog ProtheusAdvpl:
https://www.protheusadvpl.com.br
@Inscreva-se no Canal ProtheusAdvpl:
https://www.youtube.com/protheusadvpl
@Siga-nos no Instagram:
https://www.instagram.com/protheusadvpl
@Conheça os Cursos do ProtheusAdvpl:
https://cursos-e-formacoes-protheusadvpl.gr-site.com/
|Se esse conteúdo foi útil pra você nos ajude divulgando
ele e nossas redes sociais!!|
-Plataforma: Portal ProtheusAdvpl-https://hotm.art/portal_protheusadvpl
-Módulo 7:7.39.1- [Protheus-Programação/ADVPL II/Funções de Validação] - Como Utilizar a Função ExistChav para Validar a Existência de Registros em Tabelas ADVPL
*/
User Function fExisChv()
Local cAlias := "SA2"
Local cCNPJ := "54.898.071/0001-82"
Local cInd := 3 //A2_FILIAL+A2_CGC
Local cInfo := "O CNPJ "+cCNPJ+" já existe cadastrado na tabela de fornecedores "+cAlias+"!"
If(ExistChav("SA2",cCNPJ,cInd,cInfo))
MsgInfo("O CNPJ "+cCNPJ+" não existe na tabela de fornecedores "+cAlias+", então poderá ser incluído!")
EndIf
Return
Bem, finalizamos mais um post aqui no blog. Espero que você tenha entendido, qualquer dúvida nos envie um e-mail para adiliocosta@protheusadvpl.com.br. Grande abraço e fica com Deus.
Links de referência(s):
