Bom Dia.
Criei uma tela para baixar as notas emitidas para o meu cliente (DFe). Fiz uma MThread para não travar o sistema dentro do botão de pesquisa.
E antes de qualquer coisa eu consulto a ultima NSU na base do Sefaz para poder continuar.
Só que é justamente no comando de pesquisa que da uma ação inesperada.
======================================================
sUltimoNSU := '0';
sTemMais := 'S';
vAuxM := '';
Inc(k);
mmlog.lines.add('Consultando o NSU no Servidor do SEFAZ');
If acbrnfe1.DistribuicaoDFePorUltNSU(xcodibge,CNPJ,'000000000000000') Then Begin //*** Buscando o último NSU no Sefaz.
mmlog.lines.add('Não realizou pesquisa.');
mmlog.Refresh;
TerminodeThred; //habilita os botões e desliga o timer.
Exit;
End;
mmlog.lines.add('Ultima NSU : ' + acbrnfe1.WebServices.DistribuicaoDFe.retDistDFeInt.ultNSU + '/' +
acbrnfe1.WebServices.DistribuicaoDFe.retDistDFeInt.maxNSU);
mmlog.lines.add('Motivo : ' + ACBrNFe1.WebServices.DistribuicaoDFe.retDistDFeInt.xMotivo);
mmlog.Refresh;
======================================================
Qual o problema... ?
- Ele não entra no If
- Não continua...
- Nem entra no Finally do Try.
Simplesmente ele finaliza a minha MThread do nada ao executar o comando acbrnfe1.DistribuicaoDFePorUltNSU dentro do If.
Ou seja, não me permite tratar nada, nem me retorna nada... só fecha a MThread.
O que posso fazer neste caso ? Não entendi o erro...
Podem ajudar ? Plz