Ir para conteúdo
  • Cadastre-se

Diego Foliene

Consultores
  • Total de ítens

    5.312
  • Registro em

  • Última visita

  • Days Won

    155

Tudo que Diego Foliene postou

  1. Bom dia. Se conferirmos no MOC Anexo I Leiaute NF-e, temos a seguinte explicação para este erro. Fazendo uma comparação dos arquivos que disponibilizou, o ini_Autirozada_cfop_6202 está com finNFe = 4, ou seja, Devolução de Mercadoria. Já o ini_Autorizada_cfop_6949 está com finNFe = 1 significando NFe normal. Revise os valores com calma, faça o teste que o @Daniel InfoCotidiano sugeriu. O arquivo com os CFOPs 6202 não passou pela regra por causa da finNFe, enquanto que os CFOPs 6949 passaram pela validação e foram rejeitados. É muito provável que se finNFe da nota com os CFOPs 6202 fosse 1 (normal) ele também seria rejeitado.
  2. Tópico movido para a área do SAC, para que o SLA de respostas seja considerado
  3. Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.
  4. Obrigado pela contribuição, em breve será validada para possível inclusão ao svn #TK-3744
  5. Bom dia. Você está usando o componente ACBrNFSeX?
  6. Obrigado pela contribuição, em breve será validada para possível inclusão ao svn #TK-3743
  7. Alteração enviada ao SVN na Rev-28826. Por favor, queiram atualizar seus fontes, reinstalar o ACBr para realizar novos testes e reportar qualquer problema.
  8. Obrigado por reportar. Realmente analisando os arquivos que disponibilizou conferindo nos fontes, essa me parece ser a solução mais adequada. Quanto a questão do cancelamento. Na unit do provedor tem a função para gerar a mensagem Também fiz um teste com o programa exemplo e o arquivo de envio foi gerado. Por favor, pode esclarecer o que quis dizer com "nem chega a criar o xml de cancelamento"?
  9. Por favor, em qual validador você testou o arquivo? Até onde sei, Multipag é pagamentos a fornecedor e afins. Isso se encaixaria no PagFor e não no boleto. Verifique se o validador que está fazendo o teste é o correto.
  10. Muito obrigado por querer colaborar! Pelo link que disponibilizou, da a entender que o provedor que atende a esta cidade é o SpeedGov. Esse provedor já está implementado no ACBrNFSeX, então em tese, adicionar as informações para esta cidade é mais fácil. Veja um exemplo de configuração para outra cidade do mesmo provedor. [2301000] Nome=Aquiraz UF=CE Provedor=SpeedGov ProRecepcionar=http://www.speedgov.com.br/wsaqz/Nfes Por favor, pode conseguir a URL de produção para está cidade?
  11. Foi isso o que quis dizer com o CarregarXMLNFSe. Vamos conferir como é a procedure TratarRetornoConsultaLoteRPS NotaCompleta := (Pos('<nfse>', Response.ArquivoRetorno) > 0); //No seu arquivo, não tem essa tag, então essa variável tem o valor False. //... if NotaCompleta then begin AuxNode := ANode.Childrens.FindAnyNs('rps'); NumRps := ''; if AuxNode <> nil then NumRps := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('nro_recibo_provisorio'), tcStr); with Response do begin AuxNode := ANode.Childrens.FindAnyNs('nf'); NumeroNota := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('numero_nfse'), tcStr); SerieNota := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('serie_nfse'), tcStr); Data := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('data_nfse'), tcDatVcto); Data := Data + ObterConteudoTag(AuxNode.Childrens.FindAnyNs('hora_nfse'), tcHor); Link := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('link_nfse'), tcStr); Link := StringReplace(Link, '&amp;', '&', [rfReplaceAll]); Protocolo := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('cod_verificador_autenticidade'), tcStr); CodigoVerificacao := Protocolo; Situacao := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('situacao_codigo_nfse'), tcStr); DescSituacao := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('situacao_descricao_nfse'), tcStr); end; AResumo := Response.Resumos.New; AResumo.NumeroNota := Response.NumeroNota; AResumo.SerieNota := Response.SerieNota; AResumo.Data := Response.Data; AResumo.Link := Response.Link; AResumo.Protocolo := Response.Protocolo; AResumo.CodigoVerificacao := Response.CodigoVerificacao; AResumo.Situacao := Response.Situacao; AResumo.DescSituacao := Response.DescSituacao; if NumRps <> '' then ANota := TACBrNFSeX(FAOwner).NotasFiscais.FindByRps(NumRps) else ANota := TACBrNFSeX(FAOwner).NotasFiscais.FindByNFSe(Response.NumeroNota); ANota := CarregarXmlNfse(ANota, ANode.OuterXml); //Essa é a procedure que atrubui valor a propriedade NotasFiscais[Indice].XmlNfse SalvarXmlNfse(ANota); end else begin //Como NotaCompleta é False, esse é o trecho de código que é executado. with Response do begin NumeroNota := ObterConteudoTag(ANode.Childrens.FindAnyNs('numero_nfse'), tcStr); SerieNota := ObterConteudoTag(ANode.Childrens.FindAnyNs('serie_nfse'), tcStr); Data := ObterConteudoTag(ANode.Childrens.FindAnyNs('data_nfse'), tcDatVcto); Data := Data + ObterConteudoTag(ANode.Childrens.FindAnyNs('hora_nfse'), tcHor); Situacao := ObterConteudoTag(ANode.Childrens.FindAnyNs('situacao_codigo_nfse'), tcStr); DescSituacao := ObterConteudoTag(ANode.Childrens.FindAnyNs('situacao_descricao_nfse'), tcStr); Link := ObterConteudoTag(ANode.Childrens.FindAnyNs('link_nfse'), tcStr); Link := StringReplace(Link, '&amp;', '&', [rfReplaceAll]); Protocolo := ObterConteudoTag(ANode.Childrens.FindAnyNs('cod_verificador_autenticidade'), tcStr); CodigoVerificacao := Protocolo; end; AResumo := Response.Resumos.New; AResumo.NumeroNota := Response.NumeroNota; AResumo.SerieNota := Response.SerieNota; AResumo.Data := Response.Data; AResumo.Link := Response.Link; AResumo.Protocolo := Response.Protocolo; AResumo.CodigoVerificacao := Response.CodigoVerificacao; AResumo.Situacao := Response.Situacao; AResumo.DescSituacao := Response.DescSituacao; end; Agora vamos olhar a resposta que você recebeu do WebService da IPM no arquivo 0186250054441760-lista-nfse-con-lot-soap.xml. O conteúdo dela está organizado nesta estrutura. <retorno> <mensagem> <codigo></codigo> </mensagem> <numero_nfse></numero_nfse> <serie_nfse></serie_nfse> <situacao_codigo_nfse></situacao_codigo_nfse> <situacao_descricao_nfse></situacao_descricao_nfse> <data_nfse></data_nfse> <hora_nfse></hora_nfse> <arquivo_gerador_nfse></arquivo_gerador_nfse> <nome_arquivo_gerado_eletron></nome_arquivo_gerado_eletron> <link_nfse></link_nfse> <cod_verificador_autenticidade></cod_verificador_autenticidade> <codigo_html></codigo_html> </retorno> Veja que ela de fato não é um XML de Nfse.
  12. Bom dia! Quanto a esta questão, revi as funções TratarResposta e igualei o CodigoVerificacao ao Protocolo nas que faltavam para padronizar. Foi disponibilizado no SVN na Rev-28817. Quando possível, por favor, atualize seus fontes e reinstale o ACBr para fazer novo teste. Quanto a essa aqui, por favor, pode fornecer mais detalhes? NotasFiscais.Items[0].NFSe é uma propriedade do tipo TNFSe que é uma classe. O que fica bagunçado são os valores das propriedades dela? Ou você quis dizer a propriedade NotasFiscais.Items[0].XmlNFse ? Se foi esse o caso, se conferirmos nos fontes da procedure TratarRetornoConsultaLoteRPS. if NotaCompleta then begin AuxNode := ANode.Childrens.FindAnyNs('rps'); NumRps := ''; if AuxNode <> nil then NumRps := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('nro_recibo_provisorio'), tcStr); with Response do begin AuxNode := ANode.Childrens.FindAnyNs('nf'); NumeroNota := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('numero_nfse'), tcStr); SerieNota := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('serie_nfse'), tcStr); Data := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('data_nfse'), tcDatVcto); Data := Data + ObterConteudoTag(AuxNode.Childrens.FindAnyNs('hora_nfse'), tcHor); Link := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('link_nfse'), tcStr); Link := StringReplace(Link, '&amp;', '&', [rfReplaceAll]); Protocolo := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('cod_verificador_autenticidade'), tcStr); CodigoVerificacao := Protocolo; Situacao := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('situacao_codigo_nfse'), tcStr); DescSituacao := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('situacao_descricao_nfse'), tcStr); end; AResumo := Response.Resumos.New; AResumo.NumeroNota := Response.NumeroNota; AResumo.SerieNota := Response.SerieNota; AResumo.Data := Response.Data; AResumo.Link := Response.Link; AResumo.Protocolo := Response.Protocolo; AResumo.CodigoVerificacao := Response.CodigoVerificacao; AResumo.Situacao := Response.Situacao; AResumo.DescSituacao := Response.DescSituacao; if NumRps <> '' then ANota := TACBrNFSeX(FAOwner).NotasFiscais.FindByRps(NumRps) else ANota := TACBrNFSeX(FAOwner).NotasFiscais.FindByNFSe(Response.NumeroNota); ANota := CarregarXmlNfse(ANota, ANode.OuterXml); SalvarXmlNfse(ANota); end else begin with Response do begin NumeroNota := ObterConteudoTag(ANode.Childrens.FindAnyNs('numero_nfse'), tcStr); SerieNota := ObterConteudoTag(ANode.Childrens.FindAnyNs('serie_nfse'), tcStr); Data := ObterConteudoTag(ANode.Childrens.FindAnyNs('data_nfse'), tcDatVcto); Data := Data + ObterConteudoTag(ANode.Childrens.FindAnyNs('hora_nfse'), tcHor); Situacao := ObterConteudoTag(ANode.Childrens.FindAnyNs('situacao_codigo_nfse'), tcStr); DescSituacao := ObterConteudoTag(ANode.Childrens.FindAnyNs('situacao_descricao_nfse'), tcStr); Link := ObterConteudoTag(ANode.Childrens.FindAnyNs('link_nfse'), tcStr); Link := StringReplace(Link, '&amp;', '&', [rfReplaceAll]); Protocolo := ObterConteudoTag(ANode.Childrens.FindAnyNs('cod_verificador_autenticidade'), tcStr); CodigoVerificacao := Protocolo; end; end; Como não tem a tag <nfse> no seu retorno, NotaCompleta assume o valor false e não entra no bloco de código que atribui o valor a propriedade xmlNfse, mais especificamente, não chama a CarregarXmlNfse. function TACBrNFSeXProvider.CarregarXmlNfse(aNota: TNotaFiscal; aXml: string): TNotaFiscal; begin if Assigned(ANota) then ANota.XmlNfse := aXml else begin TACBrNFSeX(FAOwner).NotasFiscais.LoadFromString(aXml, False); ANota := TACBrNFSeX(FAOwner).NotasFiscais.Items[TACBrNFSeX(FAOwner).NotasFiscais.Count-1]; end; Result := aNota; end;
  13. Conferi com o manual que temos disponível(pode acessar ele aqui) e a informação também é de que deve ser fixo "082" ao invés de "084". Alteração enviada ao SVN na Rev-28814. Por favor, queira atualizar seus fontes, reinstalar o ACBr para realizar novos testes e reportar qualquer problema.
  14. Bom dia. Contribuição enviada ao SVN na Rev-28812. Por favor, queria atualizar seus fontes, reinstalar o ACBr para realizar novos testes e reportar qualquer problema.
  15. Conferi seus arquivos e neles realmente não tem informação referente a cancelamento. Mas se conferirmos no arquivo nfsetinus.xsd que é o schema que temos disponível aqui para o Provedor Tinus e seguirmos a informação de cancelamento, temos o seguinte: Resposta da ConsultarLoteRPS: Conteúdo da resposta, veja que aqui ele já mostra que deveria vir um grupo com informação de cancelamento O conteúdo do Nó de Cancelamento Como essa informação não vem no resultado da consulta, o componente não consegue entender que a nota está cancelada, não tem nada que indique isso. Você precisa entrar em contato com provedor para questionar porque a informação não está vindo. O arquivo 20130613641-con-lot-soap.xml é o envelope de envio, ele é o arquivo que é enviado na requisição para o webservice. O arquivo 20130613641-lista-nfse-con-lot-soap.xml é o envelope de resposta, ele é o arquivo que é devolvido pelo webservice.
  16. Tópico movido para a área do SAC, para que o SLA de respostas seja considerado Arquivos recebidos. Foi criada a #TK-3739 para análise do caso.
  17. Bom dia. Do seu lado, você pode tentar aumentar a propriedade ACBrNFSeX.Configuracoes.WebServices.TimeOut, ela é definida em milisegundos e vem como default 5000(correspondendo a 5 segundos) no programa de exemplo. Aumente ela para 15000(15 segundos) que é o tempo indicado. Caso o problema persista, tente aumentar para 30000(30 segundos). Vale citar que eles estão de fato com problemas de acordo com relatos que recebemos
  18. Tópico movido para a área do SAC, para que o SLA de respostas seja considerado
  19. Bom dia. Por favor, pode fornecer mais informações? Você está usando qual dos componentes ACBrSPED?
  20. Bom dia. No arquivo 20230320200556-env-lot.xml na tag <municipio> dentro do grupo <destinatario>, você enviou o valor "Município do Destinatario". Veja que na resposta que recebeu no arquivo 20230320200557-rec.xml, é informado que esse valor é inválido. Por favor, pode fazer um teste com dados válidos? Qual foi o processo para obter o arquivo 001-gnre.xml?
  21. Bom dia. Desde o dia 20/03/2023, por volta das 08:00, alguns usuários começaram a relatar no canal #acbrnfsex em nossa comunidade do Discord problema para autorizar NFSe para o DF. Alguns relatavam que os RPS permaneciam em processamento indefinidamente, outros informavam que estavam recebendo uma mensagem de erro. Depois de tentar contato junto ao suporte da Nota Control, que é o provedor responsável pelo WebService de NFSe para o DF, o colega @Rafael Palmeira conseguiu a seguinte resposta de uma dos técnicos:
      • 5
      • Curtir
  22. Método Executado: ConsultarSituacao - Este está OK, não apresentou erro e o retorno foi correto. Método Executado: ConsultarLote - Este também não apresentou problema, por favor, no arquivo E:\ACBrTrunk2\Exemplos\ACBrDFe\ACBrNFSe\Delphi\202303\Notas\E:\ACBrTrunk2\Exemplos\ACBrDFe\ACBrNFSe\Delphi\202303\Notas\2423034870160400019156000000000000010-nfse.xml que foi gerado, não consta nenhuma tag referente a cancelamento? Método Executado: ConsultarNFSePorRps - este o webservice devolveu a informação de que o Nº de RPS que foi enviado é inválido. Por favor, o RPS 16 e a série 1 correspondem ao RPS que está consultando? Se conferir no arquivo que é enviado, a informação está indo corretamente? Método Executado: ConsultarNFSe - por favor, é possível disponibilizar os arquivos -soap desse método para análise?
  23. Obrigado pela contribuição, em breve será validada para possível inclusão ao svn #TK-3737
  24. Marque a opção para Salvar o Envelope Soap na aba WebService do programa exemplo e confira no arquivo -soap de resposta. Existe a possibilidade de o webservice realmente estar retornando um XML Vazio. Se for esse o caso, precisa entrar em contato com eles para questionar o por quê. Caso venha informação válida no Soap e mesmo assim o componente esteja apresentando este erro peço que disponibilize os arquivos para análise(se tiver dados que julgue sensíveis pode seguir as orientações deste tópico: https://www.projetoacbr.com.br/forum/topic/69182-como-enviar-logs-ou-informações-sigilosas-quando-requeridos-para-análise/ , caso contrário pode disponibilizar aqui mesmo) e se for o caso, correção no componente.
  25. Bom dia. Primeiro de tudo, muito obrigado pela iniciativa em querer colaborar! No entanto, essa unit é usada pelo componente antigo o ACBrNFSe esse componente foi descontinuado. Agora, o componente que está sofrendo manutenção e melhorias é o novo ACBrNFSeX. Recomendo que faça a migração.
×
×
  • 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.