MarcosRWeimer

Boa Tarde Italo! Atualizei para a rev. 29551, porem a alteração feita (rev. 29549) não surgiu efeito, a função RemoverCaracteresDesnecessarios não conseguiu "arrumar" o XML para ser deserializado. No meu ponto de vista o problema está na mensagem de retorno: <Mensagem>Código do município de incidência do ISSQN não informado. A informação do código do município da incidência do ISSQN é obrigatório quando <Exigibilidade do ISS> for tipo <1 - Exigível>, <6 - Exigibilidade Suspensa por Decisão Judicial> ou <7 - Exigibilidade Suspensa por Processo Administrativo>. Consulte a Tabela de Municípios do IBGE para preenchimento do campo.</Mensagem> Observe que tem TAGs XML dentro da <Mensagem>, acredito que ai esteja o problema pois estas TAGs abrem mas nunca fecham

Boa Tarde! Exatamente, para corrigir o envio é isso mesmo, porem está desta forma de propósito para simular a questão do ACBr não conseguir carregar o retorno da prefeitura que possua alguma TAG XML dentro da mensagem de erro. Equiplano tambem está retornando uma tag dentro da mensagem conforme postagem anterior.

Bom dia! Mesmo "erro": Couldn't find end of Start Tag somatório line 1 para Equiplano /Toledo-PR 20-env-lot.xml 20-env-lot-soap.xml 171-rps.xml 20230522083416-con-lot.xml 20230522083416-con-lot-soap.xml 20230522083416-lista-nfse-con-lot.xml 20230522083416-lista-nfse-con-lot-soap.xml 20-rec-soap.xml

Segue os XMLs (se possível remover os mesmos depois de baixar) 1005-env-lot-sinc.xml 1005-env-lot-sinc-soap.xml 1005-lista-nfse-sinc-soap.xml 10F-rps.xml

Ola! Ao enviar uma NFSe com retenção para o provedor SAATRI (Luis Eduardo Magalhães - BA) e ocorrer erro o ACBr não está conseguindo carregar o XML de erro retornado. Ponto onde não consegue carregar: - Arquivo:ACBr\Fontes\ACBrDFe\ACBrXmlDocument.pas - Procedure: procedure TACBrXmlDocument.LoadFromXml(AXmlDocument: string); - AXmlDocument (parâmetro de entrada da procedure, é o XML retornado pela prefeitura) <RecepcionarLoteRpsSincronoResponse xmlns="http://nfse.abrasf.org.br"><outputXML xmlns=""><EnviarLoteRpsSincronoResposta xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns="http://www.abrasf.org.br/nfse.xsd"><NumeroLote>1005</NumeroLote><DataRecebimento>2023-05-18T14:21:47.4096494-03:00</DataRecebimento><ListaMensagemRetornoLote><MensagemRetorno><IdentificacaoRps><Numero>10</Numero><Serie>F</Serie><Tipo>1</Tipo></IdentificacaoRps><Codigo>E311</Codigo><Mensagem>Código do municÃ'#$00AD'pio de incidência do ISSQN não informado. A informação do código do municÃ'#$00AD'pio da incidência do ISSQN é obrigatório quando <Exigibilidade do ISS> for tipo <1 - ExigÃ'#$00AD'vel>, <6 - Exigibilidade Suspensa por Decisão Judicial> ou <7 - Exigibilidade Suspensa por Processo Administrativo>. Consulte a Tabela de MunicÃ'#$00AD'pios do IBGE para preenchimento do campo.</Mensagem></MensagemRetorno></ListaMensagemRetornoLote></EnviarLoteRpsSincronoResposta></outputXML></RecepcionarLoteRpsSincronoResponse> Gerando a exceção (raise EACBrXmlException.Create(xmlGetLastError()^.message);) raised exception class EACBrXmlException with message 'StartTag: invalid element name '. Pelo que vi o parse do XML é feito na Unit ACBrLibXML2, function xmlParseDoc(const cur: xmlCharPtr): xmlDocPtr; Acredito que o problema seja as tags retornadas dentro da tag <Mensagem>, bom foi até onde consegui chegar.

