Revision c17e4e54
Von Moritz Bunkus vor etwa 14 Jahren hinzugefügt
| SL/DB/Helper/FlattenToForm.pm | ||
|---|---|---|
|
use SL::CVar;
|
||
|
|
||
|
sub flatten_to_form {
|
||
|
my ($self, $form, $format_amounts) = @_;
|
||
|
my ($self, $form, %params) = @_;
|
||
|
|
||
|
my $vc = $self->can('customer_id') && $self->customer_id ? 'customer' : 'vendor';
|
||
|
|
||
| ... | ... | |
|
$form->{rowcount} = scalar(@{ $self->items });
|
||
|
|
||
|
my $idx = 0;
|
||
|
my $format_amounts = $params{format_amounts};
|
||
|
foreach my $item (@{ $self->items }) {
|
||
|
next if _has($item, 'assemblyitem');
|
||
|
|
||
Auch abrufbar als: Unified diff
API-Umstellung auf Hash-Parameter
Conflicts: