Pegar retorno NFSe enviada.

[walter faria]

Boa tarde, a todos.

Oque acontece quando envio a NFSe as vezes da um erro de timeout.

*** No site a NFS-e esta enviada tudo certinho consigo ate imprimir pelo site, mas pra mim no sistema so tenho RPS que foi enviado, nao tenho XML da NFSe e nem atualizei os dados no BD.

1- Minha pergunta seria : Como posso recuperar estas informações e o XML?

Obrigado.

Utilizo assim para enviar:

GerarRPS(iRPS);

ACBrNFSe1.Enviar(iCodNFManual, false);

//se enviou pego as informações e salvo no BD

NF:= StrToInt(fmMenu.ACBrNFSe1.NotasFiscais.Items[0].NFSe.Numero);

RPS:= StrToInt(fmMenu.ACBrNFSe1.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Numero);

Arquivo:= fmMenu.ACBrNFSe1.NotasFiscais.Items[0].NomeArq;

CodigoVerificacao:= fmMenu.ACBrNFSe1.NotasFiscais.Items[0].NFSe.CodigoVerificacao;

Protocolo:= fmMenu.ACBrNFSe1.NotasFiscais.Items[0].NFSe.Protocolo;

//Aqui eu Gravo NO BD

GravarNFSe_Dados;

//Aqui eu Imprimi a NFSe

//se passou envio entao IMPRIMIR DANFSE

fmMenu.ACBrNFSe1.NotasFiscais.Clear;

fmMenu.ACBrNFSe1.NotasFiscais.LoadFromFile(Arquivo);

fmMenu.ACBrNFSe1.NotasFiscais.Imprimir;

fmMenu.ACBrNFSe1.NotasFiscais.Clear;