Sandro Felipe Adad

URL de produção https://guarapuava.atende.net/atende.php?pg=rest&service=WNERestServiceNFSe&cidade=padrao?eletron=1 Ta sobrando esse eletron

Fiz a mesma consulta com o programa que meu cliente esta rodando (versao ate ontem do acbr) e a consulta de hoje com os mesmos dados, mas com o acbr atualizado hoje que ta retornando o erro de config, mas nao parece ser nada no xml, sera no envio? hoje_7583738032207714738720220831082021148608-lista-nfse-con-lot.xml hoje_7583738032207714738720220831082021148608-lista-nfse-con-lot-soap.xml hoje_7583738032207714738720220831082021148608-con-lot.xml 7583738032207714738720220831082021148608-con-lot.xml 7583738032207714738720220831082021148608-con-lot-soap.xml 7583738032207714738720220831082021148608-lista-nfse-con-lot.xml 7583738032207714738720220831082021148608-lista-nfse-con-lot-soap.xml hoje_7583738032207714738720220831082021148608-con-lot-soap.xml

Creio que não seja o caso, até a consulta esta retornando erro de CONFIG... 7583738027207714738720220826082021124728-con-lot.xml 7583738027207714738720220826082021124728-con-lot-soap.xml 7583738027207714738720220826082021124728-lista-nfse-con-lot.xml 7583738027207714738720220826082021124728-lista-nfse-con-lot-soap.xml temp.xml

Nos meus testes ja estava gerando Part_1 e não estava ocorrendo erro...

8-env-lot-soap.xml O 8 era como estava antes, e o 44 foi hoje. 44-env-lot-soap.xml 44-rec-soap.xml

Config Invalido no programa de testes tambem.

Italo, mais alguns ajustes que fiz na procedure procedure TACBrNFSeProviderIPM.TratarRetornoCancelaNFSe, para sua aprovação. //Response.Sucesso := (Response.Erros.Count = 0); if Response.Erros.Count > 0 then if Response.Erros[0].Codigo='00001 - Sucesso' then Response.Sucesso := True; with Response do begin NumeroNota := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('numero_nfse'), tcInt); // SerieNota := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('serie_nfse'), tcInt); Data := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('data_nfse'), tcDatVcto); Link := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('link_nfse'), tcStr); Protocolo := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('cod_verificador_autenticidade'), tcStr); Situacao := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('situacao_codigo_nfse'), tcStr); IPM.Provider.pas

Confere a tua serie, parece estar indo sujeira "1 " com espaço a direita do 1.

Pra fim funcionou o cancelamento no programa de exemplo, so nao esta carregando o response. Eu informei o numero, serie, motivo. 21-ped-can.xml 21-ped-can-soap.xml 21-can.xml 21-can-soap.xml

7583738027207714738720220826082021194728-con-lot.xml 7583738027207714738720220826082021194728-con-lot-soap.xml 7583738027207714738720220826082021194728-lista-nfse-con-lot.xml 7583738027207714738720220826082021194728-lista-nfse-con-lot-soap.xml

O retorno da consulta do lote vem conforme o anexo, e sim, o xml de retorno do envio de lote é diferente do xml de consulta. 7583738027207714738720220826082021194728-lista-nfse-con-lot.xml

Qual a correção que você efetuou? anexe para o Italo analisar.

Concordo com você e a respeito da situação: (tem um campo numérico no retorno sim - ajustado situacao_codigo_nfse). Situacao := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('nf').Childrens.FindAnyNs('situacao_codigo_nfse'), tcStr); IPM.Provider.pas

Precisei efetuar alguns ajustes no metodo de consulta do lote rps, nao estava carregando na response. if Response.Erros.Count > 0 then if Response.Erros[0].Codigo='00001 - Sucesso' then Response.Sucesso := True; with Response do begin NumeroNota := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('nf').Childrens.FindAnyNs('numero_nfse'), tcInt); // SerieNota := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('serie_nfse'), tcInt); Data := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('nf').Childrens.FindAnyNs('data_nfse'), tcDatVcto); Link := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('nf').Childrens.FindAnyNs('link_nfse'), tcStr); Protocolo := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('nf').Childrens.FindAnyNs('cod_verificador_autenticidade'), tcStr); Situacao := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('nf').Childrens.FindAnyNs('situacao_descricao_nfse'), tcStr); end; IPM.Provider.pas

Deu certo, outra dúvida, no NFSE antigo eu informava o valor retido do ISS em Servico.Valores.ValorIssRetido, mas aqui na geração da IPM (IPM.GravarXML) pega para preencher a tag 'valor_issrf' o valor de NFSe.Servico.ItemServico[I].ValorIr, creio que não esteja ok? mas não encontrei o campo correto na classe... Result[i].AppendChild(AddNode(tcDe2, '#', 'valor_issrf', 1, 15, 0, NFSe.Servico.ItemServico[I].ValorIr, DSC_VISS))

