Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Aviso
titleUtilização da classe

É necessário ter as credenciais (ClientId e Secret) do TotvsApps já cadastradas para utilizar a classe, certifique-se de ter feito o processamento do CarolWizard.

Mais informações do Wizard na documentação: FWCarolWizard.

Objetivos

Classe criada para realização da comunicação com o Totvs Link para subida de dados.

TotvsLink é um mecanismo de troca de mensagens entre aplicações que utiliza um serviço de fila (rabbit) recebendo requisições através do protocolo HTTP.

Métodos

New

Construtor que realiza o setup da fila

Sintaxe: FwTotvsLinkClient():New()→ Nil

Receive

Verifica se existem mensagens no Totvs Link

Sintaxe: FwTotvsLinkClient():Receive()-> lSuccess

GetMessage

Recupera a última mensagem carregada no objeto

Sintaxe: FwTotvsLinkClient():GetMessage()-> self:oMessage

Success

Notifica que a última mensagem recebida foi processada com sucesso

Sintaxe: FwTotvsLinkClient():Success()-> lSuccess

Fail

Notifica que a última mensagem recebida não foi processada com sucesso

Sintaxe: FwTotvsLinkClient():Fail()-> lSuccess

Send

Envia uma mensagem para a fila do Totvs Link

...

Sintaxe: FwTotvsLinkClient():Send(< cType >, < cMessage >)-> lSuccess

SendAudience

Envia uma mensagem para a fila do Totvs Link usando audience

...

Bloco de código
titleExemplo de uso - SendAudience()
collapsetrue
User Function SendMsgSecond()
    Local oClient as object
    Local cMessage as character
    Local lSuccess as logical

    RpcSetEnv("99", "01")

    oClient := FwTotvsLinkClient():New()

    BeginContent Var cMessage
    {
        "header": {
            "type": "Framework",
            "tenantId": "e21c8e75-9dfc-4169-a599-e233538d72a4",
            "erpTenant": {
                    "protheus":"99"
            },
            "generatedOn": "2021-06-08T15:18:08.367574Z",
            "locale": "pt_BR"

        },
        "content": {
            "requestID": "1bc180de-ef14-4b75-83ac-b73ed1fa7518",
            "identifiers": {
                "CPF": "98954898765"
            },
            "roles": []
        }
    }
    EndContent

    lSuccess := oClient:SendAudience("Teste Frame", "FrameWork", cMessage)
    
Return lSuccess

Informações relacionadas:

...