Ir para conteúdo
  • Cadastre-se

dev botao

Serie do RPS no provedor IPM


Ver Solução Respondido por Italo Giurizzato Junior,
  • Este tópico foi criado há 700 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Ola, estou tentando enviar a uma nota fiscal de serviço na cidade de guarapuava do qual o provedor é o IPM, mas estou recebendo o seguinte retorno

<retorno><mensagem><codigo> 00221 - A serie do RPS informada no arquivo é diferente da serie do RPS utilizada pelo respectivo municio.</codigo></mensagem></retorno>

Olhei no codigo de exemplo que é fornecido e tem as seguintes series:

case ACBrNFSeX1.Configuracoes.Geral.Provedor of
        proNFSeBrasil,
        proEquiplano:
          IdentificacaoRps.Serie := '1';

        proSudoeste:
          IdentificacaoRps.Serie := 'E';

        proBetha,
        proISSDSF,
        proSiat:
          IdentificacaoRps.Serie := 'NF';

        proISSNet:
          if ACBrNFSeX1.Configuracoes.WebServices.Ambiente = taProducao then
            IdentificacaoRps.Serie := '1'
          else
            IdentificacaoRps.Serie := '8';

      else
        IdentificacaoRps.Serie := '85';
      end;

 

Como o provedor é IPM pela logica seria 85, mas tentei com todas as possibilidade citadas acimas e nenhuma deu certo, alguem pode me ajudar?

Link para o comentário
Compartilhar em outros sites

  • 1 mês depois ...
8 horas atrás, Juliomar Marchetti disse:

Certo. mas conversou com o provedor e municipio e olharam no manual ou não tem?

Bom dia!

Tudo certo?

Sim, olhei o manual e conversei com a prefeitura, o estranho que se emito pela minha aplicação vai de boa, apenas utilizando ACBrNFSeX ocorre a rejeição.

No meu caso estou utilizando a série 1;

Link para o comentário
Compartilhar em outros sites

6 minutos atrás, guilhermeVaz06 disse:

Consegue mostrar um xml de envio de exemplo?

Sim!

O estranho é que ontem consegui emitir 1 nota, utilizando componente ACBrNFSeX, na segunda tentativa me ocorreu a rejeição de:

Código  : 00209
Mensagem: Já consta uma NFSe para o referido prestador de serviço com o mesmo IDENTIFICADOR de arquivo

Passei a alimentar o campo: IdentificacaoRps.Numero

Começou a surgir a rejeição da série kkkk

00221 - A série do RPS informada no arquivo é diferente da série do RPS utilizada pelo respectivo município.

25-ger-nfse.xml

Link para o comentário
Compartilhar em outros sites

Pessoal consegui emitir!

Fui testando e ignorei o trecho que alimenta os dados de RPS aí emitiu a nota...

Ele verifica se o IdentificacaoRPS.Numero > 0;

Criei na minha aplicação uma validação específica para IPM, inserindo na string letras para não cair atender a situação de alimentar as tags

Dentro da unit: IPM.GravarXML função: function TNFSeW_IPM.GerarIdentificacaoRPS: TACBrXmlNode;

 

image.thumb.png.82f2a9023bade5aad76e5c16925cff28.png

 

 

function TNFSeW_IPM.GerarIdentificacaoRPS: TACBrXmlNode;
begin
  Result :=  nil;

  if( StrToIntDef( NFSe.IdentificacaoRps.Numero, 0 ) > 0 ) then
  begin
    Result := CreateElement('rps');

    Result.AppendChild(AddNode(tcStr, '#1', 'nro_recibo_provisorio', 1, 12, 1,
                                     NFSe.IdentificacaoRps.Numero, DSC_NUMRPS));

    Result.AppendChild(AddNode(tcStr, '#1', 'serie_recibo_provisorio', 1, 2, 1,
                                    NFSe.IdentificacaoRps.Serie, DSC_SERIERPS));

    Result.AppendChild(AddNode(tcDatVcto, '#1', 'data_emissao_recibo_provisorio', 1, 10, 1,
                                                NFSe.DataEmissaoRps, DSC_DEMI));

    Result.AppendChild(AddNode(tcStr, '#1', 'hora_emissao_recibo_provisorio', 1, 8, 1,
                  FormatDateTimeBr(NFSe.DataEmissaoRps, 'hh:mm:ss'), DSC_HEMI));
  end;

Editado por DouglasGV
Link para o comentário
Compartilhar em outros sites

2 minutos atrás, Juliomar Marchetti disse:

Caso queira contribuir favor anexar a unit alterada

@Juliomar Marchetti Beleza?

Ajustei apenas na minha aplicação, coloquei letras RPS+número de RPS na propriedade IdentificacaoRPS.numero;

Com isso não cai na parte de alimentar as tags.

Print abaixo (Link) é referente a validação feita na unit IPM.GravarXML

https://prnt.sc/k86BzOGBO4ay 

 

Link para o comentário
Compartilhar em outros sites

  • Moderadores
1 hora atrás, DouglasGV disse:

@Juliomar Marchetti Beleza?

Ajustei apenas na minha aplicação, coloquei letras RPS+número de RPS na propriedade IdentificacaoRPS.numero;

Com isso não cai na parte de alimentar as tags.

Print abaixo (Link) é referente a validação feita na unit IPM.GravarXML

https://prnt.sc/k86BzOGBO4ay 

 

 

 

é sugestão de alteração nos fontes do ACBr? se sim anexe a unit o .pas aqui no tópico

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
 

 

Link para o comentário
Compartilhar em outros sites

  • Administradores

Bom dia,

Eu não conheço a fundo o componente ACBrNFSeX, mas me parece que foi mais um contorno para passar pelo problema e solucionar a questão no cliente...

@Italo Giurizzato Juniortem alguma posição quanto a esta questão?

At.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

@Juliomar Marchetti

@Italo Giurizzato Junior

Boa tarde!

Tudo certo?

Fiz uma alteração, implementei a função: GerarGrupoRPS na unit IPM.GerarXml onde adicionei a validação do município em questão (Cascavel PR);

function TNFSeW_IPM.GerarGrupoRPS: Boolean;
begin
   Result := (StrToIntDef(NFSe.IdentificacaoRps.Numero, 0) > 0) and
             (not MatchText(NFSe.Servico.MunicipioIncidencia.ToString, ['7493']));
end;

Abaixo o print que indica isso na unit e onde seria aplicado na function GerarIdentificacaoRPS
https://prnt.sc/gfnuvvO99Jmc

Também a unit alterada

IPM.GravarXml.pas

  • Curtir 1
Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa tarde Douglas,

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

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • Consultores
  • Solution

Bom dia Douglas,

Fiz uma pequena alteração na sua colaboração para não precisar alterar o código do componente caso outra cidade tenha o mesmo comportamento que a de Cascavel.

Já esta no SVN.

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

  • Curtir 1
Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 700 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • 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.