Revision ae71699d
Von Jan Büren vor fast 9 Jahren hinzugefügt
bin/mozilla/do.pl | ||
---|---|---|
1720 | 1720 |
# dieser array_ref ist für DO->save da: |
1721 | 1721 |
# einmal die all_requests in YAML verwandeln, damit delivery_order_items_stock |
1722 | 1722 |
# gefüllt werden kann. |
1723 |
# could be dumped to the form in the first loop, |
|
1724 |
# but maybe bin_id and warehouse_id has changed to the "korrekturlager" with |
|
1725 |
# allowed negative qty ($::instance_conf->get_warehouse_id_ignore_onhand) ... |
|
1723 | 1726 |
my $i = 0; |
1724 | 1727 |
foreach (@all_requests){ |
1725 | 1728 |
$i++; |
... | ... | |
1729 | 1732 |
|
1730 | 1733 |
save(no_redirect => 1); # Wir können auslagern, deshalb beleg speichern |
1731 | 1734 |
# und in delivery_order_items_stock speichern |
1735 |
|
|
1736 |
# ... and fill back the persistent dois_id for inventory fk |
|
1737 |
undef (@all_requests); |
|
1738 |
foreach my $i (1 .. $form->{rowcount}) { |
|
1739 |
next unless ($form->{"id_$i"} && $form->{"stock_${prefix}_$i"}); |
|
1740 |
foreach my $request (@{ DO->unpack_stock_information('packed' => $form->{"stock_${prefix}_$i"}) }) { |
|
1741 |
push @all_requests, $request; |
|
1742 |
} |
|
1743 |
} |
|
1732 | 1744 |
DO->transfer_in_out('direction' => $prefix, |
1733 | 1745 |
'requests' => \@all_requests); |
1734 | 1746 |
|
Auch abrufbar als: Unified diff
Setzt dois_id für inventory beim Standard-Auslagern
behebt Fehler #109