Italo, estou alterando o IPM.Provider, veja se ok. procedure TACBrNFSeProviderIPM.TratarRetornoEmitir 1) Mesmo com sucesso no envio, está incluindo um item de mensagem de erro, ajustei da seguinte maneira: Response.Sucesso := Response.Erros[0].Codigo ='00001 - Sucesso'; //(Response.Erros.Count = 0); 2) O numero do protocolo para consulta é o codigo de verificacao de autenticidade: Protocolo := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('cod_verificador_autenticidade'), tcStr); Segue para sua análise. IPM.Provider.pas

Perfeito Italo, resolvido! Muito obrigado.

'<?xml version="1.0" encoding="ISO-8859-1"?><retorno>'#9'<mensagem>'#9#9'<codigo>00001 - Sucesso</codigo>'#9'</mensagem>'#9#9'<numero_nfse>13</numero_nfse>'#9'<serie_nfse>1</serie_nfse>'#9'<data_nfse>25/08/2021</data_nfse>'#9'<hora_nfse>17:06:05</hora_nfse>'#9'<situacao_codigo_nfse>1</situacao_codigo_nfse>'#9'<situacao_descricao_nfse>Emitida</situacao_descricao_nfse>'#9'<link_nfse>https://migracao.atende.net/?pg=autoatendimento&cidade=treina_guarapuava_integracao#!/tipo/servico/valor/213/padrao/1/load/1/identificador/7583738026207714738720220825082021183606</link_nfse>'#9'<cod_verificador_autenticidade>7583738026207714738720220825082021183606</cod_verificador_autenticidade></retorno>'

Sim, repeti o processo duas vezes pra conferir. o Erro ocorre antes de verificarareposta, na procedure LoadFromXml da unit ACBrXmlDocument; procedure TACBrXmlDocument.LoadFromXml(AXmlDocument: string); -> loadedDoc := xmlParseDoc(PAnsiChar(ansistring(AXmlDocument))); 28-rec.xml 28-rec-soap.xml

Resolveu o problema do Acces Violation da forma de pagamento - blz. Mas ao ler o xml de retorno ainda com erro na msg: Modo de Envio : Enviar Lote Numero do Lote: 26 Data de Envio : 30/12/1899 Numero do Prot: Sucesso : True Modo de Envio : Enviar Lote Numero do Lote: 26 Data de Envio : 30/12/1899 Numero do Prot: Sucesso : True Erro(s): Código : X999 Mensagem: EntityRef: expecting ';' Correção: --------- <?xml version="1.0" encoding="UTF-8"?><?xml version="1.0" encoding="ISO-8859-1"?><retorno> <mensagem> <codigo>00001 - Sucesso</codigo> </mensagem> <numero_nfse>9</numero_nfse> <serie_nfse>1</serie_nfse> <data_nfse>25/08/2021</data_nfse> <hora_nfse>16:16:41</hora_nfse> <situacao_codigo_nfse>1</situacao_codigo_nfse> <situacao_descricao_nfse>Emitida</situacao_descricao_nfse> <link_nfse>https://migracao.atende.net/?pg=autoatendimento&cidade=treina_guarapuava_integracao#!/tipo/servico/valor/213/padrao/1/load/1/identificador/7583738026207714738720220825082021160642</link_nfse> <cod_verificador_autenticidade>7583738026207714738720220825082021160642</cod_verificador_autenticidade> </retorno>

o Erro ocorre em procedure TACBrXmlDocument.LoadFromXml(AXmlDocument: string); var loadedDoc: xmlDocPtr; loadedRoot: xmlNodePtr; begin loadedDoc := xmlParseDoc(PAnsiChar(ansistring(AXmlDocument))); ao ler este documento abaixo: <?xml version="1.0" encoding="UTF-8"?><?xml version="1.0" encoding="ISO-8859-1"?> <retorno> <mensagem> <codigo>00001 - Sucesso</codigo> </mensagem> <numero_nfse>6</numero_nfse> <serie_nfse>1</serie_nfse> <data_nfse>25/08/2021</data_nfse> <hora_nfse>15:59:32</hora_nfse> <situacao_codigo_nfse>1</situacao_codigo_nfse> <situacao_descricao_nfse>Emitida</situacao_descricao_nfse> <link_nfse>https://migracao.atende.net/?pg=autoatendimento&cidade=treina_guarapuava_integracao#!/tipo/servico/valor/213/padrao/1/load/1/identificador/7583738026207714738720220825082021151933</link_nfse> <cod_verificador_autenticidade>7583738026207714738720220825082021151933</cod_verificador_autenticidade> </retorno>

