Download Nf-E

[Hetosoft Sistemas]

Estou usando a funcao baixar nf-e

 

ta tudo ok,

mais o retorno tem 2 status ,

como façor para saber que a nota foi baixada corretamente,

estou usando essa funcao

 

 

    TRY
        ACBrNFe1.DownloadNFe.Download.Chaves.Clear;
        ACBrNFe1.DownloadNFe.Download.Chaves.Add.chNFe := Trim(chave);
        ACBrNFe1.DownloadNFe.Download.CNPJ             := edtEmitCNPJ.Text;
        ACBrNFe1.Download;


          MemoResp.Lines.Add( ACBrNFe1.WebServices.DownloadNFe.retDownloadNFe.xMotivo);
          MemoResp.Lines.Add( IntToStr(ACBrNFe1.WebServices.DownloadNFe.retDownloadNFe.cStat));
          MemoResp.Lines.Add( DateTimeToStr(ACBrNFe1.WebServices.DownloadNFe.retDownloadNFe.dhResp));
          //Status.Log := '  Status......: ' + FInfoStat + ' - ' + FInfoMotivo;
          //Status.Log := '  Chave Acesso: ' + ChaveAcesso + ' ' + FInfoDataHora;

        //if ACBrNFe1.WebServices.DownloadNFe.retDownloadNFe.cStat=140 then
        // begin
        ACBrNFe1.Configuracoes.Geral.Save(
        RAIZ+'\Controles_SQL\NFe\EnvioDeResposta\Dwn'+Trim(chave)+'-nfe.xml'
        ,ACBrNFe1.WebServices.DownloadNFe.retDownloadNFe.XML);
        //end;

        showmess

    except
          on E: Exception do
          begin

             MessagemH(2,'Erro ao fazer download do XML da NF-e !'+#13+
             E.Message);

          end;

    end;

 

 

 

sabendo que

ACBrNFe1.WebServices.DownloadNFe.retDownloadNFe.cStat

so mostra toda vez o pedito que o 139

 

 

Versão :
Ambiente : 1
Versão Aplicativo : AN_2.1.0
Status Código : 139
Status Descrição : Pedido de Download processado
Recebimento : 11/03/2014 10:17:28
 

Editado 11 Março, 2014 por hetoandrade

[Hetosoft Sistemas]

Estou usando a funcao baixar nf-e

 

ta tudo ok,

mais o retorno tem 2 status ,

como façor para saber que a nota foi baixada corretamente,

estou usando essa funcao

 

 

    TRY
        ACBrNFe1.DownloadNFe.Download.Chaves.Clear;
        ACBrNFe1.DownloadNFe.Download.Chaves.Add.chNFe := Trim(chave);
        ACBrNFe1.DownloadNFe.Download.CNPJ             := edtEmitCNPJ.Text;
        ACBrNFe1.Download;


          MemoResp.Lines.Add( ACBrNFe1.WebServices.DownloadNFe.retDownloadNFe.xMotivo);
          MemoResp.Lines.Add( IntToStr(ACBrNFe1.WebServices.DownloadNFe.retDownloadNFe.cStat));
          MemoResp.Lines.Add( DateTimeToStr(ACBrNFe1.WebServices.DownloadNFe.retDownloadNFe.dhResp));
          //Status.Log := '  Status......: ' + FInfoStat + ' - ' + FInfoMotivo;
          //Status.Log := '  Chave Acesso: ' + ChaveAcesso + ' ' + FInfoDataHora;

        //if ACBrNFe1.WebServices.DownloadNFe.retDownloadNFe.cStat=140 then
        // begin
        ACBrNFe1.Configuracoes.Geral.Save(
        RAIZ+'\Controles_SQL\NFe\EnvioDeResposta\Dwn'+Trim(chave)+'-nfe.xml'
        ,ACBrNFe1.WebServices.DownloadNFe.retDownloadNFe.XML);
        //end;

        showmess

    except
          on E: Exception do
          begin

             MessagemH(2,'Erro ao fazer download do XML da NF-e !'+#13+
             E.Message);

          end;

    end;

 

 

 

sabendo que

ACBrNFe1.WebServices.DownloadNFe.retDownloadNFe.cStat

so mostra toda vez o pedito que o 139

 

 

Versão :
Ambiente : 1
Versão Aplicativo : AN_2.1.0
Status Código : 139
Status Descrição : Pedido de Download processado
Recebimento : 11/03/2014 10:17:28