Ola! Não estava conseguindo baixar o PDF da cidade, então fui atras encontrei a URL que deve ser utilizada. ACBrNFSeXServicos.ini - QUENTE [2919553] ; Atualizado em 14/12/2021 Nome=Luiz Eduardo Magalhaes UF=BA Provedor=Saatri Versao=2.01 ProRecepcionar=https://luiseduardomagalhaes.saatri.com.br/servicos/nfse.svc HomRecepcionar=https://homologa-luiseduardomagalhaes.saatri.com.br/servicos/nfse.svc ; ProLinkURL=https://luiseduardomagalhaes.saatri.com.br/Relatorio/VisualizarNotaFiscal?numero=%NumeroNFSe%&codigoVerificacao=%CodVerif% HomLinkURL=https://luiseduardomagalhaes.saatri.com.br/Relatorio/VisualizarNotaFiscal?numero=%NumeroNFSe%&codigoVerificacao=%CodVerif% ACBrNFSeXServicos.ini - ALTERADO [2919553] ; Atualizado em 14/12/2021 Nome=Luiz Eduardo Magalhaes UF=BA Provedor=Saatri Versao=2.01 ProRecepcionar=https://luiseduardomagalhaes.saatri.com.br/servicos/nfse.svc HomRecepcionar=https://homologa-luiseduardomagalhaes.saatri.com.br/servicos/nfse.svc ; ProLinkURL=https://luiseduardomagalhaes.saatri.com.br/Relatorio/VisualizarNotaFiscal?numero=%NumeroNFSe%&codigoVerificacao=%CodVerif% HomLinkURL=https://homologa-luiseduardomagalhaes.saatri.com.br/Relatorio/VisualizarNotaFiscal?numero=%NumeroNFSe%&codigoVerificacao=%CodVerif% Só mudou o HomLinkURL adicionando o "homologa-" no inicio do Link.

Boa Tarde! Faz tempo que o Município de Santa Helena/PR utiliza o provedor IPM, porem no arquivo de configuração sempre vem como Equiplano e temos de alterar manualmente. Link no portal do município que comprova que utiliza IPM: https://santahelena.atende.net/autoatendimento/servicos/acesso-ao-sistema-de-nota-fiscal-de-servico-eletronica/detalhar/1 Alterar no ACBrNFSeXCidades.Ini de: [4123501] Nome=Santa Helena UF=PR Provedor=Equiplano Params=CodigoCidade:54 para [4123501] Nome=Santa Helena UF=PR Provedor=IPM Temos clientes neste município utilizando com a configuração citada sem problemas.

Não obtive sucesso tentando converter diretamente no TratarXmlRetornado

Complementando, acredito que a alteração deva ser feita aqui: procedure TACBrWinReqResp.Receive(Resp: TStream); que é onde o DataRest (parâmetro de entrada Resp nesta procedure) é alimentado com o retorno da prefeitura. Porem é bem provável que isto cause problemas nos demais provedores (além de outros documentos que utilizam este mesmo processo), deveria existir algum tipo de parametrização para o Encoding, alteração complexa, e não sei este seria realmente o melhor caminho a se seguir. P.S. Também estamos com problemas em Dourados

A questão é a seguinte, o padrão do Delphi é ANSI, o arquivo está em UTF8. Ao carregar o arquivo (anexado acima pelo @Alex Heinen) passando o parâmetro de encoding como UTF8 a leitura é feita corretamente: memo1.Lines.LoadFromFile(LFullFilePath, TEncoding.UTF8); arquivo carregado em um memo: Agora a questão é como converter isso no HttpClient.DataResp (TACBrNFSeXWebservice.EnvioInterno) que carrega o retorno do provedor UTF8 em um MemoryStream (DataResp é um MemoryStream) em padrão ANSI.

Para resolver aqui eu simplesmente não carreguei o json da "nota". Consultei NFSe por Numero, Cancelei e Consultei NFSe por Numero novamente. funcionou tudo, porem a impressão vou ter que gerar com dados do banco devido a esta falta de dados no json

pela API

