Download NFe

[murilo cosme da silva]

Boa tarde a todos,

estou com uma grande dificuldade de entender como várias empresas consegue o xml da nota rapidamente.

ex: https://www.fsist.com.br/

 

baixa a nota na hora sem problemas com todos os dados e protocolo com certificado.

só que no sistema pelo que entendi tem que manifestar para poder baixar, só que o sincronismo demora muito então da muito xml não localizado e as vezes demora 40 minutos para chegar a nota, gostaria de saber se tem outra forma de baixar o xml no caso o cliente com o seu certificado automático das notas dos seu fornecedores.

 

exemplo código

 

 with ACBrNFe1.EventoNFe.Evento.Add do
         begin
           InfEvento.cOrgao   := 91;
           infEvento.chNFe    := sChave;
           infEvento.CNPJ     := sCNPJ;
           infEvento.dhEvento := now;
           infEvento.tpEvento := teManifDestConfirmacao;
         end;

        //consulta ultimo lote
       idLote := RetornaUltGenerator('GEN_NFE_LOTEEVENTO_ID');
       if idLote = -1 then
          begin
            ShowMessage('Erro ao consultar generators da tabela ' + 'GEN_NFE_LOTEEVENTO_ID');
            Exit;
          end;

       ACBrNFe1.EnviarEvento(IDLote);

       with AcbrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento do
          begin
            iStatus := cStat;

            Memo1.Lines.Add('Status: ' + IntToStr(cStat));
            Memo1.Lines.Add('Motivo: ' + xMotivo);
            Memo1.Lines.Add('Chave NFe: ' + chNFe);
            Memo1.Lines.Add('Evento: ' + xEvento);
           // Memo1.Lines.Add('NSU: ' + nProt);
          end;

       

       if ((iStatus = 135) or (iStatus = 573)) then
          begin
             Memo1.Lines.Add('');
             Memo1.Lines.Add('Solicitando o Download da nota ao WebService');
             ACBrNFe1.DistribuicaoDFePorChaveNFe(WebAmbiente.cUF
                                               , dlg_principal.suiStatusBar1.Panels[10].Text
                                               , edt_chave.Text
                                                );

          end;

        if iStatus = 573 then
           begin
             Memo1.Lines.Add('');
             Memo1.Lines.Add('Nota já confirmada a manifestação, '+#13 + 'mais não localizado o xml na pasta configurada!');
             Memo1.Lines.Add('');
             Memo1.Lines.Add('Solicitando download do xml!');
             Memo1.Lines.Add('Retorno ' + ACBrNFe1.WebServices.DistribuicaoDFe.retDistDFeInt.xMotivo);
           end
        else
          begin
            Memo1.Lines.Add('');
            Memo1.Lines.Add('Retorno');
            Memo1.Lines.Add(AcbrNFe1.WebServices.EnvEvento.EventoRetorno.xMotivo);

            Memo1.Lines.Add('Evento: ' + AcbrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xEvento);
            Memo1.Lines.Add('Retorno: ' + AcbrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo);
            Memo1.Lines.Add('');
            Memo1.Lines.Add('Solicitando download do xml!');
            Memo1.Lines.Add('Retorno ' + ACBrNFe1.WebServices.DistribuicaoDFe.retDistDFeInt.xMotivo);
          end;
 

 

[Juliomar Marchetti]

Ele não usa isso aqui do governo certo

ele acessa o site do mesmo jeito só que envia o certificado e baixa lá do site de forma a burlar

Mas tu usa para que esse Webservice?

se está usando para baixar nota e entrada está ERRADO. ele foi feito para saber se estão emitindo notas em seu favor sem tu saber.

baixar o xml é para a exceçào e vocês estão levando a REGRA. ele foi feito somente para baixar se por acaso perder ele