Obtendo Informações de um Campo(SX3) com TamSX3 em ADVPL

Tempo de leitura: 2 minutos

A função TamSX3 em ADVPL obtém informações de um campo(SX3) como o tamanho do campo, decimal e seu tipo de dado, baseado na tabela de campos SX3. Basicamente essa função retorna um array com informações do campo passado como parâmetro (aCampo[1] = Tamanho do campo, aCampo[2] = Tamanho do decimal do campo, aCampo[3] = Tipo de dado do campo). Ela é uma das Funções de Campos(SX3) em ADVPL.

 

Sintaxe:

TamSx3(cCampo)[nInd]

 

Parâmetro(s):

Retorno:

 

 

Exemplo da função TamSX3 em ADVPL:

#include 'protheus.ch'
#include 'rwmake.ch'
#INCLUDE "TBICONN.CH"
/*{Protheus.doc} User Function fTamSx3
    (Essa função tem por finalidade mostrar a função TamSX3 em ADVPL)
    @type  Function
    @author Adilio Costa
    @since 27/06/2022
    @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 Protheus:
https://cursos-e-formacoes-protheusadvpl.gr-site.com/

@Participe de nossas comunidades no WhatsApp:
-Comunidade Protheus Backoffice:https://chat.whatsapp.com/KMUIAjwZ6EZ6eAHsLkPTyb
-Comunidade Protheus-RH:https://chat.whatsapp.com/L5dUyAna6xU4ylG5DUgfOW
-Comunidade Protheus-Programação:https://chat.whatsapp.com/LsD6z0apdqKHlOz67bcaEn
-Comunidade Protheus-Framework:https://chat.whatsapp.com/BzUFpjaSnTC3vtsfa77jmG

|Se esse conteúdo foi útil pra você nos ajude divulgando
ele e nossas redes sociais!!|
/*/

User Function fTamSx3()

Local nTamCampo
Local nTamCamDec
Local xTipoCampo
Local cInf := ""


//Retorna o tamanho do campo D1_QUANT na tabela SX3
nTamCampo := TamSx3("D1_QUANT")[1]
//Retorna o tamanho do decimal do campo D1_QUANT na tabela SX3
nTamCamDec := TamSx3("D1_QUANT")[2]
//Retorna o tipo de dado do campo D1_QUANT na tabela SX3
xTipoCampo := TamSx3("D1_QUANT")[3]

cInf := "Tamanho do Campo D2_QUANT:"+cValToChar(nTamCampo)
cInf += ", Tamanho do Decimal do D2_QUANT:"+cValToChar(nTamCamDec)
cInf += ", Tipo de dado do campo D2_QUANT:"+xTipoCampo

ConOut(cInf)


Return


Exemplo da função TamSx3 em ADVPL
Exemplo da função TamSx3 em ADVPL
Exemplo da função TamSx3 em ADVPL
Exemplo da função TamSx3 em ADVPL no console.

 

Bem, finalizamos mais um post aqui no blog. Espero que tenha entendido, se tiver ficado alguma dúvida deixe seu comentário ou nos mandar um e-mail para adiliocosta@protheusadvpl.com.br. Grande abraço e fica com Deus.

 

Links de referência:

 

Receba as últimas atualizações do ProtheusAdvpl
Deixe seu melhor email
Nós respeitamos sua privacidade.