NFSeX - Equiplano - Novo campo: nrCidadeIbgeServico

[MarcosRWeimer]

Bom dia!

Estamos com problemas quanto a cidade onde efetivamente é prestado o serviço, quando prestador e tomador são da mesma cidade e o serviço é prestada em outra.

 

Cenário hipotético:

- Prestador de Toledo/PR

- Tomador de Toledo/PR

- Cidade de prestação Marechal Cândido Rondon/PR (serviço prestado em uma fazenda ou filial por exemplo)

 

Segundo suporte da equiplano tenho de enviar o campo: nrCidadeIbgeServico com o código Ibge da cidade onde efetivamente ocorreu a prestação do serviço.

 

Print fornecido pelo próprio suporte da equiplano destacando o novo campo que tem de ser enviado.

 

Buscando nos fontes não encontrei nenhum outro provedor que utilize tal campo.

 

Sei onde mudar (Equiplano.GravarXML, function GerarXml) só não estou muito certo do campo a ser utilizado, pensei no NFSe.Servico.MunicipioIncidencia porêm meu conhecimento no componente é limitado e não tenho certeza se este seria o campo correto a ser utilizado.

 

 

[Italo Giurizzato Junior]

Bom dia Marcos,

Temos um problema, no arquivo TiposEsnfs_v01.xsd não consta a tag nrCidadeIbgeServico.

O provedor possui novos XSD para que possamos além de atualizar os fontes do componente para que ele gere a tag em questão, como também atualizar os Schemas?

[MarcosRWeimer]

14 minutos atrás, Italo Giurizzato Junior disse:

O provedor possui novos XSD para que possamos além de atualizar os fontes do componente para que ele gere a tag em questão, como também atualizar os Schemas?

Vou verificar, estava focado no problema e não pensei na validação pelo xsd.

[MarcosRWeimer]

O dia todo equiplano não está atendendo, cai em uma URA que diz que  a  ligação vai ser gravada e a chamada é encerrada, negócio vai ser tentar segunda feira novamente

[MarcosRWeimer]

Bom dia!

Conseguimos.

 

XSD: https://www.esnfs.com.br:8443/exemplo/xsdExemplos.zip

Exemplos: https://www.esnfs.com.br:8443/exemplo/xmlExemplos.zip

 

o referido campo está presente no xsd:

 

Editado 7 Novembro, 2022 por -=Ma®©oS=-
removido link confidencialidade apareceu nome empresa

[Italo Giurizzato Junior]

Bom dia Marcos,

Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-3236

[Italo Giurizzato Junior]

Boa tarde Marcos,

Favor atualizar os fontes, reinstale o ACBr e faça novos testes.

[MarcosRWeimer]

Bom dia Italo!

Apenas como informação, atualizei, reinstalei e verifiquei nos fontes e no xml gerado, parece estar ok.

Entretando aqui temos um setor de testes e passei para eles agora, irão realizar um teste geral para o provedor Equiplano

Assim que tiver alguma posição informo aqui.

 

Obrigado

 

[MarcosRWeimer]

Boa Tarde!

Configuração:

Configuracoes.Geral.ConsultaLoteAposEnvio     := True;
Configuracoes.WebServices.AguardarConsultaRet := 10000;
Configuracoes.WebServices.IntervaloTentativas := 5000;

 

- Faço a emissão da nota fiscal e o ACBr acaba interpretando com erro (X203 - Não foi retornado nenhuma NFSe.)

- Verifico status retorna como autorizada

- O problema está ao Consultar o lote após o envio.

- Retorno da prefeitura:

<es:esConsultarLoteRpsResposta xmlns:es="http://www.equiplano.com.br/esnfs" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.equiplano.com.br/esnfs esConsultarLoteRpsResposta_v01.xsd">
  <listaNfse class="list">
    <nfse>
      <nrNfse>12</nrNfse>
      <cdAutenticacao>297951B17408408CF0A8ZZZZZZZZ</cdAutenticacao>
      <dtEmissaoNfs>2022-11-10T16:25:32</dtEmissaoNfs>
      <nrRps>14</nrRps>
      <nrEmissorRps>1</nrEmissorRps>
    </nfse>
  </listaNfse>
</es:esConsultarLoteRpsResposta>

 

Fontes\ACBrDFe\ACBrNFSeX\Provedores\Equiplano.Provider.pas,  procedure TACBrNFSeProviderEquiplano.TratarRetornoConsultaLoteRps(Response: TNFSeConsultaLoteRpsResponse);

...
      AuxNode := ANode.Childrens.FindAnyNs('mensagemRetorno');

      if AuxNode <> nil then
        ProcessarMensagemErros(AuxNode, Response);

      Response.Sucesso := (Response.Erros.Count = 0);

//      Response.Protocolo := ObterConteudoTag(ANode.Childrens.FindAnyNs('nrProtocolo'), tcStr);

      AuxNode := ANode.Childrens.FindAnyNs('listaNfse');

      if AuxNode <> nil then
      begin
        ANodeArray := ANode.Childrens.FindAllAnyNs('nfse'); ---> AQUI
        if not Assigned(ANodeArray) then
        begin
          AErro := Response.Erros.New;
          AErro.Codigo := Cod203;
          AErro.Descricao := Desc203;
          Exit;
        end;

        for i := Low(ANodeArray) to High(ANodeArray) do
        begin
          ANode := ANodeArray[i];
          AuxNode := ANode.Childrens.FindAnyNs('nfse');
          AuxNode := AuxNode.Childrens.FindAnyNs('nrRps');

          if AuxNode <> nil then
          begin
            NumRps := AuxNode.AsString;

            ANota := TACBrNFSeX(FAOwner).NotasFiscais.FindByRps(NumRps);

            ANota := CarregarXmlNfse(ANota, ANode.OuterXml);
            SalvarXmlNfse(ANota);
          end;
        end;
      end;

