Nesse vídeo demonstraremos a utilização da função JurRelaSX9, que serve para buscar informações de relacionamentos entre as tabelas do Protheus.

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

//Bibliotecas
#Include "TOTVS.ch"

/*/{Protheus.doc} User Function zExe318
Retorna informações da relacionamentos (SX9)
@type Function
@author Atilio
@since 25/02/2023
@obs 
    JurRelaSX9
    Parâmetros
        Recebe o alias da tabela
        Recebe se deve retornar a descrição (nome) da Tabela (.T.) ou não (.F.)
        Define qual vai ser o tipo de relacionamento a ser buscado pela origem (X9_DOM) ou pelo destino (X9_CDOM)
    Retorno
        Retorna um Array com as informações

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

User Function zExe318()
    Local aArea      := FWGetArea()
    Local aDados     := ""

    //Monta a mensagem e exibe
    aDados := JurRelaSX9("SC5", .T., 1)
    FWAlertInfo("Foi encontrado [" + cValToChar(Len(aDados)) + "] relacionamentos com a SC5", "Teste JurRelaSX9")

    FWRestArea(aArea)
Return

Bom pessoal, por hoje é só.

Abraços e até a próxima.

Tags: AdvPLMaratonaProtheusTL++