Obtendo Informações de Tabelas Genéricas(SX5) com FWGetSX5 em ADVPL

#include 'protheus.ch'
#include 'rwmake.ch'
#INCLUDE "TBICONN.CH"
/*{Protheus.doc} User Function fFWGSX5
    (Essa função tem por finalidade mostrar a função FWGetSX5 em ADVPL)
    @type  Function
    @author Adilio Costa
    @since 27/06/2023
    @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 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