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.
Bom dia,
Estou fazendo um rest para retornar em um GET o xml do documento de saída.
Acontece que a função RetIdEnti esta retornando um ID errado, não o da filial que preciso(filial da NF).
Já verifiquei que o cempant e cfilant estão correto no momento da chamada.
Consegue me ajudar?
Teria o fonte da funcao RetIdEnti?
Obrigado
Bom dia Felipe, tudo joia?
Após você alterar a cFilAnt, alterou também a cNumEmp e usou a função OpenFile() para atualizar na memória?
Segue um link com exemplo: https://terminaldeinformacao.com/2024/04/25/realizando-a-troca-de-empresa-e-filial-com-a-openfile-maratona-advpl-e-tl-376/
Tenha uma ótima e abençoada semana.
Um forte abraço.