Transportadoras Rejeitam DANFe Volume Zerado...

[Fabrício Melo]

Alguns dos nossos clientes estão reclamando que os campos abaixo impressos no DANFe estão com valor " 0 " zero, quando não são informados, o sistema tem um flag para não montar a Tag se não existir dados, porém, alguns desses clientes querem que apareça as colunas, mas, que elas fiquem vazias, teria como alterar o DANFe pra não mostrar zero na impressão desses campos?

Alegação: "Algumas transportadoras aceitam se for vazio, mas rejeitam quando é zero..."

//382 X27 qVol Quantidade de volumes transportados

Transp.Vol.qVol

//386 X31 pesoL Peso Líquido (em kg)

Transp.Vol.pesoL

//387 X32 pesoB Peso Bruto (em kg)

Transp.Vol.pesoL

52120601536085000190550020000017201000017202.pdf

52120601536085000190550020000017201000017202-nfe.xml

[peterson161]

Por favor, poste seu XML e informe qual Danfe que você usa. Creio que todos os Danfes, nestes campos de volumes, exibem somente o conteúdo do XML.

[Fabrício Melo]

Adicionei acima o xml e um pdf exemplo de como acontece em alguns clientes...

Grato.

[peterson161]

Na unit 'ACBrDANFeCBRaveRetrato.pas', a partir da linha 898, descomente este trecho:

           //if (Transp.Vol.Items[i].qVol <> 0) then

              Box([fsTop],PosX,YPos,20,aHeigthPadrao,'Quantidade',IntToStr(Transp.Vol.Items[i].qVol),taRightJustify);

           //else

           //   Box([fsTop],PosX,YPos,20,aHeigthPadrao,'Quantidade','',taRightJustify);

           Box([fsTop,fsLeft],XPos,YPos,34,aHeigthPadrao,'Espécie',Transp.Vol.Items[i].esp,taCenter);

           Box([fsTop,fsLeft],XPos,YPos,50,aHeigthPadrao,'Marca',Transp.Vol.Items[i].marca,taCenter);

           Box([fsTop,fsLeft],XPos,YPos,30,aHeigthPadrao,'Numero',Transp.Vol.Items[i].nVol,taCenter);

           //if (Transp.Vol.Items[i].pesoB <> 0) then

              Box([fsTop,fsLeft],XPos,YPos,30,aHeigthPadrao,'Peso Bruto',NotaUtil.FormatFloat(Transp.Vol.Items[i].pesoB,NotaUtil.PreparaCasasDecimais(3)),taRightJustify);

           //else

           //   Box([fsTop,fsLeft],XPos,YPos,30,aHeigthPadrao,'Peso Bruto','',taRightJustify);

           //if (Transp.Vol.Items[i].pesoL <> 0) then

              Box([fsTop,fsLeft],XPos,YPos,30,aHeigthPadrao,'Peso Líquido',NotaUtil.FormatFloat(Transp.Vol.Items[i].pesoL,NotaUtil.PreparaCasasDecimais(3)),taRightJustify,True);

           //else

           //   Box([fsTop,fsLeft],XPos,YPos,30,aHeigthPadrao,'Peso Líquido','',taRightJustify,True);

Com isso, ele não vai mais inserir valor zero quando não tiver nada no XML