Nesse vídeo demonstraremos a utilização da função RetIdEnti, que serve para buscar o ID da Entidade da empresa configurada no TSS.

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

//Bibliotecas
#Include "TOTVS.ch"

/*/{Protheus.doc} User Function zExe415
Busca o código da entidade no TSS (se estiver configurado) conforme empresa e filial logadas
@type Function
@author Atilio
@since 28/03/2023
@obs 

    Função RetIdEnti
    Parâmetros
        Recebe se usa o TOTVS Colaboração (.T. ou .F.)
    Retorno
        Retorna o código da entidade caso o TSS esteja configurado

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

User Function zExe415()
    Local aArea     := FWGetArea()
    Local cIdent    := ""

    //Busca o código da entidade (no TSS) e exibe
    cIdent := RetIdEnti()
    FWAlertInfo("O código da Entidade é: " + cIdent, "Teste RetIdEnti")

    FWRestArea(aArea)
Return

Bom pessoal, por hoje é só.

Abraços e até a próxima.

Tags: AdvPLMaratonaProtheusTL++