Revision 52753418
Von Bernd Bleßmann vor 10 Monaten hinzugefügt
SL/Helper/Inventory.pm | ||
---|---|---|
467 | 467 |
|
468 | 468 |
# create allocation manually, bypassing checks. all of these need to be passed, even undefs |
469 | 469 |
my $allocation = SL::Helper::Inventory::Allocation->new( |
470 |
part_id => $part->id,
|
|
470 |
parts_id => $part->id,
|
|
471 | 471 |
qty => 15, |
472 | 472 |
bin_id => $bin_obj->id, |
473 | 473 |
warehouse_id => $bin_obj->warehouse_id, |
474 | 474 |
chargenumber => '1823772365', |
475 | 475 |
bestbefore => undef, |
476 |
comment => undef, |
|
476 | 477 |
for_object_id => $order->id, |
477 | 478 |
); |
478 | 479 |
|
... | ... | |
736 | 737 |
|
737 | 738 |
=item * bestbefore |
738 | 739 |
|
740 |
=item * comment |
|
741 |
|
|
739 | 742 |
=item * for_object_id |
740 | 743 |
|
741 | 744 |
If set the allocations will be marked as allocated for the given object. |
SL/Helper/Inventory/Allocation.pm | ||
---|---|---|
48 | 48 |
|
49 | 49 |
# all of these need to be present |
50 | 50 |
my $allocation = SL::Helper::Inventory::Allocation->new( |
51 |
part_id => $part->id,
|
|
51 |
parts_id => $part->id,
|
|
52 | 52 |
qty => 15, |
53 | 53 |
bin_id => $bin_obj->id, |
54 | 54 |
warehouse_id => $bin_obj->warehouse_id, |
55 | 55 |
chargenumber => '1823772365', # can be undef |
56 | 56 |
bestbefore => undef, # can be undef |
57 |
comment => undef, # can be undef |
|
57 | 58 |
for_object_id => $order->id, # can be undef |
58 | 59 |
); |
59 | 60 |
|
Auch abrufbar als: Unified diff
S:H:Inventory / S:H:I:Allocation: POD-Fixes