Nesse vídeo demonstraremos a utilização da função ExisteSX2, que serve para validar se uma tabela existe no dicionário de dados do Protheus.

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

//Bibliotecas
#Include "TOTVS.ch"

/*/{Protheus.doc} User Function zExe160
Verifica se uma tabela existe no dicionário
@type Function
@author Atilio
@since 18/12/2022
@obs 
    Função ExisteSX2
    Parâmetros
        + Nome da tabela a ser validada
    Retorno
        + .T. Se a tabela existir ou .F. se ela não existir

    **** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao ****
/*/

User Function zExe160()
    Local aArea     := FWGetArea()

    //Teste 1 com uma tabela padrão
    If ExisteSX2("SA1")
        FWAlertSuccess("Tabela SA1 encontrada", "Teste 1 ExisteSX2")
    Else
        FWAlertError("Tabela SA1 não encontrada", "Teste 1 ExisteSX2")
    EndIf

    //Teste 2 com uma tabela customizada
    If ExisteSX2("ZY0")
        FWAlertSuccess("Tabela ZY0 encontrada", "Teste 2 ExisteSX2")
    Else
        FWAlertError("Tabela ZY0 não encontrada", "Teste 2 ExisteSX2")
    EndIf
    
    FWRestArea(aArea)
Return

Bom pessoal, por hoje é só.

Abraços e até a próxima.

Tags: AdvPLMaratonaProtheusTL++