Nesse vídeo demonstraremos a utilização da classe FWSX2Util, que serve para buscar as informações das tabelas (SX2) no dicionário de dados.

Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:

//Bibliotecas
#Include "TOTVS.ch"

/*/{Protheus.doc} User Function zExe250
Classe para buscar informações da SX2 (Tabelas)
@type  Function
@author Atilio
@since 20/02/2023
@see https://tdn.totvs.com/display/public/framework/FWSX2Util
@obs 
    
    **** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao ****
/*/

User Function zExe250()
    Local aArea      := FWGetArea()
    Local aDados     := {}
    Local aBuscar    := {"X2_ARQUIVO", "X2_NOME", "X2_UNICO"}

    //Busca as informações da SX2 da tabela de produtos
    aDados := FwSX2Util():GetSX2Data("SB1", aBuscar, .F.)

    //Exibe uma mensagem
    FWAlertInfo("Foi encontrado " + cValToChar(Len(aDados)) + " dado(s)", "Teste FWSX2Util")

    FWRestArea(aArea)
Return

Bom pessoal, por hoje é só.

Abraços e até a próxima.

Tags: AdvPLMaratonaProtheusTL++