- Fórum
- Protheus/Microsiga/Totvs
- Instalação e Configuração Protheus
- Tecnologia Protheus
- Requisições HTTP GET, POST e PUT para integrar com MeusPedidos.com.br
Perguntas Requisições HTTP GET, POST e PUT para integrar com MeusPedidos.com.br
- ellenmuraro
- Desconectado
- Membro Iniciado
-
Menos
Mais
- Postagens: 2
- Obrigados Recebidos: 0
10 anos 4 meses atrás #26047
por ellenmuraro
Respondido por ellenmuraro no tópico Requisições HTTP GET, POST e PUT para integrar com MeusPedidos.com.br
Boa noite,
conseguiu a integracao? tamboem estou em busca de uma integracao semelhante.
conseguiu a integracao? tamboem estou em busca de uma integracao semelhante.
Por favor Acessar ou Registrar para participar da conversa.
- juniorsobral
- Desconectado
- Membro Iniciado
-
Menos
Mais
- Postagens: 3
- Obrigados Recebidos: 0
9 anos 2 meses atrás #29904
por juniorsobral
Respondido por juniorsobral no tópico Requisições HTTP GET, POST e PUT para integrar com MeusPedidos.com.br
Pessoal, bom dia.
Estou tentando fazer uma integração rest, porém, ao executar um POST, sempre me retorna uma mensagem: "Http Invalid Connection".
Alguém poderia me dar uma Luz no que poderia ser?
User Function tstFwRestTest()
Local cUrl := " aaa.com.br "
Local cUser := "user"
Local cPass := "pass"
Local cPathTemp := "c:\temp\"
Local oRestClient := FWRest():New(cUrl)
Local aHeader := {}
// inclui o campo Authorization no formato <usuario>:<senha> na base64
Aadd(aHeader, "Authorization: Basic " + Encode64(cUser+":"+cPass))
aAdd(aHeader, 'Content-type: text/x-json' )
//Cabecalho dos campos
aCab := {"name", "phonenumber" , "email" , "model", "imei",;
"plan", "planprice", "coo", "date", "payment_method",;
"installments", "external_id", "store_external_id",;
"fiscal_document_number", "seller_identifier", "customer_document_number"}
//Itens (Que Será o aEstr Recebido como Parâmetro na Função)
aLin := {{ "UserName", "11999991010",;
"username@user.com.br","teste",;
"1234567890123", 1, 300.50, "030662",;
"2013-11-21", "upfront", 1, "12020",;
"1100", "000928", "22233344400", "1234567890" }}
//Chama a função para converter em JSON.
cJSON := U_JSON( {"order" , aCab, aLin} )
oRestClient:SetPath("/api/orders")
oRestClient:SetPostParams(cJSON)
If oRestClient:Post(aHeader) //<-- AQUI RETORNA .F. com o HTTP INVALID CONNECTION
Alert("POST - " + oRestClient:GetResult())
Else
Alert("POST - " + oRestClient:GetLastError())
EndIf
Estou tentando fazer uma integração rest, porém, ao executar um POST, sempre me retorna uma mensagem: "Http Invalid Connection".
Alguém poderia me dar uma Luz no que poderia ser?
User Function tstFwRestTest()
Local cUrl := " aaa.com.br "
Local cUser := "user"
Local cPass := "pass"
Local cPathTemp := "c:\temp\"
Local oRestClient := FWRest():New(cUrl)
Local aHeader := {}
// inclui o campo Authorization no formato <usuario>:<senha> na base64
Aadd(aHeader, "Authorization: Basic " + Encode64(cUser+":"+cPass))
aAdd(aHeader, 'Content-type: text/x-json' )
//Cabecalho dos campos
aCab := {"name", "phonenumber" , "email" , "model", "imei",;
"plan", "planprice", "coo", "date", "payment_method",;
"installments", "external_id", "store_external_id",;
"fiscal_document_number", "seller_identifier", "customer_document_number"}
//Itens (Que Será o aEstr Recebido como Parâmetro na Função)
aLin := {{ "UserName", "11999991010",;
"username@user.com.br","teste",;
"1234567890123", 1, 300.50, "030662",;
"2013-11-21", "upfront", 1, "12020",;
"1100", "000928", "22233344400", "1234567890" }}
//Chama a função para converter em JSON.
cJSON := U_JSON( {"order" , aCab, aLin} )
oRestClient:SetPath("/api/orders")
oRestClient:SetPostParams(cJSON)
If oRestClient:Post(aHeader) //<-- AQUI RETORNA .F. com o HTTP INVALID CONNECTION
Alert("POST - " + oRestClient:GetResult())
Else
Alert("POST - " + oRestClient:GetLastError())
EndIf
Por favor Acessar ou Registrar para participar da conversa.
- juscelino
- Desconectado
- Membro Júnior
-
Menos
Mais
- Postagens: 29
- Obrigados Recebidos: 0
8 anos 1 mês atrás #31817
por juscelino
Respondido por juscelino no tópico Requisições HTTP GET, POST e PUT para integrar com MeusPedidos.com.br
Bom Dia , Octavio.
O seu topico ja tem um bom tempo e tambem a duvida que eu tenho e um pouco diferente da sua , mais como percebi que você tem mais tempo utilizando o REST , gostaria de saber se você tem como tirar a minha duvida abaixo:
Eu ja vi aqui nos foruns tem varios exemplos de como envia a Autenticação para o Serviço REST do Protheus , mais eu gostaria de um Exemplo de como esses dados de Autenticação e tratado do Lado do Serviço REST no Protheus.
Segue abaixo um Exemplo de Client que vi aqui no forum fazendo uma Requisição com Autenticação para o Serviço REST Protheus , mais eu preciso de um Exemplo de como essa autenticação e Recebida e tratada do Lado do Serviço REST PROTHEUS.
User Function tstFwRestTest()
Local cUrl := " seuendereco.com.br "
Local cUser := "usuario"
Local cPass := "senha"
Local oRestClient := FWRest():New(cUrl)
Local aHeader := {}
// inclui o campo Authorization no formato : na base64
Aadd(aHeader, "Authorization: Basic " + Encode64(cUser+":"+cPass))
/*GET */
oRestClient:SetPath("/teste/produto/search?q=Nome%20do%20Produto")
If oRestClient:Get(aHeader)
Alert("GET - " + oRestClient:GetResult())
Else
Alert("GET - " + oRestClient:GetLastError())
EndIf
Se você tiver um exemplo agradeço.
Obrigado.
O seu topico ja tem um bom tempo e tambem a duvida que eu tenho e um pouco diferente da sua , mais como percebi que você tem mais tempo utilizando o REST , gostaria de saber se você tem como tirar a minha duvida abaixo:
Eu ja vi aqui nos foruns tem varios exemplos de como envia a Autenticação para o Serviço REST do Protheus , mais eu gostaria de um Exemplo de como esses dados de Autenticação e tratado do Lado do Serviço REST no Protheus.
Segue abaixo um Exemplo de Client que vi aqui no forum fazendo uma Requisição com Autenticação para o Serviço REST Protheus , mais eu preciso de um Exemplo de como essa autenticação e Recebida e tratada do Lado do Serviço REST PROTHEUS.
User Function tstFwRestTest()
Local cUrl := " seuendereco.com.br "
Local cUser := "usuario"
Local cPass := "senha"
Local oRestClient := FWRest():New(cUrl)
Local aHeader := {}
// inclui o campo Authorization no formato : na base64
Aadd(aHeader, "Authorization: Basic " + Encode64(cUser+":"+cPass))
/*GET */
oRestClient:SetPath("/teste/produto/search?q=Nome%20do%20Produto")
If oRestClient:Get(aHeader)
Alert("GET - " + oRestClient:GetResult())
Else
Alert("GET - " + oRestClient:GetLastError())
EndIf
Se você tiver um exemplo agradeço.
Obrigado.
Por favor Acessar ou Registrar para participar da conversa.
- bruno.goliato
- Desconectado
- Membro Iniciado
-
Menos
Mais
- Postagens: 18
- Obrigados Recebidos: 0
8 anos 4 semanas atrás #31902
por bruno.goliato
Respondido por bruno.goliato no tópico Requisições HTTP GET, POST e PUT para integrar com MeusPedidos.com.br
Boa tarde alguém consegui alguma coisa, estou tentando fazer com um HTTPS e nem consigo conectar.
Por favor Acessar ou Registrar para participar da conversa.
- Fórum
- Protheus/Microsiga/Totvs
- Instalação e Configuração Protheus
- Tecnologia Protheus
- Requisições HTTP GET, POST e PUT para integrar com MeusPedidos.com.br
Tempo para a criação da página:0.123 segundos