Envio de RPS em Lote - erro

[walfrido]

Estou usando o codigo abaixo para gerar os arquivos RPS e enviar os lotes com 50 notas

Mas apresenta esse erro!

 

O código é este:

  qrySQL.First;
  while not qrySQL.Eof do
    begin
      c := 1;

dba.ACBrNFSe1.NotasFiscais.Clear;
      while not qrySQL.Eof and (c <= 50) do
        begin
          seqRPS := IntToStr(numeroRPS);
          AlimentaComponente(seqRPS);
          inc(numeroRPS);
          inc(c);
          qrySQL.Next;
        end;

      dba.ACBrNFSe1.Enviar(vNumLote);

      MemoDados.Lines.Add('Nome XML: '+dba.ACBrNFSe1.NotasFiscais.Items[i].NomeArq);
      MemoDados.Lines.Add('Nota Numero: '+dba.ACBrNFSe1.NotasFiscais.Items[i].NFSe.Numero);
      MemoDados.Lines.Add('Código de Verificação: '+dba.ACBrNFSe1.NotasFiscais.Items[i].NFSe.CodigoVerificacao);
      inc(vNumLote);
    end;

  ShowMessage('Arquivo gerado em: '+dba.ACBrNFSe1.NotasFiscais.Items[0].NomeArq);

 

Alguém poderia dar uma ajuda?

 

 

[Italo Giurizzato Junior]

Bom dia Walfrido,

Com o programa exemplo também ocorre o mesmo erro?

Qual é a configuração das propriedades SSLLib, ... SSLType?

[walfrido]

A emissão de nota única, funciona perfeitamente!

Só ocorre quando vai enviar por lote.

[Italo Giurizzato Junior]

Bom dia Walfrido,

Pelo que entendi, quando você envia um lote contendo apenas 1 RPS não ocorre erro de Timeout, correto?

O problema é quando você envia um lote contendo duas ou mais RPS, ai o erro de Timeout aparece, correto?

Sendo assim, aumente o valor da propriedade Timeout do componente ACBrNFSe.

 

[walfrido]

Isso mesmo Italo.

Vou aumentar o tempo de Timeout  e posto o resultado.

[walfrido]

Italo,

o Timeout=5000;

Qual valor é aconselhável????

 

[Italo Giurizzato Junior]

Bom dia Walfrido,

O valor de Timeout é em milissegundos, portanto 5000 equivale a 5 segundos.

Vai aumentando até que o problema de Timeout se resolva.

Não existe uma valor aconselhável, o correto é que o valor do Timeout esteja em uma tela de configuração da sua aplicação e não fixo na propriedade do componente.

[walfrido]

Opa, não deu certo, coloquei timeout=30.000

E mesmo assim não vai....

Uma por vez vai normal.

 

[Italo Giurizzato Junior]

Bom dia Walfrido,

Me parece que o Ginfes esta com problemas de sobre carga em seu Webservice.

Para emitir notas via site também esta muito lento.