Invoice refactoring

This commit is contained in:
ragu 2022-05-01 18:31:03 +02:00
parent 74ecbbd2a8
commit b3fb4e2143
9 changed files with 220 additions and 441 deletions

View file

@ -404,6 +404,10 @@ Nach Abschluss der Registrierung erhalten Sie sowohl auf die von Ihnen hinterleg
print $q->td({-class=>'tdint', -style=>"$occupied_style", -nowrap=>1},"$co2saving");
}elsif($key eq "int02"){
if($pricing->{total_price}){
$sum += $pricing->{total_price};
$pricing->{total_price} = $lb->round($pricing->{total_price});
$pricing->{total_price} = sprintf('%.2f', $pricing->{total_price});
$pricing->{total_price} =~ s/\./,/;
print $q->td({-class=>'tdint', -style=>"$occupied_style", -nowrap=>1},"$pricing->{total_price} €"),"\n";
}else{
my $gesamt = 0;