ACBrNFSeX -> deixei em comentario (access violation aqui) {if (NFSe.Status = srNormal) and (TACBrNFSeX(FAOwner).Configuracoes.Geral.Provedor in [proIPM_110, proIPM_120]) then begin xmlNode := GerarCondicaoPagamento; NFSeNode.AppendChild(xmlNode); end; } Deu certo o envio com exceção do ajuste IPM.GravarXML que postei acima que deixem em comentario. A nota foi aceita e convertida. no programa exemplo apenas deu um erro na mensagem Modo de Envio : Enviar Lote Numero do Lote: 23 Data de Envio : 30/12/1899 Numero do Prot: Sucesso : True Modo de Envio : Enviar Lote Numero do Lote: 23 Data de Envio : 30/12/1899 Numero do Prot: Sucesso : True Erro(s): Código : X999 Mensagem: EntityRef: expecting ';' Correção: --------- :

depois do primeiro envio, retorna sempre o mesmo identificador: <?xml version="1.0" encoding="UTF-8"?><?xml version="1.0" encoding="ISO-8859-1"?> <retorno> <mensagem> <codigo>00209 - Já consta uma NFSe para o referido prestador de serviço com o mesmo IDENTIFICADOR de arquivo </codigo></mensagem> </retorno> IPM.Provider.pas 21-rec.xml 21-rec-soap.xml temp.xml 21-env-lot.xml 21-env-lot-soap.xml Não, ao meu ver o problema ésta na forma ne anexar o arquivo, não é padrao rest, é padrão multiform. Se voce observar no proprio exemplo do postman que coloque nos comentarios acima pelo log dele.

Alterei no IPM.Provider.pas, de rest pra multipart - linha 51 para suportar o formato multi-part. TACBrNFSeXWebserviceRest -> TACBrNFSeXWebserviceMulti TACBrNFSeXWebserviceIPM = class(TACBrNFSeXWebserviceMulti) o webservice recebeu o xml incorporado do ACBR e começou a responder no programa de exemplo.

LOG do Postman Console do caso de sucesso: POST https://migracao.atende.net/atende.php?pg=rest&service=WNERestServiceNFSe&cidade=treina_guarapuava_integracao200 497 ms POST /atende.php?pg=rest&service=WNERestServiceNFSe&cidade=treina_guarapuava_integracao HTTP/1.1 Authorization: Basic NzcuMTQ3LjM4Ny8wMDAxLTM4OlBlckA3NzE0Nw== User-Agent: PostmanRuntime/7.28.0 Accept: */* Cache-Control: no-cache Postman-Token: 81781a09-b2c4-4646-9e9c-91a834f8b050 Host: migracao.atende.net Accept-Encoding: gzip, deflate, br Connection: keep-alive Content-Type: multipart/form-data; boundary=--------------------------841383869900214019996528 Cookie: PHPSESSID=nvb5gd8vtue44ko8mmm5b60575; cidade=treina_guarapuava_integracao Content-Length: 1707 ----------------------------841383869900214019996528 Content-Disposition: form-data; name="XML"; filename="20210824165514-env-lot.xml" <20210824165514-env-lot.xml> ----------------------------841383869900214019996528-- HTTP/1.1 200 OK Date: Tue, 24 Aug 2021 19:55:40 GMT Server: Apache X-Frame-Options: sameorigin Set-Cookie: cidade=treina_guarapuava_integracao; path=/; samesite=lax Expires: Mon, 26 Jul 1997 05:00:00 GMT Cache-Control: no-cache, must-revalidate Pragma: no-cache Data-Servidor: 1629834940000 Connection: close Content-Encoding: none X-XSS-Protection: 1; mode=block X-Content-Type-Options: nosniff Content-Security-Policy: object-src 'self' data: blob: https://*.atende.net https://*.ipm.com.br https://nfs-e.net; block-all-mixed-content; form-action 'self' *.nfs-e.net https://*.ipm.com.br https://*.atende.net https://*.acesso.gov.br; frame-ancestors 'self' https://*.nfs-e.net https://*.ipm.com.br https://*.atende.net; Strict-Transport-Security: max-age=31586000; includeSubDomains; preload Transfer-Encoding: chunked Content-Type: application/json <?xml version="1.0" encoding="ISO-8859-1"?><retorno> <mensagem> <codigo>00001 - Sucesso</codigo> </mensagem> <numero_nfse>4</numero_nfse> <serie_nfse>1</serie_nfse> <data_nfse>24/08/2021</data_nfse> <hora_nfse>16:55:40</hora_nfse> <situacao_codigo_nfse>1</situacao_codigo_nfse> <situacao_descricao_nfse>Emitida</situacao_descricao_nfse> <link_nfse>https://migracao.atende.net/?pg=autoatendimento&cidade=treina_guarapuava_integracao#!/tipo/servico/valor/213/padrao/1/load/1/identificador/7583738025207714738720220824082021169541</link_nfse> <cod_verificador_autenticidade>7583738025207714738720220824082021169541</cod_verificador_autenticidade> </retorno>