Nesse vídeo demonstraremos a utilização da função RetTitle, que serve para buscar o título de um campo, conforme o dicionário (SX3).

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

//Bibliotecas
#Include "TOTVS.ch"

/*/{Protheus.doc} User Function zExe422
Retorna o título de um campo conforme a SX3
@type Function
@author Atilio
@since 29/03/2023
@obs 
    Função RetTitle
    Parâmetros
        Recebe o nome do campo
        Tamanho a se considerar do retorno (por exemplo trazer apenas as 5 primeiras letras)
        Define se irá restaurar a posição que estava da SX3 (.T. ou .F.)
    Retorno
        Retorna uma string com o título do campo conforme o idioma

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

User Function zExe422()
    Local aArea      := FWGetArea()
    Local cCampo     := ""
    Local cTitulo    := ""

    //Buscando o título de um campo
    cCampo     := "A1_RECISS"
    cTitulo    := RetTitle(cCampo)
    FWAlertInfo("O titulo do campo '" + cCampo + "' é '" + cTitulo + "'", "Teste RetTitle")

    FWRestArea(aArea)
Return

Bom pessoal, por hoje é só.

Abraços e até a próxima.

Tags: AdvPLMaratonaProtheusTL++