Revision 5c9d444f
Von Sven Schöling vor mehr als 3 Jahren hinzugefügt
| SL/DB/DeliveryOrder.pm | ||
|---|---|---|
|
use SL::DB::Part;
|
||
|
use SL::DB::Unit;
|
||
|
|
||
|
use SL::Controller::DeliveryOrder::TypeData;
|
||
|
use SL::DB::DeliveryOrder::TypeData qw(:types);
|
||
|
|
||
|
use SL::Helper::Number qw(_format_total _round_total);
|
||
|
|
||
| ... | ... | |
|
# use type_data cusomtervendor and transfer direction instead
|
||
|
sub is_sales {
|
||
|
if ($_[0]->order_type) {
|
||
|
return SL::Controller::DeliveryOrder::TypeData::get3($_[0]->order_type, "properties", "is_customer");
|
||
|
return SL::DB::DeliveryOrder::TypeData::get3($_[0]->order_type, "properties", "is_customer");
|
||
|
}
|
||
|
return $_[0]{is_sales};
|
||
|
}
|
||
|
|
||
|
sub customervendor {
|
||
|
SL::Controller::DeliveryOrder::TypeData::get3($_[0]->order_type, "properties", "is_customer") ? $_[0]->customer : $_[0]->vendor;
|
||
|
SL::DB::DeliveryOrder::TypeData::get3($_[0]->order_type, "properties", "is_customer") ? $_[0]->customer : $_[0]->vendor;
|
||
|
}
|
||
|
|
||
|
sub convert_to_invoice {
|
||
Auch abrufbar als: Unified diff
DeliveryOrder: TypeData aus SL::DB, nicht aus SL::Controller