No ponto indicado acima com o "AQUI" não encontra o node nfse (ANode = Document.RootElement)

Tentei alterar para AuxNode, que ao meu ver seria o mais correto, porem a parte do FOR tambem não bate os campos.

Não sei se todos as prefeituras equiplano o retorno é o mesmo, por isso não prossegui alterando os demais campos.

 

EDIT: Pelo que comparei o retorno da prefeitura confere com o xsd citado alguns posts acima.

Editado 10 Novembro, 2022 por -=Ma®©oS=-
xsd

[Italo Giurizzato Junior]

Bom dia Marcos,

Você poderia configurar o componente para salvar os arquivos (SOAP)?

Faça uma nova consulta e anexe o XML (SOAP) de retorno para que possamos analisar.

[MarcosRWeimer]

Anexo.

A diferença está no consulta lote.

60011-env-lot.xml 60011-rec.xml 55372-con-lot.xml 55372-lista-nfse-con-lot.xml

[Italo Giurizzato Junior]

Boa tarde Marcos,

Já inclui na minha lista de tarefas para analisar o problema. TK-3275

[Italo Giurizzato Junior]

Boa tarde Marcos,

Favor atualizar os fontes, reinstale o ACBr e faça novos testes.

[MarcosRWeimer]

Bom Dia Italo!

Apenas retornando, vou realizar os testes hoje, só terminar uma outra issue

[MarcosRWeimer]

Não estou conseguindo compilar.

atualizado agora:

 

realizei um find in files na pasta de fontes e não encontrei "AsDateTimeBr"

 

 

[Renato Rubinho]

Reinstale marcando a opção para remover versões anteriores.

Devem ter arquivos antigos influenciando.

Veja a unit /trunk2/Fontes/ACBrComum/ACBrJSON.pas

[MarcosRWeimer]

Ola!

Atualizei novamente (revision 27522), reinstalei removendo as DLLs e não ocorreu mais o erro.

 

A parte de emissão está com o departamento de suporte, aqui emiti, consultei nfse por rps e cancelei, não tive problemas mas o departamento de testes irá realizar alguns testes mais específicos (retenção, prestador fora do municipio, entre outro detalhes)

 

Até agora o que me retornaram é que está salvando os arquivos:

Pelo que sei não deveria salvar já que estou passando:

 

ACBrNFSeX.Configuracoes.Arquivos.Salvar := False;

 

Alguma configuração que foi alterada e não percebi?

 

 

[Renato Rubinho]

Boa tarde,

Veja este tópico que o Italo explica o que cada propriedade Salvar faz.

A referência é de NFe mas se aplica aos demais DFes.

[MarcosRWeimer]

13 horas atrás, Renato Rubinho disse:

Boa tarde,

Veja este tópico que o Italo explica o que cada propriedade Salvar faz.

A referência é de NFe mas se aplica aos demais DFes.

qual topico? faltou o link, estou utilizando a busca mas não estou encontrando

 

Achei:

 

Editado 23 Novembro, 2022 por -=Ma®©oS=-
incluido thread

[Renato Rubinho]

Olá,

Era esse mesmo, deve ter ocorrido erro ao salvar o post

Resolveu com essas propriedades?

 

[MarcosRWeimer]

4 minutos atrás, Renato Rubinho disse:

Olá,

Era esse mesmo, deve ter ocorrido erro ao salvar o post

Resolveu com essas propriedades?

 

Sim, setei false em todas.

A questão original desta thread está no departamento de testes

[MarcosRWeimer]

Voltei, identificado um problema na procedure TACBrNFSeProviderEquiplano.TratarRetornoConsultaLoteRps(Response: TNFSeConsultaLoteRpsResponse); (arquivo Equiplano.Provider.pas)

 

Acaba não carregando os dados pois não encontra o node 'nfse':

logo não carrega o número da nota, código de verificação e afins.

Arquivo retorno:

<?xml version="1.0"?>
<es:esConsultarLoteRpsResposta xsi:schemaLocation="http://www.equiplano.com.br/esnfs esConsultarLoteRpsResposta_v01.xsd" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:es="http://www.equiplano.com.br/esnfs">
  <listaNfse class="list">
    <nfse>
      <nrNfse>22</nrNfse>
      <cdAutenticacao>EEC56D647FCBAFC2B0710C659EE2734F</cdAutenticacao>
      <dtEmissaoNfs>2022-11-23T17:19:52</dtEmissaoNfs>
      <nrRps>24</nrRps>
      <nrEmissorRps>1</nrEmissorRps>
    </nfse>
  </listaNfse>
</es:esConsultarLoteRpsResposta>

 

Se olhar no fonte, logo abaixo verá que considerava o "listaNfse":

Editado 23 Novembro, 2022 por -=Ma®©oS=-
incluido informação do listanfse

[MarcosRWeimer]

o código comentado não está carregando os campos cdAutenticacao, nrNfse, dtEmissaoNfs e nrEmissorRps

[MarcosRWeimer]

anexo sugestão de correção

Equiplano.Provider.pas

[Italo Giurizzato Junior]

Bom dia Marcos,

Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-3323