Revision 28f67151
Von Jan Büren vor etwa 10 Jahren hinzugefügt
SL/Controller/DeliveryPlan.pm | ||
---|---|---|
28 | 28 |
ordnumber => t8('Order'), |
29 | 29 |
customer => t8('Customer'), |
30 | 30 |
vendor => t8('Vendor'), |
31 |
value_of_goods => t8('Value of goods'), |
|
31 |
value_of_goods => t8('Value of transferred goods'),
|
|
32 | 32 |
); |
33 | 33 |
|
34 | 34 |
|
SL/DB/OrderItem.pm | ||
---|---|---|
44 | 44 |
my @doi_delivered = grep { $_->parts_id == $self->parts_id } map { $_->orderitems } @d_orders_delivered; |
45 | 45 |
|
46 | 46 |
require SL::AM; |
47 |
return sum(map { AM->convert_unit($_->unit => $self->unit) * $_->qty } @doi_delivered); |
|
47 |
$self->{delivered_qty} = sum(map { AM->convert_unit($_->unit => $self->unit) * $_->qty } @doi_delivered); |
|
48 |
return $self->{delivered_qty}; |
|
48 | 49 |
} |
49 | 50 |
|
50 | 51 |
sub value_of_goods { |
... | ... | |
52 | 53 |
|
53 | 54 |
my $price_factor = $self->price_factor || 1; |
54 | 55 |
|
55 |
return ($self->qty * $self->sellprice * (1 - $self->discount ) / $price_factor);
|
|
56 |
return ($self->{delivered_qty} * $self->sellprice * (1 - $self->discount ) / $price_factor);
|
|
56 | 57 |
} |
57 | 58 |
|
58 | 59 |
sub taxincluded { |
locale/de/all | ||
---|---|---|
2805 | 2805 |
'Valid until' => 'gültig bis', |
2806 | 2806 |
'Valid/Obsolete' => 'Gültig/ungültig', |
2807 | 2807 |
'Value' => 'Wert', |
2808 |
'Value of goods' => 'Warenverkaufswert',
|
|
2808 |
'Value of transferred goods' => 'Verkaufswert der ausgelagerten Waren',
|
|
2809 | 2809 |
'Variable' => 'Variable', |
2810 | 2810 |
'Variable Description' => 'Datenfeldbezeichnung', |
2811 | 2811 |
'Variable Name' => 'Datenfeldname (intern)', |
Auch abrufbar als: Unified diff
Lieferplan: Warenwert der ausgelagerten Warenmenge anzeigen