Nesse vídeo demonstraremos a utilização da função GetSX3Cache, que serve para buscar informações de campos na SX3.

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

//Bibliotecas
#Include "TOTVS.ch"

/*/{Protheus.doc} User Function zExe288
Busca um conteúdo de uma informação da SX3
@type  Function
@author Atilio
@since 21/02/2023
@see https://tdn.totvs.com/pages/releaseview.action?pageId=6815033
@obs 
    
    Função GetSX3Cache
    Parâmetros
        + cSX3Campo   , Caractere       , Nome do campo que será buscado
        + cCampo      , Caractere       , Nome do campo do dicionário
    Retorno
        + uValor      , Indefinido      , Retorna o conteúdo do campo

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

User Function zExe288()
    Local aArea      := FWGetArea()
    Local cCampo     := "A1_HRCAD"
    Local cMensagem  := ""

    //Busca as informações do campo
    cMensagem += "Inic. Padrão: " + GetSX3Cache(cCampo, "X3_RELACAO") + CRLF
    cMensagem += "Tipo: " + GetSX3Cache(cCampo, "X3_TIPO") + CRLF
    cMensagem += "Título: " + GetSX3Cache(cCampo, "X3_TITULO") + CRLF
    cMensagem += "Contexto: " + GetSX3Cache(cCampo, "X3_CONTEXT")

    //Exibe uma mensagem
    FWAlertInfo(cMensagem, "Teste GetSX3Cache")

    FWRestArea(aArea)
Return

Bom pessoal, por hoje é só.

Abraços e até a próxima.

Tags: AdvPLMaratonaProtheusTL++