Revision 12d1af89
Von Tamino Steinert vor 3 Monaten hinzugefügt
| SL/Controller/POS.pm | ||
|---|---|---|
|
use SL::Model::Record;
|
||
|
use SL::DB::ValidityToken;
|
||
|
use SL::DB::Order::TypeData qw(:types);
|
||
|
use SL::DB::DeliveryOrder::TypeData qw(:types);
|
||
|
|
||
|
use SL::Locale::String qw(t8);
|
||
|
|
||
| ... | ... | |
|
|
||
|
);
|
||
|
}
|
||
|
|
||
|
sub action_to_delivery_order {
|
||
|
my ($self) = @_;
|
||
|
my $order = $self->order;
|
||
|
|
||
|
my $delivery_order = SL::Model::Record->new_from_workflow(
|
||
|
$order,
|
||
|
SALES_DELIVERY_ORDER_TYPE(),
|
||
|
{
|
||
|
no_linked_records => 1, # order is not saved
|
||
|
}
|
||
|
);
|
||
|
|
||
|
# $main::lxdebug->dump(0, "TST: ", $delivery_order);
|
||
|
# $main::lxdebug->dump(0, "TST: ", $delivery_order->items());
|
||
|
|
||
|
}
|
||
|
|
||
|
#
|
||
|
# helpers
|
||
|
#
|
||
Auch abrufbar als: Unified diff
POS: WIP: Auf Lieferschein