Ir para conteúdo
  • Cadastre-se

Adhelmar Rondon

Membros
  • Total de ítens

    330
  • Registro em

  • Última visita

  • Days Won

    1

Tudo que Adhelmar Rondon postou

  1. sei que esse tópico é outro, mais eu tive que usar no retorno do acbrcep em todos os campos UTF8ToNativeString, porque os caracteres estavam vindo estranho e percebi que retorno da NFe também estão vindo assim
  2. É esta uma novela essa nota com difal, cada hora um erro
  3. É então estranho, só se em homologação o sefaz não atualizou
  4. Esse retorno é do sefaz, tem a ver com a alíquota, eu deixei com 12% e passou, apesar de falar que para o Paraná é 19.5, mais o sefaz retorna com erro, apesar que deveriam ter um erro melhor do que esses de atomic type
  5. Bom dia estou enviando nota fiscal em homologação com DIFAL, e esta dando o erro abaixo, alguém passou por isso, até sexta feira eu estava enviando normal
  6. Meu contato 11 93710-4384 Se quiser posso desenvolver e fica com os fontes
  7. Não baixa essa unit, eu acabei pegando campo errado, e o cliente disse que pelo fast esta faltando algumas informações, e Fortes, ficou grande e sempre da duas páginas
  8. segue anexo da unit, precisa analisar não sei se atualizei de forma correta GeisWeb.LerXml.pas
  9. Olá Boa tarde a todos do projeto ACBr Eu alterei o motor do relatório da NFSe, para o Fast, porque o Fortes, esta gerando mais de uma pagina, com isso eu tive que alterar a rotina abaixo da GeisWeb, porque só estava mostrando o código do serviço pelo Fast se puderem adequar essa rotina, agradeço muito gratidão procedure TNFSeR_GeisWeb.LerServico(const ANode: TACBrXmlNode); var AuxNode: TACBrXmlNode; Ok: Boolean; begin AuxNode := ANode.Childrens.FindAnyNs('Servico'); if AuxNode <> nil then begin with NFSe.Servico do begin LerValores(AuxNode); ItemListaServico := ObterConteudo(AuxNode.Childrens.FindAnyNs('CodigoServico'), tcStr); xItemListaServico := ItemListaServicoDescricao(ItemListaServico); Discriminacao := ObterConteudo(AuxNode.Childrens.FindAnyNs('Discriminacao'), tcStr); Discriminacao := StringReplace(Discriminacao, FpQuebradeLinha, sLineBreak, [rfReplaceAll, rfIgnoreCase]); xItemListaServico := Discriminacao; VerificarSeConteudoEhLista(Discriminacao); CodigoMunicipio := ObterConteudo(AuxNode.Childrens.FindAnyNs('MunicipioPrestacaoServico'), tcStr); CodigoTributacaoMunicipio := ItemListaServico; xCodigoTributacaoMunicipio := xItemListaServico; TipoLancamento := StrToTipoLancamento(Ok, ObterConteudo(AuxNode.Childrens.FindAnyNs('TipoLancamento'), tcStr)); NFSe.SituacaoNfse := snNormal; if TipoLancamento = tlCancelado then NFSe.SituacaoNfse := snCancelado; end; end; end;
  10. Boa tarde @Italo Giurizzato Junior Atualizei e testei, grato
  11. Vou fazer assim gerar no Bradesco o pix e depois no CNAB 240 enviar na remessa os dados do pix, pelo segmento Y, assim emitir o boleto sem esperar o retorno da remessa, esperando meu cliente providenciar as credenciais pra gerar o pix
  12. Eu achei o que é o retorno tem uma tag LinkConsulta e nessa tag, mesmo depois da rotina tratar o retorno fica & porque o conteúdo dessa tag é link da danfse, com isso o xmlParseDoc, se perde e da erro, temporariamente estou removendo esses & dessa tag para o meu cliente conseguir emitir a nota
  13. Ítalo, quando vai ler retorno dos xmls da GeisWeb loadedDoc := xmlParseDoc(PAnsiChar(ansistring(AXmlDocument))); XML "xmlParseDoc" EntityRef: expecting ';'
  14. Funciona assim, primeiro envia a remessa com os boletos e depois pegue o retorno, tem que ler o retorno salvar QrCode.emv, para depois você emitir o boleto precisa passar na remessa ACBrBoleto1.Cedente.PIX.Chave ACBrBoleto1.Cedente.PIX.TipoChavePIX e precisa estar habilitado na conta pra gerar qrcode no boleto
  15. no loadfrom do xml de retorno esta dando o erro abaixo, não consegui identificar qual o motivo de não ler o xml de retorno do provedor Método Executado: Enviar Lote Síncrono Parâmetros de Envio Numero do Lote: 33520 Parâmetros de Retorno Data de Envio : 30/12/1899 Numero do Prot: Numero da Nota: Link : Código Verif. : Sucesso : False Erro(s): Código : X999 Mensagem: Erro de Conexão: EntityRef: expecting ';' Correção: ---------
  16. Estou com erros no envio de notas para Campo Limpo Paulista fazendo a consulta em produção lote 50, retorna com um erro 4 e a consulta em homologação lote 35500, levanta uma exceção, não sei se a estrutura do retorno esta errada, a consulta é retorna a nota, mais no componente da erro ao tentar ler o retorno 50-lista-nfse-con-lot-soap.xml 35500-lista-nfse-con-lot-soap.xml
  17. Na consulta por lote da geisweb, como faz pra não ter <?xml version="1.0" encoding="UTF-8"?>
  18. Ítalo, o suporte enviou anexo dizendo consulta do lote corrigido, segue o anexo, será que não é pra informar linha do UTF8? 33500-con-lot_corrigido.xml
  19. Esta dando esse erro ------------------------------ Versão OpenSSL OpenSSL 1.1.1j 16 Feb 2021 01.01.01.0AF C:\ACBr\Exemplos\ACBrDFe\ACBrNFSeX\Delphi\libcrypto-1_1.dll C:\ACBr\Exemplos\ACBrDFe\ACBrNFSeX\Delphi\libssl-1_1.dll ------------------------------ Requisição Ambiente : 2 Cidade : Campo Limpo Paulista/SP Provedor : GeisWeb Versão: 1.00 Data/Hora: 04/03/2024 09:33:20 Método Executado: Enviar Lote Síncrono Parâmetros de Envio Numero do Lote: 33000 Parâmetros de Retorno Data de Envio : 30/12/1899 Numero do Prot: Numero da Nota: Link : Código Verif. : Sucesso : False Erro(s): Código : X999 Mensagem: Erro de Conexão: EntityRef: expecting ';' Correção: --------- Método Executado: Consultar o Lote de Rps Parâmetros de Envio Numero do Prot: Numero do Lote: Parâmetros de Retorno Situação Lote : ID Nota : Sucesso : False NFS-e Numero....: 33000 Cod. Verificacao: Prestador.......: LAVAPANO TEXTIL Tomador.........: INSCRICAO DE TESTE E TESTE
  20. Eu testei com OpenSSL e o erro é mesmo
  21. bom dia Italo
  22. Não sei o que esta acontecendo com o provedor de Campo Limpo GeisWeb, meu cliente não consegue emitir nota e o suporte só sabe falar que o problema é com a internet, em homologação estava conseguindo emitir e agora esta dando erro também em homologação ao enviar da o erro abaixo Erro(s): Código : X999 Mensagem: Erro de Conexão: EntityRef: expecting ';'
  23. É foi o que eu falei pro meu cliente
  24. Olá, pessoal Estou com problemas no envio de nota de serviço para Campo Limpo Paulista, pela homologação esta indo mais em produção da erro porque quando envia o rps, da um erro e quando consulta o lote em produção da o erro em anexo, em homologação no envio do rps, também da o erro, só que a consulta do lote retorna certinho a nota fiscal
×
×
  • 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.