Revision 6a2a2dbc
Von Sven Schöling vor etwa 3 Jahren hinzugefügt
SL/DB/DeliveryOrder.pm | ||
---|---|---|
140 | 140 |
ordnumber payment_id reqdate salesman_id shippingpoint shipvia taxincluded taxzone_id transaction_description vendor_id |
141 | 141 |
)), |
142 | 142 |
closed => 0, |
143 |
is_sales => !!$source->customer_id, |
|
144 | 143 |
delivered => 0, |
144 |
order_type => $params{type}, |
|
145 | 145 |
transdate => DateTime->today_local, |
146 | 146 |
); |
147 | 147 |
|
... | ... | |
162 | 162 |
: $source->is_sales ? 'sales_delivery_order' |
163 | 163 |
: croak "need some way to set delivery order type from source"; |
164 | 164 |
|
165 |
# overwrite legacy is_sales from type_data |
|
166 |
$args{is_sales} = SL::Controller::DeliveryOrder::TypeData::get3($args{order_type}, "properties", "is_customer"); |
|
167 |
|
|
168 | 165 |
my $delivery_order = $class->new(%args); |
169 | 166 |
$delivery_order->assign_attributes(%{ $params{attributes} }) if $params{attributes}; |
170 | 167 |
my $items = delete($params{items}) || $source->items_sorted; |
Auch abrufbar als: Unified diff
DeliveryOrder::new_from: order_type statt new_from