Revision fbee3bde
Von Tamino Steinert vor etwa 1 Jahr hinzugefügt
t/db/delivery_order.t | ||
---|---|---|
40 | 40 |
is scalar @{ $delivery_order->items }, 2, "purchase delivery order keeps items"; |
41 | 41 |
is $delivery_order->vendor_id, $order1->vendor_id, "purchase delivery order keeps vendor"; |
42 | 42 |
|
43 |
my $supplier_delivery_order = SL::DB::DeliveryOrder->new_from($order1, type => SUPPLIER_DELIVERY_ORDER_TYPE); |
|
43 |
my $supplier_delivery_order = SL::DB::DeliveryOrder->new_from($order1, destination_type => SUPPLIER_DELIVERY_ORDER_TYPE);
|
|
44 | 44 |
|
45 | 45 |
is $supplier_delivery_order->type, SUPPLIER_DELIVERY_ORDER_TYPE, "new_from purchase order with given type gives supplier delivery order"; |
46 | 46 |
is scalar @{ $supplier_delivery_order->items }, 0, "supplier delivery order ignores items"; |
Auch abrufbar als: Unified diff
MOdel::Record: Test angepasst