Revision 5c9d444f
Von Sven Schöling vor fast 3 Jahren hinzugefügt
SL/DB/DeliveryOrder.pm | ||
---|---|---|
17 | 17 |
use SL::DB::Part; |
18 | 18 |
use SL::DB::Unit; |
19 | 19 |
|
20 |
use SL::Controller::DeliveryOrder::TypeData;
|
|
20 |
use SL::DB::DeliveryOrder::TypeData qw(:types);
|
|
21 | 21 |
|
22 | 22 |
use SL::Helper::Number qw(_format_total _round_total); |
23 | 23 |
|
... | ... | |
326 | 326 |
# use type_data cusomtervendor and transfer direction instead |
327 | 327 |
sub is_sales { |
328 | 328 |
if ($_[0]->order_type) { |
329 |
return SL::Controller::DeliveryOrder::TypeData::get3($_[0]->order_type, "properties", "is_customer");
|
|
329 |
return SL::DB::DeliveryOrder::TypeData::get3($_[0]->order_type, "properties", "is_customer");
|
|
330 | 330 |
} |
331 | 331 |
return $_[0]{is_sales}; |
332 | 332 |
} |
333 | 333 |
|
334 | 334 |
sub customervendor { |
335 |
SL::Controller::DeliveryOrder::TypeData::get3($_[0]->order_type, "properties", "is_customer") ? $_[0]->customer : $_[0]->vendor;
|
|
335 |
SL::DB::DeliveryOrder::TypeData::get3($_[0]->order_type, "properties", "is_customer") ? $_[0]->customer : $_[0]->vendor;
|
|
336 | 336 |
} |
337 | 337 |
|
338 | 338 |
sub convert_to_invoice { |
Auch abrufbar als: Unified diff
DeliveryOrder: TypeData aus SL::DB, nicht aus SL::Controller