Tempo de leitura: 2 minutos
Olá, no post de hoje iremos falar da função FWGetSX5 do ADVPL. A função FWGetSX5 é uma das funções de manipulação das tabelas genéricas SX5 do Protheus e tem por finalidade obter o registros da SX5 de acordo com os parâmetros passados. Ela retorna um array bidimensional conforme o exemplo abaixo:
- Array com os dados do SX5 retornado:
- [n][1] FILIAL
- [n][2] TABELA
- [n][3] CHAVE
- [n][4] DESCRICAO
Objetivo:
Retornar registros das tabelas genéricas SX5 do Protheus.
Sintaxe:
FWGetSX5 ( < cTab >, [ cChave ] , [cIdiom] ) → aDadosSX5
Retorno
aDadosSX5 (Array de caracteres)
Logo abaixo temos um código ADVPL explicando a utilização da função FWGetSX5:
#include 'protheus.ch'
#include "tbiconn.ch"
#DEFINE CRLF Chr(13)+Chr(10)
/*{Protheus.doc} User Function fFWGSX5
(Essa função tem por finalidade mostrar a função FWGetSX5 em ADVPL/TL++ para
obter o conteúdo de registros das tabelas genéricas SX5 do TOTVS Protheus)
@type Function
@author Adilio Costa
@since 27/06/2023
@version Protheus 12.1.2210
@site https://www.protheusadvpl.com.br
@canal https://www.youtube.com/protheusadvpl
@instagram https://www.instagram.com/protheusadvpl
@Portal ProtheusAdvpl:https://hotmart.com/pt-br/marketplace/produtos/portal-protheusadvpl/O10336806O
*/
User Function fFWGSX5()
Local aDadosSX5 := {}
Local nX
Local cFil := ""
Local cTab := ""
Local cChave := ""
Local cDesc := ""
//Abro o ambiente
//RpcSetType(3)
//PREPARE ENVIRONMENT EMPRESA "99" FILIAL "01" MODULO "COM"
//Obtém os dados da tabela 01 na SX5
aDadosSX5 := FWGetSX5("01")
For nX:=1 To Len(aDadosSX5)
//Obtém a filial(X5_FILIAL)
cFil := aDadosSX5[nX][1]
//Obtém a tabela(X5_TABELA)
cTab := aDadosSX5[nX][2]
//Obtém a chave(X5_CHAVE)
cChave := aDadosSX5[nX][3]
//Obtém a descrição(X5_DESCRI)
cDesc := aDadosSX5[nX][4]
//Exibe no console.log
ConOut("SX5->X5_FILIAL:'" + cFil + "', SX5->X5_TABELA:'" + cTab + "', SX5->X5_CHAVE:'" + cChave + "' , SX5->X5_DESCRI:'" + cDesc + "'")
Next nX
Return
Abaixo temos o console.log(gerado dentro do TOTVS AppServer) mostrando os registros da SX5 através da função FWGetSX5:
Bem, por hoje finalizamos mais um post aqui do Blog/Site ProtheusAdvpl. Espero que você tenha entendido. Se tiver ficado alguma dúvida deixe seu comentário ou mande um e-mail para adiliocosta@protheusadvpl.com.br. Grande abraço e fica com Deus.
Links de referências:
- https://terminaldeinformacao.com/2018/05/29/funcao-pega-os-registros-da-sx5-traz-em-um-array/
- https://tdn.totvs.com/display/public/framework/FWGetSX5