wanderlei

Pessoal alguém conseguiu enviar arquivo para o DropBox?

Olá Pessoal, estou desenvolvendo a integração com o IntegraFarma e estou com dificuldade de enviar o arquivo zipado pelo webservice, estou tentando assim:cParm := '--12345'+;'Content-Disposition: form-data; name="datarey.gz"'+;'--12345--'oServer:=CreateObject( "MSXML2.ServerXMLHTTP")oServer:Open( "POST", 'https://hml-integration.yandeh.com.br/categories' , .f. )oServer:setRequestHeader("Authorization", "D45F40CD443E486B96BC7E551991AA0A" )oServer:setRequestHeader("Content-type", "multipart/form-data; boundary=12345" )oServer:Send( cParm )mas não funciona, alguém já fez este tipo de envio?

é um arquivo zipado com a extensão .gz

Boa Tarde Pessoal, Preciso criar um arquivo compactado com gzip, alguem tem uma função para isso?

Consegui, caso alguém precise de um exemplo. <soapenv:Envelope xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/" xmlns:aut="http://autorizadorws.ultracard.ultramax.com.br" xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"> <soapenv:Header/> <soapenv:Body> <aut:executarSolicitarAutorizacao soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"> <estabelecimento xsi:type="urn:IdentificacaoEstabelecimento" xmlns:urn="urn:bean.service.ultracard.ultramax.com.br"> <codigo>900</codigo> <nomeAdministradora>ULTRALINK</nomeAdministradora> <senha>123456</senha> </estabelecimento> <autorizacao xsi:type="urn:AutorizacaoRequestV2" xmlns:urn="urn:bean.service.ultracard.ultramax.com.br"> <codigoCliente>100008,</codigoCliente> <versao xsi:type="xsd:int">2</versao> <codigoDependente>0</codigoDependente> <codigoSubsidio>100</codigoSubsidio> <numeroRegistroPrescritor>0</numeroRegistroPrescritor> <conselhoPrescritor/> <estadoConselhoPrescritor/> <produtos> <ProdutoV2> <codigoBarra>7896641803871</codigoBarra> <descricao>NEOSALDINA DRG 1X20</descricao> <codigoFabricante>9</codigoFabricante> <fabricante>TAKEDA PHA</fabricante> <precoBrutoLoja>20.29</precoBrutoLoja> <precoLiquidoLoja>20.29</precoLiquidoLoja> <quantidade>1</quantidade> <subTotalLiquidoLoja>20.29</subTotalLiquidoLoja> <porcentagemDesconto>0.00</porcentagemDesconto> <idGrupoProduto>4</idGrupoProduto> </ProdutoV2> </produtos> <vendaEntrega>false</vendaEntrega> </autorizacao> </aut:executarSolicitarAutorizacao> </soapenv:Body> </soapenv:Envelope>

Sim, já lê a documentação e já fiz dois Metodos, sendo eles: executarConsultarTabelaGruposProduto executarConsultarCliente essas duas já tenho o retorno certinho, o problema que estou tendo é para montar o XML do Metodo executarSolicitarAutorizacao. Exemplo: <?xml version="1.0" standalone="no"?> <soapenv:Envelope targetNamespace="http://farmaecia.ultramax.com.br:8080/ultracard/services/AutorizadorV2WS" xmlns:apachesoap="http://xml.apache.org/xml-soap" xmlns:impl="http://farmaecia.ultramax.com.br:8080/ultracard/services/AutorizadorV2WS" xmlns:intf="http://farmaecia.ultramax.com.br:8080/ultracard/services/AutorizadorV2WS" xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/" xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:tns1="urn:bean.service.ultracard.ultramax.com.br" xmlns:wsdl="http://schemas.xmlsoap.org/wsdl/" xmlns:wsdlsoap="http://schemas.xmlsoap.org/wsdl/soap/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"> <soapenv:Body> <tns1:executarSolicitarAutorizacao xmlns:tns1="http://farmaecia.ultramax.com.br:8080/ultracard/services/AutorizadorV2WS"> <tns1:IdentificacaoEstabelecimento> <codigo>900</codigo> <nomeAdministradora>ULTRALINK</nomeAdministradora> <senha>123456</senha> </tns1:IdentificacaoEstabelecimento> <tns1:AutorizacaoRequestV2> <codigoCliente>100008</codigoCliente> <codigoDependente/> <codigoSubsidio>200</codigoSubsidio> <conselhoPrescritor>CRM</conselhoPrescritor> <dataReceita>2019-05-27</dataReceita> <estadoConselhoPrescritor>SP</estadoConselhoPrescritor> <numeroRegistroPrescritor>50940</numeroRegistroPrescritor> <vendaEntrega>false</vendaEntrega> <produtos id="id0" soapenc:root="0" soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xmlns:ns2="urn:bean.service.ultracard.ultramax.com.br" xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/" xsi:type="tns1:executarSolicitarAutorizacaoRequest"> <ProdutoV2 soapenc:arrayType="tns2:ProdutoV2[1]" xsi:type="soapenc:Array"> <ProdutoV2 href="#id1"/> </ProdutoV2> </produtos> <produtos id="id1" soapenc:root="0" soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xmlns:ns3="urn:bean.service.ultracard.ultramax.com.br" xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/" xsi:type="tns1:ProdutoV2"> <codigoBarra>7891010568757</codigoBarra> <descricao>DESCRICAO DO PRODUTO</descricao> <codigoFabricante>123</codigoFabricante> <fabricante>TESTE</fabricante> <precoBrutoLoja>2,00</precoBrutoLoja> <precoLiquidoLoja>2,00</precoLiquidoLoja> <Quantidade>2</Quantidade> <subTotalLiquidoLoja>4,00</subTotalLiquidoLoja> <porcentagemDesconto>0</porcentagemDesconto> <idGrupoProduto>8</idGrupoProduto> </produtos> </tns1:AutorizacaoRequestV2> </tns1:executarSolicitarAutorizacao> </soapenv:Body> </soapenv:Envelope> o endereço do webservice: http://ultralink.ultramax.com.br:8080/ultracard/services/AutorizadorV2WS?wsdl

