NFE - Danfe em Lote com NFE canceladas

[colmanetti]

Tenho uma impressão em Lote, mas as notas canceladas não mostra com a tarja "NFE CANCELADA" somente nas notas que estão canceladas

ACBrNFe1.DANFE.Cancelada := True;        é VALIDA PARA TODAS NOTAS ASSIM não consigo imprimir 

Existe alguma forma de fazer a impressão de Notas normais e canceladas em um lote?

 

 

for cont:=0 to length(LoteNFE.NFE)-1 do
    begin

      NomeArq:=VS_NFE+LoteNFE.NFE[cont].Retorno.NomeArq_XML;
      LoteNFE.LblCliente.Caption:='Arquivo: '+ExtractFileName(NomeArq);

      if FileExists(NomeArq) then
      begin
        ACBrNFe1.NotasFiscais.LoadFromFile(NomeArq);
        ACBrNFe1.DANFE.Cancelada := false;
        ACBrNFe1.DANFE.Protocolo := '';      
        if trim(LoteNFE.NFE[CONT].Retorno.CANC_Protocolo)<>'' then
        begin
          ACBrNFe1.DANFE.Cancelada := True;
          ACBrNFe1.DANFE.Protocolo := LoteNFE.NFE[CONT].Retorno.CANC_Protocolo;
        end;
      end else
      begin
        infobox('Informação','Não Localizou XML.'+#13+ExtractFileName(NomeArq)+#13+'Pasta:'+ExtractFileDir(NomeArq));
      end;
      LoteNFE.Prg.Position:=cont+1;
      LoteNFE.pnProg.Update;
    end;

[Juliomar Marchetti]

Não.

por dois motivos um que isso foi feito para sair na danfe uma informação não existente mais e um xml que não altera da nf-e.

e outra é que hoje é evento o xml e a danfe já não tem validade e nem servem de nenhum comprovante de cancelamento , o correto é o evento em xml e o impresso dele

[Italo Giurizzato Junior]

Bom dia a todos,

Em vez de carregar todos os XML das notas a serem impressas independente se estão canceladas ou não, porque não carregar somente as não canceladas, marque a propriedade Cancelada como False e manda imprimir, depois limpa a lista de notas carrega todas as canceladas, marque a propriedade Cancelada com o valor True e manda imprimir.

A sua rotina pode fazer isso tranquilamente a única diferença para o usuário é que os primeiros DANFE são de notas não canceladas e os últimos de notas canceladas.

[colmanetti]

Em 06/05/2022 at 11:35, Italo Giurizzato Junior disse:

Bom dia a todos,

Em vez de carregar todos os XML das notas a serem impressas independente se estão canceladas ou não, porque não carregar somente as não canceladas, marque a propriedade Cancelada como False e manda imprimir, depois limpa a lista de notas carrega todas as canceladas, marque a propriedade Cancelada com o valor True e manda imprimir.

A sua rotina pode fazer isso tranquilamente a única diferença para o usuário é que os primeiros DANFE são de notas não canceladas e os últimos de notas canceladas.

Obrigado,

Fiz desta forma.

[Italo Giurizzato Junior]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.