Problemas ao enviar uma NFSE

[rodrigoernandespaiva]

Bom dia, estou tendo alguns problemas quanto ao envio de NFSE, algumas situações que diga-se de passagem, bem curiosas e estranhas que estão causando transtornos em vários transtornos em clientes da empresa que trabalho.

Bom vamos para eles:

1 - Em máquina que faço a programação (sistema) não é pedido o certificado quando se envia a nota, eu apenas atribuo o número de série ao componente, e a nota envia. 

2 - Quando executo em máquina cliente, é pedido 'n' vezes o certificado, causando outras duas situações:

 2.1 - É pedido o certificado de 3 a 4 vezes e a nota envia com sucesso

 2.2 - É pedido o certificado 'n' vezes e fica no loop de pedir o certificado toda a hora e a nota não envia

3 - Para tentar resolver o problema, colocamos o sistema em máquina que não era servidor, e fizemos com que uma outra máquina acessa-se essa máquina como servidor, o que ocasionou mais duas situações curiosas:

3.1 -Nas duas máquinas enviaram as notas normais, todas sem problema algum, até um determinado momento (isso aconteceu ontem). Das 8 da manhã, até 16:20 a máquina que estava acessando a nova máquina servidor começou a entrar na situação 2.2 ou seja fica pedindo o certificado 'n' vezes e não sai disso.

3.2 - Na nova máquina servidor é enviado a nota normal sem problema.

 

Alterações que fiz para tentar resolver o problema:

1 - Coloquei a opção visualizar = True (porém não é apresentado nenhuma mensagem, o sistema cai na situação 2.2)

2 - Coloquei os códigos:

        ACBrNFSe.Configuracoes.Geral.ConsultaLoteAposEnvio := True;

        ACBrNFSe.Configuracoes.WebServices.AguardarConsultaRet      := 5000;  // tempo padrão que vai aguardar para consultar após enviar a NF-e
        ACBrNFSe.Configuracoes.WebServices.IntervaloTentativas      := 3000;  // Intervalo entre as tentativas de envio
        ACBrNFSe.Configuracoes.WebServices.Tentativas               := 4;    // quantidade de tentativas de envio  (anteriormente tinha colocado mil vezes o que creio que esteja ocasionando o loop infinito na "pedição" do certificado)

        ACBrNFSe.Configuracoes.WebServices.AjustaAguardaConsultaRet := False;

Porém não tive sucesso.

3 - Código para pegar o certificado:

ACBrNFSe.Configuracoes.Certificados.NumeroSerie := qryBuscaParametrosNfseCERTIFICADO_SERIE.AsString;

Alguém já passou por isso? Teve problemas semelhantes?

Precisava de uma ajuda....

 

 

 

[Juliana Tamizou]

Boa tarde.

Este tópico está inativo a algum tempo e por isso será fechado, caso necessário favor criar um novo tópico.

Att.