use SL::DB::Part;
use SL::DB::Project;
use SL::DB::TimeRecording;
+use SL::Helper::ShippedQty;
use SL::Locale::String qw(t8);
use DateTime;
}
}
- # Todo: reduce qty on related order
+ my $helper = SL::Helper::ShippedQty->new->calculate($related_order)->write_to_objects;
+ $related_order->update_attributes(delivered => $related_order->{delivered});
1;
})) {