Versões comparadas
Chave
- Esta linha foi adicionada.
- Esta linha foi removida.
- A formatação mudou.
Composition Setup |
---|
import.css=/download/attachments/327912/newLayout.css |
...
...
Painel | |||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|
NewSintaxe
|
...
Painel | |||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|
SetPathSintaxe
|
...
Painel |
---|
GetSintaxe |
...
método getResult para pegar o resultado |
...
método GetLastError para verificar o erro.
|
...
|
...
|
...
|
Painel |
---|
GetResultSintaxe |
...
conteúdo valido |
...
retornado pela uma chamada ao |
...
método Get ou Post |
Painel |
---|
GetLastErrorSintaxe |
...
retornado pela uma chamada ao |
...
método Get ou Post |
...
Operação |
...
Painel |
---|
PostSintaxe |
...
método getResult para pegar o resultado |
...
método GetLastError para verificar o erro.
|
...
|
...
|
...
conseguir fazer a conexão. |
...
Painel |
---|
SetPostParamsSintaxe |
...
string de |
...
parâmetro do Post
|
...
|
...
Painel |
---|
PutSintaxe |
...
método getResult para pegar o resultado |
...
método GetLastError para verificar o erro.
|
...
|
...
|
...
Painel |
---|
DeleteSintaxe |
...
método getResult para pegar o resultado |
...
método GetLastError para verificar o erro.
|
...
|
...
|
Painel | ||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
SetChkStatusSintaxe Descrição
|
Painel | ||
---|---|---|
GetChkStatusSintaxe Descrição
|
Painel | ||
---|---|---|
GetHTTPCodeSintaxe Descrição
|
Painel | ||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
SetGetParamsSintaxe Descrição Parâmetros
|
Painel | ||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
SetLegacySuccessSintaxe Ex.:
|
Painel | ||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
SetTimeOutSintaxe Descrição Parâmetros
|
Exemplo:
Bloco de código | ||||
---|---|---|---|---|
| ||||
user function tstFwRestTest()
local oRestClient as object
oRestClient := FWRest():New("http://code.google.com")
oRestClient:setPath("/p/json-path/")
if oRestClient:Get()
ConOut(oRestClient:GetResult())
else
ConOut(oRestClient:GetLastError())
endif
return |
Exemplo de envio de arquivo .
...
gz:
Bloco de código | ||||
---|---|---|---|---|
| ||||
#include "protheus.ch"
//-------------------------------------------------------------------
/*/{Protheus.doc} x16165
Função para post na API /api/batch/contratos em
https://seusite.com.br, utilizando da classe
@sample U_x16165()
@author Daniel Mendes
@since 22/03/2019
@version 1.0
/*/
//-------------------------------------------------------------------
user function x16165()
local oRestClient as object
local cUrl as char
local cPath as char
local aHeadOut as array
local oFile as object
cUrl := "https://seusite.com.br"
cPath := "/api/batch/contratos"
aHeadOut := {}
Aadd(aHeadOut, "Authorization: Basic " + Encode64("app01:fTdUlDgdQQ4MRQhLahykiKhON6k97Zfly5SV6fwpa5zCE"))
Aadd(aHeadOut, "Content-Type: application/json")
Aadd(aHeadOut, "Content-Encoding: gzip")
oFile := FwFileReader():New("\contratos_20190316.gz")
if oFile:Open()
oRestClient := FWRest():New(cUrl)
oRestClient:SetPath(cPath)
oRestClient:SetPostParams(Encode64(oFile:FullRead()))
oFile:Close()
if oRestClient:Post(aHeadOut)
showResult(oRestClient:GetResult())
else
showResult(oRestClient:GetLastError())
endif
FreeObj(oRestClient)
endif
FreeObj(oFile)
return
//-------------------------------------------------------------------
/*/{Protheus.doc} showResult
Exibe o resultado do método POST, sendo em console ou tela
@param cValue String contendo o conteúdo que será exibido
@sample showResult("Teste")
@author Daniel Mendes
@since 22/03/2019
@version 1.0
/*/
//-------------------------------------------------------------------
static function showResult(cValue)
if IsBlind()
Conout(cValue)
else
MsgInfo(cValue)
endif
return |