Bom dia! Este problema de gerar a tag de XML no inicio do JSON foi solucionado, porem agora tenho problemas ao carregar o json retornado pela prefeitura no componente. veja que os dados do prestador são praticamente inexistentes: Tento carregar o json desta forma: FACBrNFSeX.NotasFiscais.Clear; FACBrNFSeX.NotasFiscais.LoadFromFile(LCaminho); E tenho como resultado erro de conversão aqui: por não possuir esta informação do Prestador.Endereco.CodigoMunicipio, Pensei em corrigir desta forma: De: .AddPair('MunicipioPrestacao', StrToInt(NFSe.Prestador.Endereco.CodigoMunicipio)) Para: .AddPair('MunicipioPrestacao', StrToInt(IfThen(EstaVazio(NFSe.Prestador.Endereco.CodigoMunicipio), '0', NFSe.Prestador.Endereco.CodigoMunicipio))) porem não sei se seria a forma correta, enviar 0 (zero) quando não possuir o código do municipio (Na emissão sempre vai existir este código, o problema é ao carregar para imprimir/cancelar/consultar bauhaus_json_ret_prefeitura.json

Pensei uma coisa e escrevi outra, a inscrição municipal incorreta para o respectivo erro é a do prestador e não do tomador.

Boa Tarde Italo! A equipe de testes finalizou aqui, está funcionando, pode fechar a thread. Obrigado

para mim aqui passou, só estou aguardando o parecer da equipe de testes (a equipe de testes realiza testes bem mais complexos com muitas variações). Acabou de acontecer o retorno: "00206 - Nenhuma NFSe foi encontrada na base de dados utilizando os parametros para pesquisa informados." mas este caso estavam com a inscrição municipal do tomador incorreta. Assim que terminarem reporto aqui

vou testar agora

Boa Tarde Italo! Vou aguardar esta thread aqui: para realizar os testes juntos.

Exato, mas a minha implementação é para consultar se a NFSe foi autorizada ou não na prefeitura utilizando a consulta por código de verificação. Atualmente o ACBrNFSeX tem apenas a consulta usando o número da nota fiscal que se houve algum problema por parte da prefeitura acaba não tendo este número, sendo necessário consultar pelo código de verificação com o objetivo justamente de obter o número do documento (se foi autorizado).

Bom dia! Sei que devem estar cheio de serviço ai mas se puderem dar uma atenção ficarei muito agradecido. Estou com o pull request parado aqui aguardando esta thread (atualizo o componente ou mantenho a alteração "por fora")

Ola! A Consulta NFSe por número está funcionando para IPM Porém me deparei com um problema onde não retornou ainda o número do documento então deve se realizado a consulta por código de verificação. Como a consulta não estava suportada pelo componente realizei as devidas alterações, testei e funcionou. Anexo para avaliação. IPM.Provider.pas

estranho, estamos emitindo para Cascavel/PR com a revisão 27828 sem problemas

Verificou que no 27650 houve uma correção para o http 400?

Ola! Provedor: Bauhaus (prefeitura moderna) Problema ao salvar o JSON com o comando abaixo: FACBrNFSeX.NotasFiscais.Items[0].GravarXML(ExtractFileName(LCaminhoSalvar), ExtractFilePath(LCaminhoSalvar), txmlRPS); "XML" ou "JSON" salvo <?xml version="1.0" encoding="UTF-8"?> { "DadosNota": { "MunicipioPrestacao": 4218707, "NaturezaOperacao": 1, "IssRetido": "N", "Observacoes": "REFERENTE A OS: 10", .... Veja que é inserido a tag de XML no arquivo que é um JSON, com isso ao carregar para consultar nfse por rps ocorre um erro de A.V. É possível contornar com este comando: TACBrNFSeX(FACBrNFSeX).Gravar(ExtractFileName(LCaminhoSalvar), FACBrNFSeX.NotasFiscais.Items[0].XmlRps, ExtractFilePath(LCaminhoSalvar), False); Passando o parâmetro de UTF8 False, assim na function TACBrDFe.Gravar não gera a tag de xml: if ConteudoEhUTF8 and (not XmlEhUTF8(ConteudoXML)) then <--- AQUI se não é UTF8 não gera a tag de xml UTF8Str := '<' + ENCODING_UTF8 + '>' + ConteudoXML else UTF8Str := ConverteXMLtoUTF8(ConteudoXML);

Teste aprovado, departamento de testes aprovou emitindo com prestador dentro e fora do municipio, com retenção, sem retenção e mais algumas coisas que não lembro agora. Podem fechar. Obrigado