Boa tarde pessoal, Preciso fazer a integração com o ultracard e estou com dificuldades de montar o xml do Metodo executarSolicitarAutorizacao(), alguem pode me ajudar?

Oi Ariston, o ambiente de homologação está fora do ar já tem alguns meses, só o de produção é que está funcionando.

olá pessoal, não consigo, alguem ai já fez esta integração?

Valeu Kapiaba.

Bom dia Pessoal, Estou precisando implantar a integração com o BigConect para consumir o webservice do FebraFar, alguem j-a tem algum exemplo de Listar as Empresas?

Eu ainda não desenvolvi a integração, apenas testei a comunicação que o Samir disponibilizou, mas assim que concluir a função vou disponibiliza-la aqui.

Deu certo Samir, Obrigado.

Valeu Samir, vou testar.

Bom dia Pessoal, Preciso desenvolver uma função para recarga de celular usando o https via post, porem não tenho ideia de como passar os parâmetros. Peguei um exemplo muito antigo, mas não funciona ele retorna que os parâmetros não foram enviados via POST. ******************************************************************************** *** Programa..: RECARGA.PRG *** *** Data......: 05/05/2016 *** *** Módulo....: Recarga de celular - cellcard *** *** Autor.....: Wanderlei Cardoso de Oliveira *** ******************************************************************************** #include "directry.ch" #include "Fileio.ch" #include "tip.ch" **************************************************************************** FUNCTION Consulta_Produto_Recarga() **************************************************************************** * * envia o arquivo xml via https * Parametros: arquivo xml a ser enviado * **************************************************************************** LOCAL cXML := Montaxml(), oHttp try oHttp = CreateObject( "MSXML2.ServerXMLHTTP.5.0") catch Msginfo("Erro na criação do objeto MSXML2.XMLHTTP : " + Ole2TxtError()) return NIL end oHttp:open("POST", "https://www.cellcard.com.br/teste/integracao_xml.php", .F.) oHttp:SetRequestHeader("Content-Type", "text/xml; charset=utf-8" ) oHttp:send( cXML ) oHttp:WaitForResponse( 5000 ) Msginfo( oHttp:responseText,'Resposta' ) RETURN( oHttp:responseText ) ******************************************************************************** FUNCTION Montaxml() ******************************************************************************** local oXml, oTag local Timestamp := STRTRAN(DTOC(date()),"/","") + STRTRAN(LEFT(time(),5),":","") local codcompra := "" , codprod := "" , cvalor := "" , cddd := "" local cfone := "" , codret := "" , dtconsul := "" , codonline := "" oXml := TXmlDoc():New() oTag := TXmlTag():New( oXml, 'cellcard' ) oTag:addTag( 'versao', '3.94' ) oTag:addTag( 'codigo_transacao', '1' ) oTag:addTag( 'loja_primaria', 'teste' ) oTag:addTag( 'nome_primario', 'teste' ) oTag:addTag( 'senha_primaria', 'teste' ) /* oTag:addTag( 'compra', '' ) oTag:addTag( 'produto', '' ) oTag:addTag( 'valor', '' ) oTag:addTag( 'ddd', '' ) oTag:addTag( 'fone', '' ) oTag:addTag( 'id_terminal', '000001' ) oTag:addTag( 'uf_terminal', 'GO' ) oTag:addTag( 'dataHoraOperacao', '1' ) oTag:addTag( 'versao', '3.94' ) oTag:addTag( 'cod_retorno', '' ) oTag:addTag( 'dataConsulta', dtos(Date()) ) oTag:addTag( 'cod_online', '' ) */ *---> Salva o arquivo XML no disco <---* cTexto := oXml:SaveFile() ferase("Cellcard.XML") handle := fcreate("Cellcard.XML") fwrite(handle,cTexto) fClose(handle) RETURN( cTexto ) os parâmetros: codigo_transacao integer 1 loja_primaria String Login da loja nome_primario string Login do usuário senha_primaria String Senha do usuário versao Decimal 3.94 Integracao XML 395.pdf