Danfce modelo A4 não mostra valor do Frete

[maxdatasistema]

Bom dia, na impressão do Danfce modelo A4 não está mostrando valor do Frete.

Alteração sugerida:

 

Arquivo "..\Acbr\Fontes\ACBrDFe\ACBrNFe\DANFE\NFCe\Fortes\ACBrDANFCeFortesFrA4.pas"

 

• De:

procedure TfrmACBrDANFCeFortesFrA4.RLLabel52BeforePrint(Sender: TObject;
  var AText: string; var PrintIt: Boolean);
begin
  Text := FormatFloat('R$ ,0.00;R$ -,0.00', self.FACBrNFeDANFCeFortesA4.FpNFe.Total.ICMSTot.vFrete);
end;

 

• Para:

procedure TfrmACBrDANFCeFortesFrA4.RLLabel52BeforePrint(Sender: TObject;
  var AText: string; var PrintIt: Boolean);
begin
  AText := FormatFloat('R$ ,0.00;R$ -,0.00', self.FACBrNFeDANFCeFortesA4.FpNFe.Total.ICMSTot.vFrete);
end;

 

[antonio.carlos]

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado

[Juliana Tamizou]

Bom dia.

Obrigada por relatar, agradecemos se sempre que sugerir modificações, anexar também o arquivo alterado.

Att.

[maxdatasistema]

4 minutos atrás, Juliana Tamizou disse:

Bom dia.

Obrigada por relatar, agradecemos se sempre que sugerir modificações, anexar também o arquivo alterado.

Att.

Bom dia, segue em anexo o arquivo alterado ("..\Acbr\Fontes\ACBrDFe\ACBrNFe\DANFE\NFCe\Fortes\ACBrDANFCeFortesFrA4.pas").

ACBrDANFCeFortesFrA4.dfm ACBrDANFCeFortesFrA4.pas

[antonio.carlos]

Obrigado pela contribuição, em breve será validada para possível inclusão ao svn

[Juliomar Marchetti]

1 hora atrás, maxdatasistema disse:

Bom dia, segue em anexo o arquivo alterado ("..\Acbr\Fontes\ACBrDFe\ACBrNFe\DANFE\NFCe\Fortes\ACBrDANFCeFortesFrA4.pas").

ACBrDANFCeFortesFrA4.dfm 42 kB · 0 downloads ACBrDANFCeFortesFrA4.pas 37 kB · 0 downloads

só por dúvida porque adicionar o dfm se o problema estava só no .pas?

caso tenha feito alterações favor anexar um pdf e especificar o que modificou e motivo?

[maxdatasistema]

2 horas atrás, maxdatasistema disse:

Bom dia, na impressão do Danfce modelo A4 não está mostrando valor do Frete.

Alteração sugerida:

 

Arquivo "..\Acbr\Fontes\ACBrDFe\ACBrNFe\DANFE\NFCe\Fortes\ACBrDANFCeFortesFrA4.pas"

 

• De:

procedure TfrmACBrDANFCeFortesFrA4.RLLabel52BeforePrint(Sender: TObject;
  var AText: string; var PrintIt: Boolean);
begin
  Text := FormatFloat('R$ ,0.00;R$ -,0.00', self.FACBrNFeDANFCeFortesA4.FpNFe.Total.ICMSTot.vFrete);
end;

 

• Para:

procedure TfrmACBrDANFCeFortesFrA4.RLLabel52BeforePrint(Sender: TObject;
  var AText: string; var PrintIt: Boolean);
begin
  AText := FormatFloat('R$ ,0.00;R$ -,0.00', self.FACBrNFeDANFCeFortesA4.FpNFe.Total.ICMSTot.vFrete);
end;

 

 

Arquivo modificado: "..\Acbr\Fontes\ACBrDFe\ACBrNFe\DANFE\NFCe\Fortes\ACBrDANFCeFortesFrA4.pas"

Favor ignorar o .dfm em anexo no post anterior.

 

ACBrDANFCeFortesFrA4.pas

[Juliomar Marchetti]

No svn

Obrigado pela contribuição