Ir para conteúdo
  • Cadastre-se

dev botao

Nfse Varios Rpss


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

Recommended Posts

Primeiro você passa o lote, depois você vai incluindo os RPS com o comando "with NotasFiscais.Add.NFSe do", dê uma olhada no programa exemplo: ...\trunk\Exemplos\ACBrNFSe\Delphi\

NotasFiscais.NumeroLote:='1';
while not CDS.Eof do begin
   with NotasFiscais.Add.NFSe do
   begin
      IdentificacaoRps.Numero := FormatFloat('#########0', RPS);
      IdentificacaoRps.Tipo := trRPS;
      DataEmissao := Date;
      ...
   end;
   CDS.Next;
end;
Link para o comentário
Compartilhar em outros sites

  • 1 ano depois...
  • Consultores

Boa tarde Pessoal,

 

Após alimentar o componente com vários RPS, qual é o método utilizado?

 

Eu aconselho usar o Enviar() pois este vai gerar todos os RPS, assinar se necessário cado um deles, montar o lote com todos eles, assinar o lote se necessário e enviar para o Web Services.

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

  • 3 semanas depois ...
  • Consultores

Boa tarde Wagner,

 

O método Enviar é o que você deve utilizar.

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

  • 4 semanas depois ...
  • Consultores

Bom dia Wagner,

Você deve usar somente o método Enviar, pois este é capaz de gerar o XML, assinar se necessário, montar o lote, assinar o lote se necessário, validar o lote e enviar para o web services.

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

Boa Noite Italo!

estou com o problema parecido.

Veja o processo de gerar e enviar lote RPS

    ACBrNFSe1.NotasFiscais.Clear;
    xlote := edLoteNFSe.AsInteger;
    AlimentaComponente;
    ACBrNFSe1.Enviar(xlote);
    ACBrNFSe1.NotasFiscais.Clear;

Bem, no AlimentaComponente tem a função que percorre a Query com o while e adiciona os RPS com o comando NotasFiscais.Add.NFSe,

blz até ai tudo ok o componente grava os RPSs na pasta RPS e o arquivo do lote (4-env-lot.xml) na pasta Ger o arquivo do lote ao abrir contem todos os RPSs.

Mas ao consultar o lote com o comando (ACBrNFSe1.ConsultarLoteRps(Lote, Protocolo);) só retorna na pasta NFSe a NFSe (9-nfse.xml) do ultimo RPS gravado os outros do lote não retornam.

o Servidor que utilizo é o Saatri em ambiente de homologação!

Eu enviei o lote também com 3 RPSs mas ao consultar o lote só retornou a NFSe dos dois ultimos o primeiro não retornou.

porque não retorna a NFSe do primeiro RPS do lote?

2UNICA-Rps.xml

1UNICA-Rps.xml

2UNICA-Rps.xml

4-env-lot.xml

9-nfse.xml

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

  • Consultores

Bom dia Anderson,

Pode ser que no lote que foi enviado 3 RPS somente 2 foram processados com sucesso o outro não.

É interessante na faze de testes sempre configurar o componente para salvar os arquivos de envio e de retorno completos, ou seja:

Configuracoes.WebServices.Salvar := True;

Desta forma esses arquivos como por exemplo o 4-env-lot.xml será gravado também com o nome 4-env-lot-soap.xml, este último é o completo bem como o de retorno.

Portanto todos os arquivos com a palavra soap no nome são arquivos de envio/retorno completos sem nenhum tratamento por parte do componente.

Desta forma fica fácil descobrir o que ocorreu com os demais, analisando o arquivo de retorno.

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

  • 3 meses depois ...
  • Este tópico foi criado há 3059 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.