Páginas filhas
  • Exemplo de consumo sem autenticação

Versões comparadas

Chave

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

Configure a chave SECURITY da seção Socket com valor 0 (zero) para testar o código abaixo

Bloco de código
linenumberstrue
#include "totvs.ch"

User Function restSample()
Local oRestClient := FWRest():New("http://localhost:8080")
Local aHeader := {"tenantId: 99,01"}

oRestClient:setPath("/rest/sample?startIndex=2&count=10")
If oRestClient:Get(aHeader)
   ConOut("GET", oRestClient:GetResult())
   ConOut(
Else
   ConOut("GET", oRestClient:GetLastError())
EndIf

oRestClient:setPath("/rest/sample/1")
If oRestClient:Get(aHeader)
   ConOut("GET", oRestClient:GetResult())
Else
   ConOut("GET", oRestClient:GetLastError())
EndIf

If oRestClient:Post(aHeader)
   ConOut("POST", oRestClient:GetResult())
Else
   ConOut("POST", oRestClient:GetLastError())
EndIf

If oRestClient:Put(aHeader)
   ConOut("PUT", oRestClient:GetResult())
Else
   ConOut("PUT", oRestClient:GetLastError())
EndIf

If oRestClient:Delete(aHeader)
   ConOut("DELETE", oRestClient:GetResult())
Else
   conout(   ConOut("DELETE", oRestClient:GetLastError())
EndIf
Return 

Veja também

FWRest