Tempo de leitura: 1 minuto
A função AvKey em ADVPL define o tamanho de uma string utilizando o tamanho de um campo(SX3) do dicionário do TOTVS Protheus. Essa função é muito útil em situações onde queremos encontrar o conteúdo de índice posicionado, usando a função DBSeek por exemplo. Ela é uma das funções de manipulação de string em ADVPL.
Sintaxe:
AvKey(cStr,cCampSX3)
Parâmetro(s):
Retorno:
Exemplo da função AvKey em ADVPL:
#include 'protheus.ch'
/*{Protheus.doc} User Function fAvKey
(Essa função tem por finalidade mostrar a função de Manipulação de String AvKey em ADVPL)
@type Function
@author Adilio Costa
@since 10/02/2025
@version 1.0
@?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 e Formações 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!!|
*/
User Function fAvKey()
Local aArea := FWGetArea()
Local cCodP := "000001"
Local cDesP := "Portal ProtheusAdvpl"
Local cCampo1SX3 := "B1_DESC"
Local cCampo2SX3 := "B1_COD"
Local cDescProd := AvKey(cDesP,cCampo1SX3)
Local cCodProd := AvKey(cCodP,cCampo2SX3)
DBSelectArea("SB1")
SB1->(DBSetOrder(3)) //B1_FILIAL+B1_DESC+B1_COD
If(FWxFilial("SB1")+cDesP+cCodP)
FWAlertInfo("Foi encontrado a descrição e o produto!","Função AvKey")
Else
FWAlertInfo("Não foi encontrado a descrição e o produto!","Função AvKey")
EndIf
//Strings formatadas com AvKey
If(FWxFilial("SB1")+cDescProd+cCodProd)
FWAlertInfo("Foi encontrado a descrição e o produto!","Função AvKey")
Else
FWAlertInfo("Não foi encontrado a descrição e o produto!","Função AvKey")
EndIf
FWRestArea(aArea)
Return
É isso aí, finalizamos aqui o post aqui do Blog ProtheusAdvpl. Caso tenha ficado alguma dúvida deixe seu comentário ou nos envie um e-mail para adiliocosta@protheusadvpl.com.br, até um próximo post, grande abraço e fica com Deus.
