Ir para conteúdo
  • Cadastre-se

Deunerf

Membros
  • Total de ítens

    27
  • Registro em

  • Última visita

Últimos Visitantes

706 visualizações

Deunerf's Achievements

Apprentice

Apprentice (3/14)

  • Dedicated Rare
  • First Post
  • Collaborator Rare
  • Conversation Starter
  • Week One Done

Recent Badges

4

Reputação

1

Community Answers

  1. Bom tarde, sim, estava pegando os Schemas de outra pasta. Assim que apontei para a correta funcionou normalmente. Obrigado pela ajuda Italo.
  2. No momento esta : SSLlib = libWinCrypt , CryptLib = libWinCrypt, HttpLib = httpWinHttp, XmlSignLib = xsLibXml2 SLLType = LT_TLSv1_2 também tentei da seguinte forma: SSLlib = libCustom, CryptLib = libWinCrypt, HttpLib = httpWinINet, XmlSignLib = xsLibXml2 SLLType = LT_TLSv1_2
  3. Bom dia, no provedor ISSnet de Brasilia -DF também ocorre o erro mesmo tipo de erro, porem é quando eu aciono o método Emitir, (sem o modo de Envio ou com modo de envio) "Mensagem: Erro de Validação: --> 1845 - Element '{http://www.abrasf.org.br/nfse.xsd}EnviarLoteRpsEnvio': No matching global declaration available for the validation root."
  4. Olá, Estou fazendo a migração dos projetos para o novo componente ACBRNfseX . E quando envio um RPS no componente para o provedor DBSeller em produção na cidade de Carazinho - RS e na ConsultaNfseRps da mensagem "Erro de Validação: --> 1845 - Element '{http://www.abrasf.org.br/ABRASF/arquivos/nfse.xsd}ConsultarNfseRpsEnvio': No matching global declaration available for the validation root." Porem no soap contem o erro que esta causando no provedor, agora gostaria de saber o que pode ser esse erro, porque para fazer os tratamentos e mensagem para usuário eu devo verificar em cima do xml de retorno, no caso sempre deixar marcado a opção Salvar envelope Soap? Estou com os códigos todos atualizados, apontando para schemas do próprio ACBR. 18442-env-lot.xml 18442-env-lot-soap.xml 18442-rec.xml 18442-rec-soap.xml
  5. bom dia, pelo que estou analisando o erro "Opening and ending tag mismatch: situacao line 1 and li" esta dentro do arquivo comp-nfse-soap.xml no fechamento da tag. Porem não consegui identificar se esta erro esta vindo direto do provedor 151-comp-nfse-soap.xml
  6. Boa tarde, atualizei o projeto todo para novo componente ACBrNFSeX , agora quando faço o ConsultarNFSeporRps esta retornando o seguinte erro "Erro de Conexão: Opening and ending tag mismatch: situacao line 1 and li" porem no soap do arquivo aparece normal. Nas configurações tenho marcado o SSLType = LT_TLSv1_2 Já desinstalei todo o ACBR e baixei em uma nova pasta o repositório e o erro persiste. 13-lista-nfse-ger.xml 13-lista-nfse-ger-soap.xml 131-rps.xml
  7. boa tarde, Estou na versão antiga ainda, como é um projeto mais antigo e tem varias prefeituras não migramos para versão nova. E lendo os comentários no fórum vi que tem bastante problema com este provedor.
  8. Boa tarde, estou fazendo a integração na cidade de Panambi - RS que também usa provedor IPM. Pelo método "ConsultarNFSeporRps" ele sempre retorna vazio mesmo que o RPS já esteja autorizado. Porem se olhar no soap do envio já tem mensagem de autorizado, mas caso não receba a autorização na hora como vocês estão fazendo para pegar a autorização? 6-lista-nfse-soap.xml 6PSE-comp-nfse.xml 6PSE-comp-nfse-soap.xml
  9. Diego, atualizei os códigos fontes e funcionou, porem tive que usar o bat para remover todo os dados do acbr e instalar novamente. Obrigado pela ajuda!
  10. Olá, fiz a atualização dos fontes e no momento que vou imprimir a Danfce da um access violation, fiz teste pelo demo do acbr e ocorre o mesmo problema. Pelo debug o erro esta na linha mLinhaTotalItem.Width := (rlbDetItem.Width - lTotalItem.Width); da procedure TACBrNFeDANFCeFortesFr.rlVendaBeforePrint(Sender: TObject; var PrintIt: boolean); No programa Demo eu vou direto no botão "Imprimir DANFCE" e carrego um xml que esta em anexo. 43221106895107000121650010000008581547089049-nfe.xml
  11. Funcionou corretamente Túlio de Pádua, grato pela ajuda.
  12. Estou usando o delphi 10.2 a principio é versão recente. Fiz as mudanças para RestClient mas tenho uma duvida ainda como devo informar o valor da query. Tentei da forma que esta o código agora e antes com as linhas que estão comentadas e nas duas situações retorna o erro 500, que pela documentação seria "Unexpected error on server.". Porem pelo postman se eu desmarca o file ou query também da erro 500, por isso acredito que forma que estou informando o body que não esteja correto. try Caminho := edtUrlInt.Text; DMAPI.RESTClient.BaseURL := Caminho; DMAPI.RESTClient.ContentType := 'multipart/form-data'; DMAPI.RESTRequest.Client := DMAPI.restClient; DMAPI.RESTRequest.Method := rmPOST; DMAPI.RESTRequest.Response := DMAPI.RESTResponse; DMAPI.RESTRequest.Params.AddHeader('Authorization', 'Bearer ' + access_token); DMAPI.RESTRequest.Params.ParameterByName('Authorization').Options := [poDoNotEncode]; Ret := FindFirst(PastaLocal+'\*.xml', faAnyFile, F); while Ret = 0 do begin if (F.Name <> '.') And (F.Name <> '..') then begin Arquivo := verificaCaminho(PastaLocal) + F.Name; //DMAPI.RESTRequest.AddFile('file[]', arquivo, TRESTContentType.ctAPPLICATION_ATOM_XML); //DMAPI.RESTRequest.AddBody('query={"boxeFile":true}', TRESTContentType.ctAPPLICATION_JSON); DMAPI.RESTRequest.Params.AddItem; DMAPI.RESTRequest.Params.Items[1].name := 'file[]'; DMAPI.RESTRequest.Params.Items[1].Value := Arquivo; DMAPI.RESTRequest.Params.Items[1].ContentType := ctAPPLICATION_XML; DMAPI.RESTRequest.Params.Items[1].Kind := TRESTRequestParameterKind.pkREQUESTBODY; DMAPI.RESTRequest.Params.AddItem; DMAPI.RESTRequest.Params.Items[2].name := 'query'; DMAPI.RESTRequest.Params.Items[2].Value := '{"boxe/File": true}'; DMAPI.RESTRequest.Params.Items[2].ContentType := ctAPPLICATION_JSON; DMAPI.RESTRequest.Params.Items[2].Kind := TRESTRequestParameterKind.pkREQUESTBODY; DMAPI.restRequest.Execute(); if(DMAPI.RESTResponse.StatusCode = 201)then begin mmoInfo.Lines.add('Arquivo Enviado ' + DMAPI.RESTResponse.Content); Application.ProcessMessages; end else begin mmoInfo.Lines.add('Falha ao enviar o arquivo ' + DMAPI.RESTResponse.Content); Application.ProcessMessages; end; end; Ret := FindNext(F); end; except on e: Exception do showmessage(e.Message); end;
  13. Vou fazer teste com restclient a documentação esta nesse link https://developerportal.thomsonreuters.com/onvio-br-accounting-api/swagger_openapi_document/invoiceintegrationresource?from=api&id=9306#/Batch/createBatch
  14. Olá amigos, Estou fazendo a integração do meu ERP com a Api da Onvio (Domínio) pelo Delphi 10, mas estou com dificuldade de enviar o xml para a Api. Precisa ser enviado dois parâmetros no body que é o arquivo e a query e como estou utilizando o IdHTTP não sei como informar eles em conjunto. Hoje da forma que eu envio da retorno de erro "HTTP 415 Unsupported Media Type"; function TfrmIntOnvio.EnviarArquivosApi:Boolean; var F: TSearchRec; Ret: Integer; Auth : TNetHeaders; Caminho, Arquivo : String; Resultado: TStringStream; xReqBody: TStringStream; ArqOnvio: TIdMultiPartFormDataStream; Arq: TStringStream; begin try Caminho := edtUrlInt.Text; ArqOnvio := TIdMultiPartFormDataStream.Create; Auth := [TNetHeader.Create('Authorization', 'Bearer ' + access_token)]; Ret := FindFirst(PastaLocal+'\*.xml', faAnyFile, F); while Ret = 0 do begin if (F.Name <> '.') And (F.Name <> '..') then begin Arquivo := verificaCaminho(PastaLocal) + F.Name; Arq := TStringStream.Create('file[]=' + Arquivo + '&' + 'query={"boxe/File": true};application/json',TEncoding.UTF8); Resultado := TStringStream.Create('', TEncoding.UTF8); DMAPI.httpApi.Post(Caminho, Arq, Resultado, Auth); mmoInfo.Lines.add('Arquivo Enviado ' + Resultado.DataString); Application.ProcessMessages; end; Ret := FindNext(F); end; except on e: Exception do showmessage(e.Message); end; end; Na imagem tem exemplo funcional no postmam que pessoal do suporte da Api me enviou.
  15. Resolvido a impressão, apos mudar o tipo para emitir as notas em produção o sistema Acbr imprimiu corretamente.
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.